mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Inserire una CheckBox in una StringGrid

Ciao a tutti, ho gia' cercato, ma per ora non ho trovato nulla (
www.undu.com
e' down, sono sicuro che avrei trovato la soluzione) . Volevo sapere se era
possibile inserire una CheckBox in una colonna di una StringGrid. Mi spiego
meglio devo inserire varie righe composte da vari dati, uno di questi dati
e' un tipo booleano, quinidi vero o falso e vorrei che fosse possibile
selezionarlo tramite una CheckBox. Se conoscete un altro sistema mi va bene
lo stesso, basta ottenere il risultato.
Grazie Alan

drawframecontrol?
-- 
Alberto Salvati
A NEAPOLITAN Delphi Developer who is studying c# and .net
"Dicette 'o pappece 'nfaccia 'a noce dammi 'o tiempo che pure te spertoso"

selezionarlo tramite una CheckBox. Se conoscete un altro sistema mi va
 bene
 Secondo me potresti fare in questo modo:
 Se le colonne della tabella sono definibili:
 Masck
 Chechk
 Currency
 Calc
 Button
 Potresti la colonna della tabella Di tipo Chechk
 So per mia esperienza (visto che le uso) che le tabelle DevExpress lo 
 conssentono se non hai le tabelle DevExpress
 Mandami una mail all'indirizzo 
massimili...@matia.it
 e provvederò a fornirtele.
 Sono per delphi6 lo stesso che uso io.
Grazie dell'attenzione.
A presto.
 
Massimiliano Monti
Cellulare: 0039 - 335 - 8477278
Mail: 
massimili...@matia.it
--- posted by geoForum on 
http://www.delphiedintorni.it

Grazie Alan
	Ciao
	MassimoB
 
---------------------------------
http://www.massimobeschi.it/
---------------------------------
Se tu pagare come dici tu ...
Io lavorare come dico io ...
Se tu pagare come dico io ...
Io lavorare come dici tu ...
---------------------------------

Ringrazio tutti dell'aiuto adesso faccio delle prove e vi so' dire. Non ho
potuto rispondere prima per dei problemi alla connessione.
Grazie
Alan Serpini
Newsgroup: it.comp.lang.delphi
Titolo: Delphi e scanner

All'interno di una applicazione avrei bisogno di utilizzare lo scanner.
Es. premo un bottone lo scanner fa il suo lavoro e mi butta tutto su un
file.
Sapete come fare? Dove posso trovare qualche spunto??
Grazie.

 ha scritto nel messaggio
news:OfRx8.88655$SR5.2...@twister1.libero.it...

Su 
www.torry.net
 trovi decine di sorgenti riguardo a quest'argomento.

Newsgroup: it.comp.lang.delphi
Titolo: MYSQL O INTERBASE

Ciao a tutti, avevo già posto questa domanda in modo diverso tempo fa.....
dunque
Dovendo sviluppare un'applicazione da distribuire e che quindi dovrà essere
installata da utenti stupidi tramite apposito cd autoinstallante, e che
dovrà gestire l'accesso concorrente ai dati....
mi consigliate Interbase o MySql???
Ho fatto delle provettine e mi sembra che Interbase sia molto più potente
(forse il "sembra" si può anche togliere), ma per creare il cd di
installazione???
Grazie a tutti  ciaoux!!

 installazione???
Come hai potuto vedere, installare Interbase non č una cosa molto difficile.
Se si trattasse di Oracle sarebbe tutto un altro discorso.
Non credo che per un qualsiasi utente sia difficile cliccare su setup.exe
e lanciarne l'installazione.
Ricorda inoltre che interbase ha una edizione desktop.
Personalmente non l'ho mai usata ma credo sia un motore per applicazioni
di tipo monoutente.
Sul cd protresti mettere una pagina html autopartente dove la prima
opzione č per la installazione del db e la seconda per la tua applicazione,
tipo la installazione di delphi.
Bye
AS
 
-- 
Posted from  [212.17.220.41] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

> Ho fatto delle provettine e mi sembra che Interbase sia molto piů potente
Non c'č paragone !
Cmq, controlla sul sito di Interbase. Dovrebbero esserci delle istruzioni su
come pilotare l'installazione silenziosa di Interbase. Non male, no ?
-=SIMO=-
Newsgroup: it.comp.lang.delphi
Titolo: [OT][SPAM][AIUT]Raccolta Io Programmo

Olà !!!
Non so a chi possa interessare... però mi sto liberando della mia raccolta 
di Riviste IoProgrammo...
Scusate lo spam... :
http://cgi.ebay.it/ws/eBayISAPI.dll?ViewItem&ih=014&sspagename=STRK%3AMESE%3AIT&viewitem=&item=330132085179&rd=1&rd=1
Ciao a tutti... ultimamente non sono passato spesso... (chi è andato al 
Delphi Day?)
David 

a me interesserebbe
rispondimi in privato  
gianmarco...@email.it

Newsgroup: it.comp.lang.delphi
Titolo: Quale DB devorei utilizzare per?

Quale DB devorei utilizzare per
la mia applicazione?
Ciao Enzo
www.scozzaro.it

 la mia applicazione?
ehm... o io non ho capito cosa intendi o tu sei troppo generico...
cmq:
per client server l'ideale è InterBase, potente, semplice, gratutito
--
Max Etere
maxe...@infinito.it
www.sendai.it/encom

Dipende cosa devi fare e quanto vuoi spendere/far spendere...
--
ciao
Solid Snake IT
"Nemo mortalium omnibus horis sapit" (Plinio il VECCHIO)

Newsgroup: it.comp.lang.delphi
Titolo: D5 + Turbo explorer

Sono fermo a D5 e ho appena scaricato turbo free per valutarne
l'eventuale acquisto. Posso installare tranquillamente l'ultima
versione e farle convivere entrambe o rischio di rovinare D5?
So che non posso importare Jcl e Jvcl che uso abitualmente per cui non
posso provare ad aprire i progetti già scritti in D5, quindi devo
chiedere a chi si è già avventurato: come è la portabilità dei
progetti scritti in D5?
Grazie mille!!!!

 come è la portabilità dei progetti scritti in D5?
Dipende solo dai progetti stessi e dalle loro peculiarità.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 Grazie mille!!!!
Parecchio gioca il fattore "database", vale a dire quale libreria di
accesso ai dati hai utilizzato finora e quale pensi di usare d'ora in
avanti.
Magari usi la BDE....
Poi come ha detto Marco dipende dalle peculiarità...
Ciao
Newsgroup: it.comp.lang.delphi
Titolo: Portare una finestra in primo piano

Salve a tutti,
sto creando un programma che quando riceve un particolare messaggio deve
mostrare la MainForm in primo piano, cioè sopra tutte le altre applicazioni.
Se l'applicazione è minimizzata risolvo con una chiamata ad
Application.Restore, ma se invece l'applicazione si trova sotto form di
altre applicazioni, non riesco a portarla in primo piano. Ho provato con
SetForegroundWindow invano.
Grazie per l'aiuto.

mostrare la MainForm in primo piano, [cut]
hai provato con Form1.setFocus ... ???
	Ciao
	MassimoB
 

Ebbi anche io un problema del genere tempo fa... e ne nacque una lunga
discussione... anche interessante.
http://makeashorterlink.com/?R19D25326
Un estratto di DavideDG
"
A dire il vero mi pare di ricordare un "remarks" recente sulla MSDN online
in cui si avverte che, "siccome l'utente va tutelato, il sistema deve
essere user friendly, ecc. ecc.", allora una finestra non può essere
portata in primo piano se non per sua volontà (alt-tab o clic del mouse),
ma si limiterà a "lampeggiare" sulla barra delle applicazioni.
Questo ovviamente scassa le paxxe al povero programmatore...
A suo tempo mi scontrai con questo problema... la funzione che ho proposto
funziona perchè ... perchè è un barbatrucco, naturalmente!
***Siccome un desktop è la Parent Window di tutte le finestre che stanno
su quel desktop, allora basta "convincerlo" ad attivare "una delle sue
finestre" (vedi documentazione del messaggio WM_(SYS)COMMAND e parametro
SC_HOTKEY).
"
In conclusione, io faccio così :
PostMessage(GetDesktopWindow,WM_SYSCOMMAND, SC_HOTKEY,
FindWindow(Nil,'AirExport'));
Chi era ceh gestisce le FAQ? Se non c'è potremmo inserirlo? Facendo una
ricerchina per trovare il vecchio thread ho notato che è veramente Frequenly
Asked.
Ciaoux

 hai provato con Form1.setFocus ... ???
Già provato ma non funziona :(

 FindWindow(Nil,'AirExport'));
Ottimo funziona! Grazie :)


In questo caso FlashWindow
Ciaoux
Newsgroup: it.comp.lang.delphi
Titolo: personalizzazione quickreport preview

ciao a tutti.
vorrei modificare il preview di default, traducendo le scritte in italiano
e modificando altre impostazioni. ho gią provato ad aprire qrpreview.pas e
a fare qualche modifica, che viene salvata correttamente, quindi i
sorgenti "prendono" le modifiche. poi, ricompilo il package che contiene
qrpreview (QR4RunD6.dpk) e viene creato un nuovo file qrprev.dcu.
perņ se lancio l'applicazione e faccio il preview, mi dą quello di default.
ho guardato la documentazione on-line di quickreport ma non ho trovato
niente di "interessante".
qualcuno mi puņ dare una dritta?
Grazie, ciao.
P.S. Delphi 6 - QuickReport 4
--- posted by geoForum on 
http://www.delphiedintorni.it

Ciao io l'ho modificato da tempo, ed è sempre stato tutto ok.
Prova a vedere quanti qrprev.dcu hai, magari quello ricompilato non viene 
letto perche' nel percorso dei path viene letto ancora quello vecchio, 
inoltre io non ricompilo il package da solo, ma il solo fatto che ho 
modificato il qrprev.pas fa si che quando compilo il mio applicativo, venga 
anche ricompilato il qrprev.pas.
Ciao, Luca 


ciao Luca,
grazie per la risposta. ho controllato, non c'erano altri qrprev.dcu. 
cmq, facendo prove mi sono accorto che le proprietà che volevo modificare
(p.e. la caption del pulsante ExitButton, per cominciare) in preview
venivano come in origine in quanto vengono reinizializzate in runtime,
credo da TQRStandardPreview.CreatePreview. mi confermi?
Quindi al momento ho risolto reinizializzando da codice, in FormShow,
caption, hint, etc. oppure potrei anche commentare le righe in CreatePreview.
ciao,
Massimo


Newsgroup: it.comp.lang.delphi
Titolo: BDE o NON BDE ovvero piccolo Database...

Volevo fare un database in delphi, il problema e':
Come lo faccio?
Il bde mi sembra qualcosa di IMMENSO in quanto a dll.
Ma se la facessi con records mi dovrei implementare tutto il database
da solo...
che mi consigliate?
Ciao
--------------------------------------------------
Brayan Fix Kirys Solfory
E-Mail: 
Ki...@technologist.com
 
For Free Software go to: 
http://Kiryssoft.cjb.net

 wrote in message
ngohssk26pkmui44k...@4ax.com...


Il file si chiama minitbd4.zip ... scaricato dalla DSP (D4FREEWARE).
Grazie vado subito a vedere


Newsgroup: it.comp.lang.delphi
Titolo: D7 + Visa

Avrņ problemi passando da XP prof  a Vista prof ?
I programmi dovranno poi comunque girare su XP.
Ciao
Guido

 Guido
Si,
avrai una infinità di problemi, anche non legati a delphi.
Tornerai a XP, piangendo e dicendo che microsoft era meglio che se lo 
risparmiasse vista.
ZioGian


Non dirmi così ...
Scherzi, spero
Guido
Newsgroup: it.comp.lang.delphi
Titolo: Invio Posta

Utilizzo da tempo il componente NMSMTP per l'invio di e-mail dall'interno di
un mio programma senza aver riscontrato mai problemi. Adesso mi accorgo che
se il programma è installato su una macchina che utilizza un server di posta
(e non l'accesso remoto) non si riesce a spedire nulla. La cosa appare
strana perchè nella proprietà Host metto la spessa stringa impostata su
Outlook (server di posta in uscita). C'è qualcuno che ha avuto lo stesso
problema?
Grazie.
Alberto.

 ha scritto nel messaggio
news:CBwt8.10613$vF6.3...@news2.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: ADOConnectio

Sto usando un'adoconnectio e settando la connectionstring a run time ottengo 
l'errore:
"Impossibile trovare ISAM installabile".
Mi chiedo la connectionstring non e' modificabile a runtime come sto 
facendo?
Giorgio 

 facendo?
Sě, lo č; stai probabilmente pasticciando con i driver.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Sě, lo č; stai probabilmente pasticciando con i driver.
Non credo anche perche' il grosso e' un taglia-incolla della originale... 
controllero' meglio, Grazie 

Giorgio Padoan ha scritto:

A quale formato di database stai tentando di accedere? O meglio, 
suppongo che si tratti con buona probabilità di Access, ma quale versione?
Hai aggiornato il pacchetto MDAC dal sito Microsoft, se necessario? 
Eventualmente, indica anche il sistema operativo su cui viene eseguito 
il programma.
Infine, prova a riportare anche la stringa di connessione, così possiamo 
verificarla per un ulteriore riscontro.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 verificarla per un ulteriore riscontro.
Si trattava di Access, ho rifatto il copia incolla, poi ho spezzetato la 
stringa essendo piu' lunga di 255 car. nell'ide dava errore e si e' messo a 
funzionare,
Ciao Giorgio
Newsgroup: it.comp.lang.delphi
Titolo: Primi risultati e primi guai (WAS: TEdit)

Sulla base delle idee sorte nel thred "TEdit", mi sono cimentato nella
scrittura di un componente in grado di monitorarne un altro, e di
eseguire un'operazione al verificarsi di un certo messaggio.
Per fare questo, ho usato il subclassing, per cui il mio componente
(che ho chiamato ILCDVisitor, dato che sembra analogo al pattern
Visitor, ed e' nato dalle discussioni su questo gruppo) aggancia al
controllo "monitorato", una propria WindowProc che filtra i messaggi:
procedure TILCDVisitor.NewWindowProc(var Message: TMessage);
begin
  if (Message.Msg=Msg) and Assigned(OnMsgIntercepted) then
     OnMsgIntercepted(Self)
// Se il messaggio e' quello assegnato alla proprieta' Msg (di tipo
// Cardinal), viene eseguito OnMsgIntercepted
 
     else OldWndProc(Message); //Processa il resto dei messaggi
end;
Tralasciando i dettagli, l'ho provato su un editbox, e settando
 ILCDVisitor.Msg:=EN_CHANGE
mi aspettavo che intercettasse ogni modifica al testo dell'editbox.
Invece no :(
Il fatto e' che se invece uso EN_SETFOCUS, il tutto funziona alla
perfezione, e ad ogni tasto premuto all'interno dell'editbox, viene
eseguito correttamente l'evento!
Secondo voi dove sbaglio, considerando che non ho le idee chiare sui
messaggi, subclassing e compagnia bella?
Saluti
--
Piero Bonanno
bop...@libero.it
pie...@tiscalinet.it
bop...@tin.it
bpie...@hotmail.com
______________________________________________
"Madame, lei ha tra le gambe uno strumento
che puo' offrire piacere a migliaia di persone,
e tutto quello che sa fare e' grattarlo"
- Sir Thomas Beechan a una violoncellista

messaggi, subclassing e compagnia bella?
Secondo me è tutto corretto, mi spiego meglio.
Il messaggio EN_Change non è inviato alla edit, ma è la tua applicazione che
lo invia
per avvisare che c'è stato un cambiamento. In pratica il messaggio EN_Change
non arriverà
mai alla tua Edit, al contrario di un messaggio di SetFocus o di MaxText.
Tu puoi intercettare solo i messaggi che arrivano al tuo componente,
altrimenti ti devi fare un HOOK
Globale che monitorizza tutti i messaggi in circolo sul sistema (in pratica
ti vedi la coda dei messaggi
di Windows), ma penso sia piuttosto laboriosa come soluzione.
Infine ti do un consiglio, fai molta attenzione ai messaggi
EM_SetPasswordChar e, soprattutto, WM_GetText.
Spero di esserti stato di aiuto!!
Ciao
--
- Carlo -
BSSoftware Tips Mailing-List Support
Newsgroup: it.comp.lang.delphi
Titolo: Fast Report : memo con righe multiple

Salve,
 sto facendo delle prove con Fast Report 4 e mi sono bloccato su una banalità.
Pur Googlando non riesco a trovare risposta.
 
Ho semplice report costituito da una insieme di memo text.
 
Codice Componente1 , Descrizione1 ;
Codice Componente2 , Descrizione2 ;
Codice Componente3 , Descrizione3 ;
Codice Componente4 , Descrizione4 ;
Codice Componente5 , Descrizione5 ;
 
Il campo DescrizioneX lo passo da Delphi a FastReport4 è costituito da 
testo con numero di righe variabili.
Come posso fare in modo che il Memo di Descrizione1 "sposti" in basso sia
Codice Componente2 che Descrizione2 in base al numero di righe di Descrizione1.
In modo analogo dovrebbero comportasi le Descrizioni 3,4,5.
 
Qualcuno potrebbe darmi delle indicazioni ? 
 
Ho provato ad agire sulla proprietà Stretch senza risultati.
 
Ringraziamenti anticipati
 
Zeno Michielon
 
 
 

 Zeno Michielon
 
 
 
-- 
 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Newsgroup: it.comp.lang.delphi
Titolo: OpenGL o Cos'altro????

Salve a tutti,
Premetto che non sono molto ferrato in materia di grafica e tanto meno di
OpenGL:
Arrivo al dunque: Vorrei implementare una piccola applicazione che mi
consenta
di prendere un solido, ad esempio un semplice cubo, e modificarne
separatamente le
dimensioni (XYZ) con un semplice trascinamento del mouse,  ed impostare
anche i colori
delle varie pareti del cubo.
Non so proprio da che parte cominciare, c'è qualcuno che mi può
indirizzare???
C'è in circolazione qualche componente freeware da installare che mi può
semplificare la vita?
Grazie a Tutti

 
Certo, e te la semplifica moltissimo, tanto da non dover nemmeno avere a 
che fare con i meccanismi tipici di OpenGL (pur usando OpenGL):
www.glscene.org
Ottimo, ben fatto e abbastanza semplice, con buoni esempi gia' fatti da 
cui prendere spunto.
Puoi persino costruire la scena 3D a design-time da dentro Delphi!
-- 
Roal Zanazzi

Grazie Infinite,
Vado subito a documentarmi
Newsgroup: it.comp.lang.delphi
Titolo: Columns nei TDBGrid

All' interno di un TDBGrid o TJvDBGrid, è possibile aggiungere una
column non associata ad un campo del database ? Se aggiungo la column
senza associarla quando ci vado a scrivere mi da errore (Errore su
0xED00...).
 Grazie & Ciriciao
  Gio'
-- 
/*
 * Solutions for New Business - 
http://www.snb.it
 */

 0xED00...).
Potresti associarla ad un campo qualsiasi della tabella ma, attraverso i 
meccanismi di "owner drawing", potresti tracciare al suo interno, usando 
proprietà e metodi dell'oggetto /Canvas/ e l'evento /OnDrawCell/ tutto 
quello che vuoi.
In alternativa, se il problema è quello di visualizzare un "campo 
virtuale" o calcolato, puoi sempre aggiungere questa tipologia di campo 
alla tabella di origine e associare la colonna a tale campo il cui 
valore viene definito a runtime attraverso un evento apposito (ad 
esempio, /OnCalcFields/).
Ciao,
   Marco.
-- 
Marco «Alka» Breveglieri	
http://www.marco.breveglieri.name
  «bvmcnxsjlkhròhyeq, potrei scrivere a questo punto,
   se mi addormentassi sui tasti» (Daniele Luttazzi)

 
Speravo di poter evitare questa soluzione per non riscrivere la stored
procedure ma pare che sia la via più indolore.


 procedure ma pare che sia la via più indolore.
Non è necessario riscrivere la stored procedure. Il "campo virtuale" a 
cui mi riferivo viene definito all'interno di Delphi, sul componente 
DataSet che contiene i dati da visualizzare all'interno della griglia.
Facendo doppio clic sul componente DataSet (TTable, TADOTable, TQuery, 
dipende dal set di componenti adottati) ti appare il "Field Editor" ove 
puoi rendere persistenti le proprietà "lato Delphi" dei campi della 
tabella e, all'occorrenza, aggiungere nuovi campi calcolati.
Oltre all'uso dell'evento /OnCalcFields/ del DataSet, potresti 
selezionare il nuovo campo calcolato dal "Field Editor" e intercettare 
l'evento /OnGetText/ per restituire il testo che preferisci (per il 
record corrente): esso verrà visualizzato nella griglia, all'interno 
della colonna associata.
Per ulteriori informazioni, consulta la Guida in linea di Delphi in 
merito agli eventi e agli argomenti che ti ho citato.


 
Ormai ho cambiato la stored procedure ma ora ho un problema simile su un
altro programma, vedrò di affrontarlo come mi hai consigliato.

Newsgroup: it.comp.lang.delphi
Titolo: Compilatore

Dove posso scaricare un buon compialtore delphi possibilmente gratis???
grazie


Mi pare che Borland abbia reso Delphi 6 personal edition liberamente
scaricabile; devi solo registrarti e prestarti a rispondere un po' di
domande.
Ciaotutti,
*

Newsgroup: it.comp.lang.delphi
Titolo: Come creare un ActiveX in VB e importarlo in Delphi?

Ciao a tutti,
    ho creato un ActiveX in VB(provato e testato) e sto cercando 
d'importarlo in Delphi.
Eseguo la classica procedura Component > ImportActiveX control, 
specifico che dev'essere creata sulla Palette ActiveX, premo il pulsante 
Install e specifico di installarlo in un nuovo package col nome di test.dpk.
Nella compilazione non vi sono errori e la classica finestra con la 
scritta "Package c:\...\test.bpl has been installed".
Apro un nuovo progetto, vado nella palette ActiveX e non trovo nulla.
Come mai?
Verifico in Component > Install Packages... se nella lista esiste il mio 
activeX importato...esiste.
premo il pulsante Components e...accidenti, non esiste alcuna icona.
Qualcuno che ha già fatto questo tipo di esperimento con 'sto benedetto 
VB saprebbe illuminarmi la via?
Ciao e grazie
Tiziano Crimella
-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com
 - The #1 Newsgroup Service in the World!
-----==  Over 80,000 Newsgroups - 16 Different Servers! =-----

se hai creato una unit, verifica la esistenza della procedure Register:
procedure Register;
begin
  RegisterComponents('ActiveX',[TTuaClasse]);
end;
Sicuro del funzionamento degli activex scritti in vb?
Io non mi fiderei troppo: m$ x m$, credo sia meno peggio il visual c++....
Bye
A.

Newsgroup: it.comp.lang.delphi
Titolo: DWG o DXF

Siccome Autocad non è ancora prarametrico.. vorrei fare un programmino che
mi consenta di disegnare delle flange partendo da dati contenuti in un DB..
La mia domanda è questa..
Conoscete delle librerie che mi consentano di scrivere file DWG o
eventualmente DXF..
ma sarebbero meglio i DWG..
grazie.

 ha scritto nel messaggio
news:a6iuu1$sbl$1...@newsreader.mailgate.org...

Ciao, dante.
Vai su
www.opendwg.org
Se ti registri (semplicemente lasciando qualche tuo dato) , puoi scaricare
le librerie che consentono di leggere e scrivere files in formato DWG e DXF
compatibili con qualsiasi versione di AutoCAD, fino alla 2002 compresa.
Non sono previste librerie per Delphi, ma ci sono per VC++, CppBuilder,
oppure le stesse sotto forma di OCX.
Se ti registri, hai diritto ad utilizzarle liberamente purchè in prodotti
non commerciali.

si ma come le uso su delphi????
ciao e tantisseme grazie..

 ha scritto nel messaggio
news:a6iuu1$sbl$1...@newsreader.mailgate.org...


 ha scritto nel messaggio
news:a6iuu1$sbl$1...@newsreader.mailgate.org...

Newsgroup: it.comp.lang.delphi
Titolo: Versioning dei componenti

Usando TurboAsync ho notato che a design time, tra le proprietą di sola
lettura compare la versione del componente.
Qualcuno sa come fare lo stesso in un componente proprio, e come aggiornare
la versione in automatico quando si effettuano delle modifiche
Grazie Carlo

la versione in automatico quando si effettuano delle modifiche
Cosa intendi per "automatico" ?
L'informazione di versione e' una proprieta' e risponde alle regole di tutte
le proprieta': gli dai un published se vuoi vederla nell'object inspector,e
puoi fornire i metodi per la letture e scrittura della proprieta'.
come esempio si puo' prendere quelli stessi della turbopower:
type
  TApdBaseComponent = class(TComponent)
  protected
    function GetVersion : string;
    procedure SetVersion(const Value : string);
  published
    property Version : string
      read GetVersion
      write SetVersion
      stored False;
  end;
Nella sezione protetta metti i metodi mediante i quali lavori dal sorgente, la
published riguarda l'object inspector.
Per saperne di piu' puoi anche cercare su icld per questa query:
http://groups.google.it/groups?&q=proprieta%27+componente&meta=group%3Dit.comp.lang.delphi
ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 ha scritto nel messaggio
news:3et030p81h4rojuj8...@4ax.com...


sta utilizzando specie se si lavora su più pc, casa, ufficio ect.
L'unica strada percorribile a me sembra quella di passare per la proprieta'
"Version" di un componente, aggiornabile tramite reinstallazione di un
componente piu' recente. Cosi' facendo puoi tener nota delle varie versioni
che hai in giro, e aggiornarle di conseguenza.


Newsgroup: it.comp.lang.delphi
Titolo: Forse banale ma non ci riesco

Io ho una query con un parametro, questo parametro dovrebbe prendere il 
valore dal item corrente di una TDBComboBox: vi giuro che in due giorni 
non ho ancora capito come "passarglielo": consigli/idee?
Frank

DBComboBox1.Text, ciao

 Io ho una query con un parametro[...]
Che intendi con "io ho una query" ? che tipo di componenti stai 
utilizzando?

 non ho ancora capito come "passarglielo": consigli/idee?
Consiglio di usare un subject piu' pertinente, ad esempio "utilizzo item
combobox".
Quanto al tuo problema e' sufficiente seguire il suggerimento dell'altro
followup al tuo thread. ;-)
-- 
Morde. 
ICLDweb: 
http://www2.samatel.com/icld/

Posta il codice dei tentativi che hai fatto fino a questo momento.
AS


Rispondo a te per rispondere a tutti, ho risolto, in pratica era una 
semplice Master/Detail (non so se anche voi le chiamate cosě), che ho 
trovato leggendo la pagina successiva del manuale :)
Grazie lo stesso per il supporto!
PS: se vi domandate perchč scrivo solo la sera č perchč posso accere ai 
NG solo in questo momento, quindi non aspettavevi risposte da me in 
altri momenti della giornata ;)


Hai ragione scusami, vedrò di indicare nei subject il problema specifico 
in futuro :)
Frank
Newsgroup: it.comp.lang.delphi
Titolo: #

 
--- posted by geoForum on 
http://www.delphiedintorni.it

Non leggete il post. In alto il contatore mostra quanta gente ha seguito 
il Troll.
Questo post contiene un tracking-bell
Buone vacanze
Troll


Newsgroup: it.comp.lang.delphi
Titolo: [?] Classi: 'ndo stanno gli eventi?

domanda rapida rapida: le classi in Delphi hanno eventi? suppongo di sì, se 
non altro per compatibilità con OLE. Sapreste dirmi di più? ho cominciato 
da poco e non ci capisco molto :/

da poco e non ci capisco molto :/
Beh dipende da cosa intendi, gli eventi non sono altro che delle procedure
no ? + che le classi sono i componenti e i controlli ad avere eventi, almeno
in delphi..
forse dovresti spiegarti meglio :)

da poco e non ci capisco molto :/
in generale solo i componenti (derivati di TComponent) hanno eventi,
nulla vieta di inserirli anche in classi normali...
gli eventi non sono altro che proprieta' di tipo metodo, il manuale del
linguaggio li descrive molto bene.

ereditati da TObject...
puoi dichiararla nella sezione implementation, in questo modo pero'
gli altri moduli non vedranno la classe ma, al massimo, la sua classe
base.
Un altro modo e' quello di dichiarare in modo pubblico un'interfaccia
e implementare la classe nella sezione implementation, come
parametri (sia di ingresso che di ritorno) potrai usare l'interfaccia.

nulla vieta di inserirli anche in classi normali...
a me gli eventi servono per operazioni asincrone
vorrei evitare di usare delle callback dato che intendo sviluppare degli 
ActiveX

(hai presente quelle cose che in VB non si possono usare?  >:-)
thanksss
(lo immaginavo, comunque ;)

ActiveX
che mi risulta anche gli ActiveX usano callback, in ogni caso
potresti inserire delle proprietą contenenti dei codici di
messaggio e inviarli dal componente all'applicazione
con dei PostMessage (una di queste proprieta' dovrebbe
contenere l'handle della finestra client).
[se ho capito bene il problema...]

(lo immaginavo, comunque ;)
Oltre agli eventi nel senso di puntatori a metodi di oggetto, se li devi
usare per operazioni asincrone ci sono gli eventi di Win, un wrapper dei
quali e' la classe TEvent di Delphi.
Possiede i metodi:
  constructor Create(EventAttributes: PSecurityAttributes; ManualReset,
    InitialState: Boolean; const Name: string);
  procedure ResetEvent;
  procedure SetEvent;
  type TWaitResult = (wrSignaled, wrTimeout, wrAbandoned, wrError);
  function WaitFor(Timeout: DWORD): TWaitResult;
Non ricordo di averli usati in un contesto significativo (non mi pare,
inoltre, che esista una demo che li usa, ma potrei sbagliarmi).
Saluti
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: copyfile con xp

 
salve a tutti ....
per caso qualcuno sa se c'è un problema dell'istruzione copyfile con il
famoso windows XP?
devo copiare un file da un adirectory ad un altra ma semplicemente
l'istruzione fallisce senza altri messaggi....
grazie per le risposte....
                                                                        Barbara
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 l'istruzione fallisce senza altri messaggi....
Non viene generata alcuna eccezione quando tenti di effettuare la copia 
del file? :-|
-- 
Marco «Alka» Breveglieri
  (marco [@] abls [.] it)
  ABLS Team S.n.c. - Software & Web
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

l'istruzione fallisce senza altri messaggi....
CopyFile è una API di Windows, per avere il risultato della funzione
devi utilizzare GetLastError
-- 
Ore 18.30: premo invio.

Newsgroup: it.comp.lang.delphi
Titolo: rubrica outlook express

ciao a tutti.
in una mia applicazione avrei bisogno di implementare una funzione che
inserisca i nominativi (che ho in una tabella del mio database)
direttamente nella rubrica di outlook express. Ho cercato, ma non ho
trovato niente che mi aiuti. Qualcuno mi sa dare uno spunto?
Grazie 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

trovato niente che mi aiuti. Qualcuno mi sa dare uno spunto?
O.E. non offre interfacce OLE /COM.
Qui trovi un componente per permetterti di accedere ai suoi file DBX
(alle email) : 
http://www.djpate.freeserve.co.uk/oexpress2.zip
Ma non credo che sia quello che cercavi.
Ciao
Morde

> O.E. non offre interfacce OLE /COM.
Azz! Questa non la sapevo.
Bastardi!
A.

Azz! Questa non la sapevo.
Diversamente Outlook, dalla 2000, offre molte possibilita' per
interfacciarvisi.
Si pensa che sia una manovra commerciale di M$.
Ovviamente se vuoi fare dell'automazione intorno alle attivita' di
posta, devi far acquistare Outlook al cliente, perche' il fratello
gratuito Express non ti permette di svilupparci intorno.
Morde
Newsgroup: it.comp.lang.delphi
Titolo: DriveComboBox

Sarei molto grato a chi potesse suggerirmi come intercettare l'errore di I/O
che avviene quando si tenta di agganciare un componente TDriveComboBox a un
componente TDirectoryListBox nel caso in cui il drive specificato sul primo
non sia pronto (floppy o vuoto CD ), oppure andrebbe bene anche poter
testare prima se il drive specificato e' pronto o meno.
Un grazie anticipato.

"Massimiliano Crivellaro" ha scritto nel messaggio

La seguente funziona restituisce false se il drive passato come
parametro non e' disponibile:
function DiscoNelDrive(const Drive: char): Boolean;
var
   DrvNum: byte;
   EMode: Word;
begin
   Result := false;
   DrvNum := ord(Drive);
   if DrvNum >= ord('a')
       then dec(DrvNum,$20);
  EMode := SetErrorMode(SEM_FAILCRITICALERRORS);
  try
      if DiskSize(DrvNum-$40) <> -1
         then result := true
         else messagebeep(0);
   finally
      SetErrorMode(EMode);
  end; {try..finally}
end;
Usala quando c'e' un cambiamento nel TDriveComboBox.
Nota l'uso dell'API SetErrorMode con il parametro
SEM_FAILCRITICALERRORS: evita la visualizzazione della message box
d'errore.
P.S.: la funzione non e' mia, ma non ricordo dove l'ho trovata - se dico
Internet sono un po' troppo vago? :)
Ciao.
ACSH
---------------------------
Non sono un atleta. Ho cattivi riflessi.
Una volta sono stato investito da
una automobile spinta da due tizi.
W.A.
Newsgroup: it.comp.lang.delphi
Titolo: Click su MSIE

Salve a tutti quelli del NG
    mi trovo da giorni davanti ad un problema con MSIE; non riesco a fare
Click o DoppioClick su una immagine link al suo interno...
    Questo stralcio di codice che ho scritto funziona con un qualsiasi
finestra e il controllo al suo interno che ha il focus risponde
correttamente:
  Handle:= FindWindow ( nil, PChar ( WindowName ) );
  SetForegroundWindow ( Handle );
  SendMessage ( Handle, WM_LBUTTONDBLCLK, 0, GetMessagePos );
    Ma MSIE non ne vuol proprio sapere... Ho provato a recuperare l'Handle
anche con la funzione WindowFromPoint e a portarlo in primo piano con
SetForeGroundWindow... ho provato persino a catturare l'attenzione del mouse
con SetCapture, ma non c'č niente da fare... Pur trovandomi sopra
all'immagine che voglio cliccare, non c'č verso di farglielo fare...
    Qualcuno di voi ha avuto lo stesso problema? Siete riusciti a
risolverlo?
    Saluti!
______________________________________
Gian Luca Dalla Torre
E - Mail: 
gianluca....@casteo.net
______________________________________

risolverlo?
Perche' non comunichi con IE via COM ?
Esiste l'oggetto InternetExplorer che si puo' pilotare facilmente.
Su MSDN c'e' una grande documentazione a proposito.
Se vuoi chiarimenti...
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
--------------------------------------------------------------
"Partire e' un po' morire e morire e' partire un po' troppo !"
--------------------------------------------------------------

 Se vuoi chiarimenti...
    All'inizio cercavo una strada più semplice, poi ho cercato le
interfaccie COM sul sito di Microsoft, ma non ho trovato granché.. Se mi
indichi dove posso trovare le interfaccie mi arrangio, Grazie!
    P.S. Intendi via COM o via Automation?


interfaccie COM sul sito di Microsoft, ma non ho trovato granché.. Se mi
Puoi consultare MSDN a 
www.msdn.microsoft.com
Consulta tutto cio' che riguarda gli oggetti WebBrowser e
InternetExplorer. 


Newsgroup: it.comp.lang.delphi
Titolo: Curiosità delphi>7

le versioni dopo la 7 ti "permettono" di lavorare in .NET o ti obbligano a 
lavorare in .NET?
Si possono creare lo stesso applicazioni Win32 standard?
E del supporto per x64? 

 E del supporto per x64? 
In riferimento alla piattaforma nativa, è in lavorazione; dubito che 
sarà possibile utilizzarlo già nella prossima release di Delphi, magari 
nella successiva; però, se non ricordo male sono previste opzioni nella 
prossima versione di Delphi in grado di ottimizzare le applicazioni .NET 
per la piattaforma a 64bit.
In ogni caso, il supporto nativo della VCL a 64bit è nella "roadmap".
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Newsgroup: it.comp.lang.delphi
Titolo: domandina sul Random

se devo generare un pwd di 8 caratteri solo lettere minuscole e numeri
(codici ascii da 48 a 57 e da 97 a 122) come faccio...io per ora riesco a
far generare solo il range delle minuscole..... cosě
chi mi corregge?
procedure genera_password(var pwd:string);
var x:integer;
begin
  randomize();
  for x:=1 to 8 do
    begin
      pwd:=pwd+(chr(97+random(26)));
    end;
end;
--
----------------------------------------------------------------------------
-
I'm Mr.Bad Guy,
Yes I'm everybody's Mr.Bad Guy.
Can't you see, this is my destiny...
Oh Oh, Spread your wings and fly away with me.
( Freddie Mercury :  5/9/1946 - 24/11/1991)

const s : string = '0123456789abcdefghijklmnopqrstuvwxyz' ;
...
pwd := pwd + s[ random( length( s ) ) ] ;
--
Andrea Laforgia (ICQ 87230455)
"ci sono tre tipi di persone nel mondo : quelli che
 sono bravi in matematica e quelli che non lo sono."

  sono bravi in matematica e quelli che non lo sono."
Probabilmente mi pentirň ... e i terzi ? :)
Ciao, Davide DG


Magari mi pentiro' anche io, ma credo che siano quelli che vengono sempre
dimenticati.


grazie mille.

dimenticati.
E pure io magari mi pentirņ ma pare che chi citi quell'aforisma sia
della seconda categoria... ;)
Ciao!
Peppe
_____
ICQ #9759626
http://members.xoom.it/joe
Togli levaccą per contattarmi via email.


Questo pentitismo non sarą opera del Giubileo che sta per finire, la Chiesa
ne sarą contenta.
P.S. Continuo a pentirmi.

ne sarà contenta.
Boh... forse saranno strascichi dei maxi-processi...
Ciao.
Peppe
_____
ICQ #9759626
http://members.xoom.it/joe
Togli levaccà per contattarmi via email.

pwd := pwd + s[ random( length( s ) ) ] ;
dato che il primo carattere di una stringa ha indice 1
direi
pwd := pwd + s[ random( length( s ) ) + 1 ] ;
altrimenti ogni tanto potrebbe succedere un pasticcetto...

altrimenti ogni tanto potrebbe succedere un pasticcetto...
Hai ragione, e' che sono abituato al C che da' meno problemi.


 Hai ragione, e' che sono abituato al C che da' meno problemi.
beh, problemi e' una parola grossa ;)
semplicemetne le stringhe pascal non sono zero based
e poi,se vuoi (quindi puoi scegliere), potresti usare i pchar
Ciao,
Alan Solo

 della seconda categoria... ;)
Sicuramente il senso era quello :))
CIAO,
Franco.

Hai ragione, e' che sono abituato al C che da' meno problemi.
piu' che altro ci sei abituato  ;-)

piu' che altro ci sei abituato  ;-)
Quando lo conosci bene da' molte meno rogne inutili ;)
--
Andrea Laforgia (ICQ 87230455)
http://www.geocities.com/AndreaLaforgia

Newsgroup: it.comp.lang.delphi
Titolo: Domandina facile facile

Sto provando a sviluppare un add-in per Outlook. Dopo aver perso un bel po'
di tempo a capirmi con Type library e affini, mi ritrovo ad aver bisogno di
un oggetto Explorer (PS: non è Internet Explorer) per la gestione delle
cartelle di Outlook. Qualcuno ha per caso idea di dove posso trovare un
wrapper per questo oggetto?
Grazie 1000


wrote:

Che versione di Delphi utilizzi ?
Con Delphi 5 Enterprise c'e' la cartellina "Servers" che contiene il
componente "Outlook Application" che forse puo' esserti d'aiuto.

 ha scritto nel messaggio
news:qgnl0to86fjsh2gb3...@4ax.com...


Newsgroup: it.comp.lang.delphi
Titolo: FreeSystemResource

Salve,
IL FATTO
Nel mio programma ho bisogno di sapere ogni momento la quantità di memoria
GDI e User disponibile (quelle che si vedono nella mascherina di
monitoraggio di sistema di WINDOWS).
Prima nelle API c'era la funzione GetFreeSystemResource che restituiva la
quantita di memoria richiesta(USER o GDI),
questa funzione è stata eliminata nelle API attuali dalla funione
GlobalMemoryStatus che mi restituisce la quantità di memoria disponibile
fisica, paginata ecc...
IL PROBLEMA
Come faccio a ricavarmi la memoria USER e GDI disponibile dai parametri
della funzione GlobalMemryStatus (se è possibile) o quali metodi alternativi
esistono?
Grazie a tutti per un eventuale risposta.
Emanuele Albero

 esistono?
sul repository dei gruppi di Cantů c'č un post di Uberto Barbini che
riguarda le risorse libere.
Non se se quelle due unit siano in grado di soddisfare pienamente le tue
esigenze, tuttavia potrebbero esserti utili.
Ciao
--
- Carlo -
c.b...@libero.it
Newsgroup: it.comp.lang.delphi
Titolo: Find text??????

Hi.
I have inserted this code from hepl to find text in a rich edit
(renamed memo1 for the occasion). But it doesn't work properly.
Can you help, please. What's wrong?
I'm using D2.
Example
The following OnFind event handler searches a memo component for the
text specified in the FindText property of a find dialog component. If
found, the first occurrence of the text in Memo1 is selected. The code
uses the Pos function to compare strings, and stores the number of
characters to skip when determining the selection position in the
SkipChars variable. Because there is no handling of case, whole word,
or search direction in this algorithm, it is assumed that the Options
property of FindDialog1 was set to [frHideMatchCase, frHideWholeWord,
frHideUpDown].
procedure TForm1.FindDialog1Find(Sender: TObject);
var
  I, J, PosReturn, SkipChars: Integer;
begin
  For I := 0 to Memo1.Lines.Count do
  begin
    PosReturn := Pos(FindDialog1.FindText,Memo1.Lines[I]);
    if PosReturn <> 0 then {found!}
      begin
        Skipchars := 0;
        for J := 0 to I - 1 do
          Skipchars := Skipchars + Length(Memo1.Lines[J]);
        SkipChars := SkipChars + (I*2);
        SkipChars := SkipChars + PosReturn - 1;
        Memo1.SetFocus;
        Memo1.SelStart := SkipChars;
        Memo1.SelLength := Length(FindDialog1.FindText);
      end;
  end;
end;
If you can enlighten me in the replace code also, I would greatly
appreciate.
T you.

>
I have inserted this code from hepl to find text in a rich edit
(renamed memo1 for the occasion). But it doesn't work properly.
Can you help, please. What's wrong?
I'm using D2.
[...]
procedure TForm1.FindDialog1Find(Sender: TObject);
var
  I, J, PosReturn, SkipChars: Integer;
begin
  For I := 0 to Memo1.Lines.Count do
  begin
    PosReturn := Pos(FindDialog1.FindText,Memo1.Lines[I]);
    if PosReturn <> 0 then {found!}
      begin
        Skipchars := 0;
        for J := 0 to I - 1 do
          Skipchars := Skipchars + Length(Memo1.Lines[J]);
        SkipChars := SkipChars + (I*2);
        SkipChars := SkipChars + PosReturn - 1;
        Memo1.SetFocus;
        Memo1.SelStart := SkipChars;
        Memo1.SelLength := Length(FindDialog1.FindText);
      end;
  end;
end;
<<
I'm unsure you need to search line by line: could try
PosReturn := Pos(FndDlg1.FindText, Memo1.Text);
in any case you could call break procedure after selecting text.
hth
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: Un'altro aiuto con Report Builder

Sulla banda del DETTAGLIO ho inserito un DBText ed un DBRichText. Ho
collegato il DataField ed il DataPipeLine che ha sua volta è collegato ad
una tabella. Fino a qui tutto ok... Quando vado in stampa mi stampa solo il
primo record... e gli altri?
Grazie di nuovo.

 primo record... e gli altri?
verifica che la tabella non sia filtrata, che la banda non sia alta quanto
la pagina, che i campi o le region non siano stretched, che il
traversealldata del report sia a true, che autostop non sia a false,
ecc.ecc. ci possono essere molte cose in definitiva che producono il
comportamento, se non ne cavi piede cancella il report e ricrealo usando il
wizard, vedrai che funziona.
Ciao, Sandro

 verifica che la tabella non sia filtrata
C'è una query, ma lo sempre utilizzata senza problemi...
In questo caso utilizzo sulla banda del dettaglio, direttamente i componenti
del DB. Avevo pensato di mettere il nome del db della proprietà DataPipeLine
della banda dettaglio, ma non cambia nulla. Ora lo inserita direttamente in
quella del componente ReportBuilder e stampa tutti i records (chissà perchè,
help non mi è stato di grande "aiuto"?!?).
Però c'è un'altro problema: utilizzo sempre un Footer dove ci sono le
variabili di sistema per il num.pagina, data e ora.
Solo nelle stampa dove utilizzo componenti DB per creare il dettaglio, non
stampa + il footer. Le bande hanno le stesse proprietà delle altre.
Mistero?!
Ciao Tiziana.
Newsgroup: it.comp.lang.delphi
Titolo: prova - non leggere

 wrote:
usa it.test
--
Rhymes
--------------------------
rhy...@myself.com
http://www.foxhound-games.it
http://embyte.mascanc.net
--------------------------
Linux User #219707

Newsgroup: it.comp.lang.delphi
Titolo: FireBird

C'è qualcuno che utilizza il dbms in oggetto in progetti di grosse
dimensioni ? E' veramente affidabile ?
Grazie 1000

 ha scritto nel messaggio
news:ZYHgb.26063$Zh.2...@tornado.fastwebnet.it...


 Grazie 1000
Io lo utilizzo in tutte le mie applicazioni.
Il caso limite ce l'ho in 6 db ognuno con 15 Milioni di record e
grance circa 1,8 GB, ti posso assicurare che e' stabile e molto
veloce.
PS Utilizzo linux
Massimo
Newsgroup: it.comp.lang.delphi
Titolo: Ci riprovo... BMP su MDI...

Qualcuno ha qualche esempio o suggerimento dal quale imparare???

Cosa intendi?

 Qualcuno ha qualche esempio o suggerimento dal quale imparare???
Preso dal sito della borland:
FAQ176D.txt - Displaying a bitmap on the client area of an MDI parent form.
Category   :Windows API
Platform   :All-32Bit
Product    :
Question:
How do I display a bitmap to the client area of an MDI parent
form?
Answer:
Here are the necessary steps to add wallpaper to a MDI parent
form:
Create a new project
Set the form's FormStyle to fsMDIForm
Drop an image on the form and select a bitmap into it.
Find the { Private Declarations } comment in the form's
   definition and add these lines right after it:
    FClientInstance : TFarProc;
    FPrevClientProc : TFarProc;
    procedure ClientWndProc(var Message: TMessage);
Find the "implementation" line and the {$R *.DFM} line that
   follows it. After that line, enter this code:
procedure TMainForm.ClientWndProc(var Message: TMessage);
var
  Dc : hDC;
  Row : Integer;
  Col : Integer;
begin
  with Message do
    case Msg of
      WM_ERASEBKGND:
      begin
        Dc := TWMEraseBkGnd(Message).Dc;
        for Row := 0 to ClientHeight div Image1.Picture.Height do
          for Col := 0 to ClientWidth div Image1.Picture.Width do
            BitBlt(Dc,
               Col * Image1.Picture.Width,
               Row * Image1.Picture.Height,
               Image1.Picture.Width,
               Image1.Picture.Height,
               Image1.Picture.Bitmap.Canvas.Handle,
               0,
               0,
               SRCCOPY);
          Result := 1;
      end;
      else
        Result := CallWindowProc(FPrevClientProc,
                                 ClientHandle,
                                 Msg,
                                 wParam,
                                 lParam);
  end;
end;
In the OnCreate method for the form, type the following lines
of code:
   FClientInstance := MakeObjectInstance(ClientWndProc);
   FPrevClientProc := Pointer(GetWindowLong(ClientHandle,
                              GWL_WNDPROC));
   SetWindowLong(ClientHandle,
                 GWL_WNDPROC, LongInt(FClientInstance));
Add a new form to your project and set its FormStyle property to
fsMDIChild.
Now you have a working MDI project with "wallpaper" where the image
bitmap is tiled to cover the MDI form's client area.
4/2/99 11:38:30 AM
-- 
Lis
ICQ@Home #7317603sette     ICQ@Work #16285702tre
Mercatino: 
http://lis77.bravepages.com
 (aggiornato *con foto*: 16/06/03)
Newsgroup: it.comp.lang.delphi
Titolo: come fare per chiudere tutti i programmi aperti ad eccezione di uno

qualcuno mi sa dire come fare per chiudere tutti i programmi aperti ad
eccezione di uno?
è per lo sviluppo di un applicazione internet point a tempo

 è per lo sviluppo di un applicazione internet point a tempo
    Enumeri tutte le finestre aperte di Windows (usando L'API EnumWindows) e
se non corrispondono all'applicativo che gli interessa gli mandi un
messaggio con WM_CLOSE o SC_CLOSE (rispettivamente chiusura del programma o
pressione della x in alto a destra)...
    Saluti!
--
______________________________________
Gian Luca Dalla Torre
E - Mail: 
gianluca....@casteo.net
______________________________________

 pressione della x in alto a destra)...
Ciao, ma cosě non rischi di chiudere anche "finestre" di sistema ?
Ciao, Davide DG

 Ciao, Davide DG
A parte questo, non sei sicuro di chiudere processi che non hanno
finestre...
Nè tantomeno chiudi (tutte) le applicazioni console...
Comincio a pensare che dovrei mettere sul mercato il mio programma di
protezione per postazioni pubbliche... ormai è la 4-5 volta che vedo threads
in merito... ;-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply

 in merito... ;-)
    Scusate la superficialità... ma andavo di fretta... Io gli ho dato
l'input per iniziare, poi le varie beghe implementative (tipo scegliere le
finestre da chiudere e casi speciali) li lascio al programmatore... Se poi
le domande diventano più specifiche, allora anche le risposte lo diverranno
;-)
    Saluti!


 in merito... ;-)
Eheh ,,, cosě diventi miliardario come Gates e poi fai dei sistemi operativi
bacati !! ^___^
Ciao!! Davide DG

 bacati !! ^___^
Dunque:
  diventare miliardario mi attira molto,
  diventare come Gates un po' meno,
  fare sistemi operativi bacati... non so... se questo mi aiuta a
raggiungere il primo punto allora si può fare... ;-))
Ciao :-)
