mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Componenti

Salve a tutti.Volevo sapere se c'e un programma free per costruire
componenti  tipo il CDK.
grazie.



presuppongo che tu per programma intenda un compilatore. 
free ci sta il personal editio di Delphi altrimenti Lazarus e fpc (Free
pascal compiler).
cia
-- 
Coltiva linux, che tanto windows si pianta da solo!
Linux registered user: 364664 (
http://counter.li.org
)

 ha scritto nel messaggio
news:pan.2004.11.11....@ostialido.it...


 Eagle-Software
no di cose del genere free non ne conosco. ma piuttosto che andare a
spendere soldi su di una cosa del genere io li spenderei su di un buon
manuale che ti insegna come fare i componenti (sempre che tu non lo sappia
gia fare). Dopodichè non ti serviranno piu cdk!
se invece tale strumento ti serve per velocizzare il lavoro (un lavoro che
ti frutta €€€) beh allora valutane l'investimento, tanto prima o poi lo
utilizzerai di nuovo.
Poi se ne trovi di free... beh faccelo sapere!
ciao e buon delphi


 Eagle-Software
Vedi se trovi qualcosa qua:
http://www.torry.net/pages.php?id=481
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:cn2852$jkd$1...@news.newsland.it...


Newsgroup: it.comp.lang.delphi
Titolo: Delphi5 ent e wind2000

Ciao a tutti.. come posso fare per installare delphi5 versione enterprise su
un pc con win2000?
Quando vado per installarlo mi da errore che è in conflitto con il drWatson
di win2000...
Helpme!

 ha scritto nel messaggio
news:iYdd7.8116$2L.2...@news.infostrada.it...

Ciao. Non so come mai ti succede visto che sono riuscito ad installare
Delphi 5 Enetrprise su Windows 2000 server senza akcun problema.

please!
disintalla drWatson !!  of course !!

Installa il Service Pack2 di Win2k.
Saluti,
Alessandro.
-- 
Posted from [194.73.242.6] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.delphi
Titolo: Funzione che ritorna un variant

Ciao a tutti !
Ho questo problema, non sapendo in anticipo cosa ritorni tale funzione
(byte, integer, real, string, ecc...) ogni tanto il programma si pianta
(specialmente so non trova i dati) xchè non so cosa restituire in caso di
dati non trovati.
Non so se mi sono spiegato...
Grazie 1000

 dati non trovati.
Prova con la funzione Null nella unit Variants.
Antonio

Grazie 1000
Niente :)
	Ciao
	MassimoB
 

> o nell'Help di Delfi se cerchi
Aaaaargh!
DELPHI!!! ;)
A

DELPHI!!! ;)
Dai lo so ... eh eh
la fretta fa brutti scherzi ;)
	Ciao
	MassimoB
 

Be... a una variabile byte non posso tornare nil... avevo pensato di fare un
exit senza tornare il valore....
cmq non so :D
Newsgroup: it.comp.lang.delphi
Titolo: Appendere in memo in orizzontale

Nel codice di cui sotto appendo ad un TMemo i seguenti dati:
Arance
Mele
Pere
Banane
Uva
ora vorrei che i dati appaiano in maniera orizzontale:
Arance  Mele  Pere  Banane  Uva
E' possibile?
Grazie per la risposta
Luigi
 memo1.Clear;
     TFrutta.First;
      while not TFrutta.Eof do begin
      memo1.Lines.Add(TFruttaDescrizione.asstring);
      TFrutta.Next;

 ha scritto nel messaggio 
news:48738398$0$40158$4faf...@reader1.news.tin.it...

ADD aggiunge una nuova riga; quindi non devi usare ADD ma devi CONCATENARE 
con il +
Ma DOVE vuoi che appaiano in orizzontale ? in un memo ?
C. 

 Ma DOVE vuoi che appaiano in orizzontale ? in un memo ?
Sì in una Memo,prendendo i valori della lista della tabella TFrutta che sono 
in verticale,per poi inserirli in orizzontale,mi sa che non è possibile.
Luigi 

 Luigi
Certo che č possibile: devi concatenarli come ti e' stato detto.
Ciao
ACSH
-- 
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: pascal script e database

Ciao a tutti, utilizzo REM Objects Pascal Script e dovrei usare le 
classi TADOConnection e TADODataSet all'interno di uno script. Ho 
provato ad utilizzare il tool per l'importazione delle unit ma con 
scarso successo.
Siccome non ho risposta nel ng ufficiale mi chiedevo se qualcuno di icld 
avesse esperienza in materia o sapesse indicarmi un altro componente di 
scripting che abbia la funzionalità di utilizzare le classi ADO.
Grazie in anticipo.
Saluti.
Alex Pileci.

 Saluti.
Pubblica il tuo codice: magari qualcuno riesce ad aiutarti meglio se
vediamo qualche riga e ci indichi cosa NON FA lo script in "quel" preciso
punto.
Ciao
-- 
Morde

 Ciao
Ciao, putroppo non ho problemi nell'esecuzione dello script (non sono 
arrivato a quel punto). Provo ad importare le unit ADODB e ADOInt nel 
tool automatico di Pascal Script che genera i file per utilizzare le 
classi negli script e lì ha gli errori.
Ho provato a postare anche nei ng di RemObjects ma non ho ancora avuto 
risposta, ed ho pensato che magari qualcuno di icld ha già utilizzato 
questa soluzione (o magari qualche altra soluzione di scripting con 
accesso ai db).
Grazie per qualunque informazione.
Saluti.
Alex Pileci.
Newsgroup: it.comp.lang.delphi
Titolo: creare un report... rave? quick?

Buongiorno a tutti...
ho scritto un'applicazione ed avrei il solito impellente bisogno di
creare un report. In precedenza, con Delphi 5, facevo tutto con quick
report, ma ora, Delphi 7, ho visto il rave.
Ho dato un'occhiata alla documentazione ma mi sembra un po' troppo
complesso per i programmi semplici. E' cosiě? 
Consigliate di imbarcarsi nello studio di Rave o tornare ad usare il
vecchio QuickReport?
Grazie e ciao a tutti!
matteo


Open Delphi Manual (
http://groups.yahoo.com/group/delphi_open_manual/
)

Scusate se mi intrometto nella discussione ma anche io ho necessità di
creare un report per la mia applicazione e volevo chiedervi se avevate
qualche punto di riferimento per poter imparare ad usare Rave. Ho provato a
leggere qualcosa dai manuali in rete ma sinceramente non è molto chiaro.
Sapreste aiutarmi in qualche modo?
Grazie in anticipo per qualsiasi risposta
Lela
--------------------------------
Inviato via 
http://usenet.libero.it

 molto chiaro. Sapreste aiutarmi in qualche modo?
Ho letto informazioni sui RAVE Reports nella documentazione ufficiale
(in lingua inglese) che si trova nel "Companion Tools CD" di Delphi e
sul libro di Marco Cantù "Mastering Delphi 7".
Spiegare l'uso dei RAVE Reports può essere un lavoro lungo e laborioso.
Qualche indicazione di massima: a differenza di QuickReport, che si
integrava completamente in Delphi, i RAVE Reports hanno un editor
visuale per la progettazione dei report separato (il Rave Designer);
l'editor si può richiamare facendo clic sul menu [Tools|Rave Designer]
oppure un doppio clic sul componente TRvProject che deve essere
posizionato su un form o su un Data Module per poter caricare un
progetto RAVE. I file di progetto sono prodotti dal Rave Designer e
possono essere caricati (o immagazzinati) nel componente RvProject per
la distribuzione assieme all'applicazione dei report creati.
Oltre al componente RvProject, troviamo altri componenti Rv*Connection
che possono essere agganciati ad un DataSet (ADOTable, TTable, IBTable,
ClientDataSet, ...) che sarà visibile all'interno del Rave Designer per
potervi associare elementi grafici del report il cui testo dovrà
provenire da uno specifico campo, un po' come avviene per i Data
Control.
Gli elementi grafici inseribili nei report sono molti, dalle normali
etichette alle forme geometriche, sino ai barcode.
Alcuni elementi possono essere posti in "mirroring" affinchè rispecchino
l'uno le caratteristiche dell'altro, in modo da compiere meno modifiche
manuali possibile nell'aggiornamento dell'aspetto di un report.
L'argomento è vasto...suggerisco di sperimentare spulciando la
documentazione servendosi di un database di prova e generando qualche
report per verificare le funzionalità del Rave Designer.


Grazie per tutte le informazioni che mi hai dato. Sei stato veramente
gentile e anche di molto aiuto.
bacioni


 wrote:
per ora sto usando quick report, come dicevi tu x i tempi stretti
magari nella prox release proverò i RAVE
grazie 1000 x le informazioni accurate!
ciao,
Matteo
Newsgroup: it.comp.lang.delphi
Titolo: Rilevare la pressione di un Tasto

Salve ragazzi,
ho bisogno di rilevare la pressione del tasto ESC per far compiere al mio
programma
delle operazioni prima di uscire dalla pagina di un KPageControl.
Ho provato a impostare il KeyPreview della Form a True e a gestire l'evento
On Key Press e On Key Down, ma gli eventi On Key purtroppo si verificano
dopo l'evento
On Exit della Pagina del KPageControl.
Io avrei bisogno di rilevare la pressione del tasto o nell'evento On Exit
del KPageControl
o immediatamente prima.
Qualcuno sa dirmi come posso fare ?
Grazie
Donato Di Tullio

 ha scritto nel messaggio
news:OQRdb.186594$R32.6...@news2.tin.it...

Ho trovato da solo la soluzione :
Nella procedura ON EXIT della pagina del KPageControl basta scrivere :
procedure FORM1.tsPagina5Exit(Sender: TObject);
var
  vKey,vPressed:integer;
begin
  inherited;
  // Codice che controlla la Pressione del Tasto ESC
  vKey:=VK_ESCAPE;
  vPressed:=GetAsyncKeyState(vKey);
  vPressed:=vPressed AND $8000;
  if vPressed<>0 THEN
  begin
    // Mio Codice ...
  end;
end;

Newsgroup: it.comp.lang.delphi
Titolo: cancellare un MDB precedentemente aperto

Salve a tutti
non riesco a cancellare dal disco un file Access dopo che è stato aperto, 
letto e chiuso.
Infatti fermando l'applicazione dopo il comando   xxx.Activate:=False
nella cartella rimane il file xxx.LDB che non è cancellabile.
Solo chiudendo l'appicazione il .LDB scompare ed è possibile eliminare il 
.MDB
Evidentemente non basta activate:=false
Che altro serve ?
Grazie di cuore
C. 

 C.
Devi disconnettere AdoConnect, o quello che usi per la connessione al db. 

 Devi disconnettere AdoConnect, o quello che usi per la connessione al db.
Uso una TADOTable direttamente con una connection string parametrica
posto qui alcune righe di codice
xxx.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data 
Source='+ExtractFilePath(Application.ExeName)+'xxx.mdb;Persist Security 
Info=False';
xxx.Active:=True;
while not xxx.eof do begin......
ecc. ecc.
..... alla fine
xxx.Active:=False;
DeleteFile(ExtractFilePath(Application.ExeName)+'xxx.mdb')
e DeleteFile....  ritorna sempre false, il file è bloccato,  e vale quanto 
già detto prima
Ciao
C.

Ho risolto usando ANCHE  una TAdoConnection
Sembrava inutile per una sola tabella, invece...
Grazie comunque
C.
Newsgroup: it.comp.lang.delphi
Titolo: Direct x

Salve a tutti,
Come si generano file *.dxw e *.dxg utilizzati dai componenti delphiX ?
grazie
--
Davide - 
Gna...@wappi.com

>Come si generano file *.dxw e *.dxg utilizzati dai componenti delphiX ?
Se non sbaglio è un formato proprietario, per cui dovresti chiedere al buon
Hori che le ha fatte o cercare da qualche parte. Comunque se non devi
leggerli a run-time o fare altre cose particolari, puoi aggiungere
manualmente ogni immagine al DxImagelist clikkando sull'apposito spazio
nell'Object Inspector.
Ciao !                    {MSX}

 Ciao !                    {MSX}
Trovato su hori homepage ( 
http://www.ingjapan.ne.jp/hori/index-e.html
 ) .


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

Ciao a tutti
Avrei bisogno di una dritta sul componente TreeView.
Ho inserito il suddetto componente in una gestione di un mio programma 
ed ho impostato la sua proprietà MultiSelect a True e funziona 
benissimo. Ma il mio problema è selezionare più Items da codice e non 
farli selezionare dall'utente.
Ho fatto una cosa del genere:
TreeView1.Items[0].Selected := True;
TreeView1.Items[2].Selected := True;
TreeView1.Items[5].Selected := True;
ma solo l'ultima risulta selezionata a video.
Vi ringrazio in anticipo per i vostri consigli.
Ciao
Inviato da 
www.mynewsgate.net



Prova il metodo Select.
Puoi fare: TreeView1.Select([TreeView1.Items[2], TreeView1.Items[3]]);
oppure   
  AList .= TList.Create;
  AList.Add(TreeView1.Items[0]);
  AList.Add(TreeView1.Items[2]);
  AList.Add(TreeView1.Items[3]);
  TreeView1.Select(AList);
Ciao
-- 
"La velocità luce non è sufficiente Comandante Nunziatella, 
dobbiamo passare alla velocità smodata!"
Newsgroup: it.comp.lang.delphi
Titolo: Centralizzare i font in una grossa applicazione

Ciao
Oggi ho un applicazione MDI da 400 forms.
Il programma e' supportato da XP in poi.
Ci sono circa 500 clienti , 60 % con WinXP.
Attualmente i forms sono tutti in Tahoma 8.
mentre le stampe in QuickReport sono tutte in Arial.
vorrei passare sia il  programma che le stampe in SEGOE UI.
Il problema e' che sotto XP questo font non e' presente e viene 
automaticamente
convertito in un font un po' bruttino. ( non e' arial ).
Vorrei avere questa situazione  :
VISTA / WIN7 :
Programma : SEGOE UI Stampe : SEGOE UI
WIN XP :
Programma : Tahoma Stampe : Arial
Vorrei avere a design time in delphi , tutti i forms nativi SEGOE UI.
Vorrei che quando il programma si avvia se sono sotto WinXP switcho i font 
dei forms in Tahoma ? 

 dei forms in Tahoma ?
Come giï¿œ detto: prendi il ttf e lo installi nell'xp del cliente: dopo 
aver modificato i sorgenti e ricompilato, dovrebbero prenderlo ed 
adeguarsi in automatico.
ciao
-- 
Morde

 Installi in xp quel font (credo che sia un TTF).
Credo sia sottoposto a licenza, quindi non dovrebbe essere legale 
ridistribuire quel font, assieme a tutti gli altri introdotti in Windows 
Vista (Calibri, Cambria, ecc.).
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 Vista (Calibri, Cambria, ecc.).
Sure..
Ovviamente dovrï¿œ acquistarne la licenza: lui parlava di un problema con 
un suo software commerciale, io dï¿œ per scontato che si adegui alla 
normativa nel distribuire ogni suo addon. :-)
Ciao
-- 
Morde

 font dei forms in Tahoma ?
All'avvio del tuo programma setti in una variabile globale, oppure una 
classe di configurazione il tipo di piattaforma su cui gira la tua 
applicazione con la chiamata alla funzione "GetVersionEx" in base al 
ritorno ogni volta che apri una form o una stampa devi darla in pasto ad 
una funzine che gira su tutti i componenti che hanno la proprietà "Font" 
(GetPropInfo) e setta il font di conseguenza.
^_Goblin_^
-- 
Ibis et redibis non morieris in bello
http://goblinland.myminicity.com/

esiste qualcosa tipo questo sotto : ?
Application.Font.Name
 := 'SEGOE UI';
con tutti i form :
form.font.parent :=  True:

Mauro Lucchi scriveva il 27/11/2009 :

formalmente ï¿œ corretto. devi provarlo.
hai comperato la licenza di distribuzione del font??
Va che ti teniamo d'occhio.. ;-)
ciao
-- 
Morde

Ciao Marco
due domande :)
1) Dovrei e da chi.. potrei comprare il font SEGOE UI ?
2) non vorrei avere altri files... da installare. posso mettere tutti i 
files dei font come Risorsa nel mio exe ? 

 formalmente ï¿œ corretto. devi provarlo.
Lo dicevo che sono sotto delirio da venerdï¿œ pomeriggio: una volta messo 
il font nel sistema e modificato il riferimento nel form, ï¿œ sufficiente 
che tutti i controlli abbiano la proprietï¿œ ParentFont a true.
ciao
-- 
Morde

 1) Dovrei e da chi.. potrei comprare il font SEGOE UI ?
http://en.wikipedia.org/wiki/Segoe
sembrerebbe sia gratuito...
http://myplace.baboinc.com/php/template_single.php?id=1818
credo che non potrai fare a meno di installarlo nel sistema operativo..
ciao
-- 
Morde
Newsgroup: it.comp.lang.delphi
Titolo: nome del file in variabile

 Devo aprire un file il cui nome č contenuto in una variabile; come 
posso fare?
devo utilizzare sempre l'"assignfile"?
pawer ranger
--- posted by geoForum on 
http://www.delphiedintorni.it

inoltre quando faccio l'"erase(nomefile)" mi da errore, come poosso 
sistemare le cose?


 devo utilizzare sempre l'"assignfile"?
La procedura *AssignFile* ti permette di associare un file esterno ad 
una variabile di tipo *File*; il percorso puň essere scritto in modo 
letterale nel codice, oppure preso da una variabile *string* passata 
come parametro.
Posizionati sull'identificatore *AssignFile* e premi F1 per vedere degli 
esempi di utilizzo dalla /Guida in linea/ di Delphi.
Un buon uso della Guida, per me, č fondamentale nel risolvere i problemi 
iniziali di poco conto...e anche quelli piů avanzati. :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 pawer ranger

Always close a file before erasing it!!
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 sistemare le cose?
Magari indicando che errore ti dà e scrivendo la parte di codice 
(significativa) che contiene la chiamata alla procedura.
Ciao!


Magari indicando che errore ti dà
L' errore é error 32
ma nn riesco in nessun modo a sistemare le cose


 ma nn riesco in nessun modo a sistemare le cose
Il codiceeeeeeeeeeeeeeeeeee! :-)



Non trovo nulla nella guida Aiutatemi sto impazzendo!!!!!!



    reset(aprifileacq);  
   if filesize(aprifileacq)=1 then
    begin
     closefile(aprifileacq);
     erase(aprifileacq);
    end;


     end;
A me funziona correttamente un codice simile a questo, quindi i 
possibili problemi possono essere:
1)
il file che apri in modalità *Reset* è un file particolare che non può 
essere modificato, tantomeno cancellato;
2)
l'errore non viene generato dalla chiamata a *Erase*, ma bensì da 
un'altra delle funzioni dichiarate.


Newsgroup: it.comp.lang.delphi
Titolo: Applicazione Modulare.

Salve ragazzi,
so che l'argomento è trito e ritrito ma vorrei delle risposte chiare a 
una semplice domanda.
Ho un'applicazione creata con le sue form etc... etc...
ora vorrei suddividerla in moduli (tipo: statistiche, ricerche, etc... 
etc...) è sufficiente creare un package dove spostare le form e poi se 
il suddetto package venisse distribuito con l'applicazione le suddette 
form sono presenti altrimenti no?
spero di essere stato chiaro, grazie.


La creazione di package di per se non basta, pero' puoi mettere in
piedi un meccanismo per cui quando devi aprire una form
faiprima un loadpackage() del package corrispondente e poi chiami
una funzione del package per creare la form che ti serve. Se il
package non ce' ovviamente niente form! :)
ciao
Giacomo


quindi se non includessi il package nella distribuzione la form non c'è 
e quindi niente form, con magari messaggio di errore che informa 
l'assenza dello stesso?
grazie giacomo :)
Newsgroup: it.comp.lang.delphi
Titolo: Suggerimento su un libro

Dovendo fare programmazione in delphi che utilizza abbastanza le API di
Win32 mi chiedevo se valesse la pena di acquistare il testo
Tomes Of Delphi: Win32 core api - WIN200 ed - Jhon ayres. Attualmente uso
come rifermento l'ottima "Grande Guida" del mitico Cantu edizione italiana
di Mastering in delphi, ma non e' focalizzato sull'uso delle api di Win32
Il dubbio si aggrava considerando che il testo su cui chiedo consiglio e'
del 2001
Un grazie anticipato per i suggerimenti
Giuseppe

Win32 mi chiedevo se valesse la pena di acquistare il testo[...]
Tutto ciň di cui hai bisogno č ormai su MSDN.

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

Mi pare ti restituiscano delle eccezioni proprietarie...
Prova ad utilizzare dei blocchi 
try .. Except
Ciao
-----Messaggio originale-----
Da: Frunktz [mailto:
clf...@tin.it
] 
Inserito: lunedì 10 febbraio 2003 20.28
Inserito in: delphi
Conversazione: Gestione Errori
Oggetto: Gestione Errori
Ciao a tutti, sapete come gestire gli errori con i componenti Indy? In quelli standard di Delphi c'era on Error, ma in quelli Indy no, c'è qualche sistema?

 Journeying Artificial Xenomorph
-- 
Ciao, Anto', [35, 143, AQ] 
MB C SC 220 CDI Magma Red
Newsgroup: it.comp.lang.delphi
Titolo: Key Generator in Delphi...

Devo distribuire una mia applicazione attraverso un rivenditore,
e vorrei tutelarmi da eventuali violazioni sul diritto di copia.
Anche se di solito questi meccanismi lasciano un po' il tempo che
trovano, vorrei implementare un meccanismo semplice ma
secondo me utile per limitare eventuali danni derivanti da
copie non autorizzate della mia applicazione.
Pensavo ad una funzione
    function KeyGenerator(const Username: string): string;
    var
        ActivationKey: string;
    begin
        ...
        Result := ActivationKey;
    end;
che prendendo in input una stringa alfanumerica "Username"
(il nome utilizzato per registrare il programma), restituisca in
output un codice di attivazione "ActivationKey" del programma stesso.
A questo punto abiliterei il funzionamento del mio programma soltanto
quando il codice di attivazione inserito dall'utente in fase di
registrazione
coincida in modo esatto con il codice (ActivationKey) restituito
dalla mia funzione KeyGenerator.
Ho letto un pochino di Crittografia, chiavi pubbliche e chiavi private, ma
non essendo un esperto cercavo dei saggi consigli, e magari qualche
aiuto concreto su come operare o dove trovare informazioni utili in
termini pratici e non prettamente teorici.
Grazie a tutti.
Riccardo
P.S.
Scusate, forse questo post è un tantino OFF TOPICS ma dovrei
implementare il tutto in Delphi, e non saprei dove chiedere aiuto.

 e vorrei tutelarmi da eventuali violazioni sul diritto di copia.
io uso il componente AVLock Lite. E' facilissimo da installare, e ha anche
il key generator incluso. Lo trovi anche su Torry. La versione free è senza
limitazioni ma ha un piccolo banner pubblicitario quando viene mostrata la
form per l'inserimento del codice sbloccante. La versione completa costa
invece 49$.
ciao!
Newsgroup: it.comp.lang.delphi
Titolo: Pingare un Database SQL Remoto

Salve a tutti.
Ho la necessità, dal mio programma, di sapere se
quando compio delle operazioni il server SQL è
attivo oppure no. Come posso fare a "pingarlo"?
Grazie a tutti.
Caino79

 attivo oppure no. Come posso fare a "pingarlo"?
Per eseguire il PING verso un determinato host, puoi usare il componente 
*TIdIcmpClient* (componenti Indy, pagina "Indy Clients" della Palette) 
il quale possiede una proprietà /Host/ e un metodo /Ping/ che ti 
permettono, rispettivamente, di specificare l'indirizzo o il nome della 
macchina host e di eseguire l'operazione richiesta.
Maggiori informazioni sul componente, le rispettive proprietà e metodi 
citati le trovi nella Guida in linea di Indy.
Ciao! :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 
Innanzitutto grazie per la velocità della risposta, ma mi sono spiegato 
male. Io devo sapere se il PROGRAMMA SQL Server è Attivo sulla macchina
di destinazione.
Grazie ancora.
Caino79

 attivo oppure no. Come posso fare a "pingarlo"?
nei vecchi post, accessibili tramite google-gruppi, trovi un mare di 
risposte a questo problema.
Bye
AS

vedi createtoolhelp32
AS



  ...
  ...
  Try
    ADOCon := TADOConnection.Create(Nil);
    ...
    ...
    ADOCon.Open;
    ADOCon.Close;
  Except
    On e: exception Do Raise;
  End;
  ...
  ...
Ciao.

Mario ha scritto:

Grazie per la risposta. Ho già provato quest'arteficio, ma c'è un 
problema. Nel momento in cui OPEN non riesce a contattare il server SQL 
il programma mi si freeza per alcuni secondi. Per evitare questo ho 
cercato di mettere questa operazione in un thread, me ricevo un errore 
quando cerco di richiamare il "ping" con riportato "Coinitialize non è 
stato chiamato".
Hai soluzioni alla grande attesa?
Grazie,
Caino79.

 Caino79.
Ciao,
il fatto che l'applicativo freeza è dovuto al fatto che la connessione
aspetta lo scadere del timeout. Il messaggio "Coinitialize non è stato
Chiamato" dovresti risolverlo con:
  ActiveX.CoInitialize(Nil);
 
e alla fine
  ActiveX.CoUnInitialize;
Ciao.

 Ciao.
Ottimo, Grazie veramente. Solo una domanda:
Questa operazione che mi hai fatto eseguire, evita solo di farmi vedere 
il messaggio di errore o lo corregge in modo definitivo. Mi spiego:
Non vorrei che il thread continui comunque a generare l'errore non 
facendomelo perņ vedere, e dopo qualche tempo di utilizzo continuato del 
programma questo giunga cmq a un overflow di qualche tipo.
Di nuovo grazie per l'aiuto gią dato.
Caino79.



Normalmente ActiveX.... non lo usi perchč hai dei componenti ActiveX
inseriti in una Form, nel tuo caso non li usi quindi devi fare tutto tu.
L'help di Windows SDK ti spiegherą molto meglio di quello che posso fare
io. 
Ciao.
Newsgroup: it.comp.lang.delphi
Titolo: Ridirezione di un tasto

Salve a tutti!
Se voglio fare in modo che la pressione del tasto "Enter" venga vista come
un "TAB" , come posso fare?
Lo userei all'interno di un DBEdit, in maniera che passi da un campo
all'altro premendo INVIO.
Ciao e grazie,
Gianluca

Forse un .OnEnter, però non ho provato.
Ciao, Davide DG.

 all'altro premendo INVIO.
Nell'OnKeyPress
If Key=#13 then SelectNext(ActiveControl,TRUE,TRUE);
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply

 Gianluca
If your form don't contains a DBGrid:
Put this code into OnKeyPress event of your form:
begin
  if Key = #13 then                          { if it's an enter key }
  begin
      Key := #0;                                 { eat enter key }
      Perform(WM_NEXTDLGCTL, 0, 0);              { move to next control }
  end
end;
This is before ENTER key work like TAB in edit controls
If your form HAVE a DBGrid control, maybe you enjoy more this code:
{ This is the event handler for the FORM's OnKeyPress event! }
{ Este es el manejador de evento de OnKeyPress de tu form }
{ You should also set the Form's KeyPreview property to True }
{ Debes poner la propiedad KeyPreview de la form a true}
begin
  if Key = #13 then                                                 { if it's
an enter key }
    if not (ActiveControl is TDBGrid) then begin       { if not on a TDBGrid }
      Key := #0;                                                        { eat
enter key }
      Perform(WM_NEXTDLGCTL, 0, 0);                 { move to next control }
    end
    else if (ActiveControl is TDBGrid) then                { if it is a
TDBGrid }
      with TDBGrid(ActiveControl) do
        if selectedindex < (fieldcount -1) then             { increment the
field }
          selectedindex := selectedindex +1
        else
          selectedindex := 0;
end;
Remember: property KeyPreview of the form = TRUE
Updated at 05/01/2000
Juan Hellín comments us that the first example works well... except for in
case you use a TMemo, since it doesn't allow you to press
ENTER for append lines...
And... he is right, it is a little uncomfortable. In fact I believe that it is
only ultil when the control is a TEdit or a TDBEdit, so... better we
discriminate against it:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if (Key = #13) then                            { if it's an enter key }
    if (ActiveControl is TEdit) or
       (ActiveControl is TDBEdit) then
    begin
      Key := #0;                                 { eat enter key }
      Perform(WM_NEXTDLGCTL, 0, 0);              { move to next control }
    end
end;






Newsgroup: it.comp.lang.delphi
Titolo: CORSI GRATUITI DI JAVA/ORACLE

                                            4 G.L. SOFTWARE S.R.L.
                                                Viale Monza,196
                                                   20128 Milano
                                                 Tel.02/27080684
4 G.L. Software S.r.l. seleziona giovani con buone conoscenze d'informatica
per un corso gratuito di programmazione Java/Oracle mirato all'inserimento
nel mondo del lavoro.
Un nostro funzionario e' a disposizione per qualsiasi chiarimento in merito.
Il corso iniziera' il 05/02/2001 dalle ore 9:30 alle ore 17:30 da Lunedi' a
Venerdi' e terminera' il 05/04/2001.
Inviare C.V. dettagliato per mail all'indirizzo: 
4gl...@4gl.it
, si prega
di indicare rif: Java.

                                            4 G.L. SOFTWARE S.R.L.
                                                Viale Monza,196
                                                   20128 Milano
                                                 Tel.02/27080684
4 G.L. Software S.r.l. seleziona giovani con buone conoscenze d'informatica
per un corso gratuito di programmazione Java/Oracle mirato all'inserimento
nel mondo del lavoro.
Un nostro funzionario e' a disposizione per qualsiasi chiarimento in merito.
Il corso iniziera' il 12/02/2001 dalle ore 9:30 alle ore 17:30 da Lunedi' a
Venerdi' e terminera' il 12/04/2001.




Newsgroup: it.comp.lang.delphi
Titolo: Font colorati in quickreport

Come posso colorare i font delle righe di un report in base al valore che 
contengono?
Per esempio se la prima riga contiene Domenica devo colorare il font di 
rosso se la seconda riga contiene Lunedi lo devo colorare di blu,se contiene 
Sabato la devo colorare ancora di rosso.
Con il componente DBGrid ci sono riuscito,ma con quickreport no.
Grazie per l'aiuto
Paolo 

Molto probabilmente riesci a risolvere sfruttando l'evendo BeforePrint de 
TQRBand
David

Newsgroup: it.comp.lang.delphi
Titolo: Decomprimere uno zip .......

Come si fa a decomprimere uno zip?
Esiste un componente che comprime o decomprime uno zip?
ciao
Adolfo

 Esiste un componente che comprime o decomprime uno zip?
dai un occhio a
http://ourworld.compuserve.com/homepages/African_Chief/
io li uso e mi trovo benissimo (inoltre sia gli ZIP che LHA/LHZ sono
free e con sorgenti)
ciao
Alex F.
randall...@yahoo.com
Sent via Deja.com
http://www.deja.com/

Newsgroup: it.comp.lang.delphi
Titolo: porta irda

premetto che sono agli inizzi vorrei sapere come comandare da programma una
scheda infrerossi, viene vista come una seriale?
se potete dirmi dove trovare un po di informazioni.
grazie
        caspar



Ciao!
Per quanto ne so dipende da come configuri Win... ad es. sul mio posso
settarla sia come COM3 (e anche in Delphi la uso come seriale) che
come LPT2
bye
 Luca
-----------------------------------------------------------------
La mia pagina dedicata all'elettronica:
--> 
http://www.dentella.it/elettronica
-----------------------------------------------------------------
Newsgroup: it.comp.lang.delphi
Titolo: [ADO] - disconnessione da un database (access)..

 Ho cercato dappertutto nella rete..
ma  nn riesco a trovare una soluzione valida..
come faccio la disconnessione da un database con ADOconnection..
  CNpro.Connected:= False;
  CNpro.Close;
  CNpro.KeepConnection:= False;
nulla risulta sempre connessa..
anche aggiungendo OLE DB Services = -2 alla stringa di connessione..
nn funziona..
idem con  
Application.ProcessMessages;
dopo la chiusura dell'adoconnecion..
non riesco proprio..
aiuto!!
--- posted by geoForum on 
http://www.delphiedintorni.it

 aiuto!!
Quasi sicuramente hai un componente ADO con l'active = true impostato a
design time.
-- 
Morde


no assolutamente
ci sono riuscito..
basta cancellare la connection string del TADOconnectio..
ADOConnection.Connected:= False;
ADOConnection.Close;
ADOConnection.connectiostring:= '';


 ADOConnection.connectiostring:= '';
Insisto con la mia ipotesi: c'è qualche altro componente che utilizza la
connection in modo automatico e te la tiene aperta.
Cancellare una connectionstring ovviamente ha l'effetto di chiudere la
connessione perchè il componente perde il riferimento al database, ma
questo non significa che sia la prassi.
La proprietà per gestire l'on/off della connessione è Connected.
-- 
Morde

 La proprietà per gestire l'on/off della connessione è Connected.
Sono d'accordo al 100%. Io ho usato spesso database Access, e bastava 
settare Connected a False e la connessione veniva terminata.
A questo punto sarebbe interessante sapere come dapippo rilevava che la 
connessione era ancora aperta, forse era lì il problema... magari la 
connessione *sembrava* aperta ma non lo era :)
-- 
Jax

 connessione *sembrava* aperta ma non lo era :)
Aspettando la risposta dell'OP, mi ricordo che anche io ho avuto lo stesso
problema agli inizi... ecco perchè sono andato a colpo sicuro. Ricordo
anche il motivo per cui mi ero dimenticato alcune active accese: volevo
popolare una griglia a design time per dimensionare opportunamente la
larghezza delle collone a mano.
Ciao!
-- 
Morde
Newsgroup: it.comp.lang.delphi
Titolo: Creare una nuova origine dati ODBC

Ciao a tutti
    qualcuno sa se esistono librerie delphi per poter creare (soprattutto) e 
gestire una nuova sorgente dati odbc a runtime?
    Saluti,
    Antonio 


Trovata in giro su Internet, vedi se ti puo' aiutare
come base di partenza:
unit ODBCUnit;
interface
uses
  Windows, Dialogs;
const
  ODBC_ADD_DSN = 1; // Add a new data source.
  ODBC_CONFIG_DSN = 2; // Modify an existing data source.
  ODBC_REMOVE_DSN = 3; // Remove an existing data source.
  ODBC_ADD_SYS_DSN = 4; // Add a new system data source.
  ODBC_CONFIG_SYS_DSN = 5; // Modify an existing system data source.
  ODBC_REMOVE_SYS_DSN = 6; // Remove an existing system data source.
function SQLConfigDataSource( hwndParent: hwnd; fRequest: Word;
         lpszDriver: PChar; lpszAttributes: PChar):
                              Boolean; stdcall; external 'ODBCcp32.dll'
index 6;
function ODBCAddDSN(Request: Word; Driver: String; Attributes: String):
boolean;
implementation
//**************************************************************************
****
function ODBCAddDSN(Request: Word; Driver: String; Attributes: String):
boolean;
var
  hwndParent : integer;
begin
  result := FALSE;
  hwndParent := 0; // hide configuration window
  if (SQLConfigDataSource( hwndParent, Request, PChar(Driver),
PChar(Attributes))) then
    result := TRUE;
end;
Ciao
-- 
ACSH
[TurboDelphi]
Chi fa da se', fatica il doppio 

Grazie, č stata di ottimo aiuto. Non conoscevo la libreria 
SQLConfigDataSource.
Molto interessante (e utile). Grazie ancora

Newsgroup: it.comp.lang.delphi
Titolo: voci su Menu a RunTime e NomiFinestre

Su un'applicativo MDI vorrei, al click di una data voce del menu,
aggiungere una nuova voce ad un Menu esistente, ed aggiungere
il nome della Finestra aperta.
In pratica quello che fa Delphi nella voce Windows.
Ho provato con le Azioni (ma non c'e' niente che fa al caso) e
con il codice sotto , ma senza ottenere il risultato cercato.
grazie Maurizio
mi spiego meglio : dato un menu creato con l'Editor di Delphi
Voce1  Voce2  Voce3
A                         C
B                         D
al click su Voce1 -> a vorrei creare su Voce2 la nuova
voce FinestraA , come sotto
Voce1  Voce2           Voce3
A           FinestraA       C
B                                 D
procedure Tfrm_Base.Articoli1Click(Sender: TObject);
var NuovaVoce,Item:TMenuItem;
    Posizione:Integer;
begin
 // 1 - questo mi pone la voce prova dopo Voce2 e non all'interno
 NuovaVoce:=TMenuItem.Create(Self);
 Posizione:=MenuBase.Items.IndexOf(Voce2);
 NuovaVoce.Caption:='Prova';
 MenuBase.Items.Insert(Posizione,NuovaVoce);
 //2 - questo mi pone test sotto Prova
 Item:=TMenuItem.Create(Self);
 Item.Caption:='test';
 NuovaVoce.Insert(NuovaVoce.Count,Item);
end; 

[......... ommetto..]
ho risolto cosi'
 NuovaVoce:=TMenuItem.Create(Self);
 NuovaVoce.Caption:='Prova';
 Voce21.Insert(NuovaVoce.Count,NuovaVoce);
Newsgroup: it.comp.lang.delphi
Titolo: [OT][d5][d6] masterizzare un DVD da delphi

ciao a tutti, riformulo il problema:
-ho 4 filmati provenienti da 4 telecamere (di durata max 20 secondi l'uno)
-ho un filmato completo di 15 minuti tagliato in modo da poter concatenare 
in alcuni punti i 4 filmati precedentemente acquisiti
come posso fare per fare in modo che AUTOMATICAMENTE venga generato un Video 
DVD con menů preconfigurato e video concatenato???
avete un idea di quali software sono interfacciabili anche da delphi via 
OLE??
Simone 

"Simone P" ha scritto nel messaggio
{cut}
Prova a vedere Nero SDK
Ciao,
Gianluca. 

grandioso... grazie
Simo 

sai dove trovare qualche esempio scritto in delphi per interfacciarlo??
Simo 

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

 ha scritto nel 
messaggio news:cmki1v$o25$1...@news.newsland.it...

Newsgroup: it.comp.lang.delphi
Titolo: Rave Reports Errore "No Datalink drivers..."

Ciao.
Ho questo problema facendo l'execute dal componente TRvProject di un progetto fatto con rave contenente un Data Object -> DataBase, con connessione ADO a un databbase access, un Data Object -> Driver Data View e dei Data Text collegati con il Data Driver View mi da il seguente errore:
"No DataLink drivers have been loaded. Use the DataLinkADO.RVD driver file for the Rave server/IDE or include the unit RvDLADO for applications."
Se l'execute lo faccio dal Rave (Execute Project) mi funziona perfettamente e mi mostra di dati contenuti nel database.
Ho provato a includere il file RvDLADO.hpp nel progetto in borland ma mi da sempre lo stesso errore.
Devo includere qualche file in rave o altro?
Se qualcuno sa come potrei risolvere lo ringrazio tanto, ho finito il programma e ora non risco a creare le pagine di stampa :).
Grazie, ciao...
-- 
gazzoni 
------------------------------------------------------------------------
View this thread: 
http://www.itsistemi.net/viewtopic-813893.html
Inviato via 
http://www.itsistemi.net

Up..
Non riesco neanche ad installare Crystal Report in borland developer studio, non riesco a importare l'activex Crystl32.OCX, non capisco come funziona l'aggiunta dei componenti.
Sono proprio fermo... :(

Newsgroup: it.comp.lang.delphi
Titolo: listView e files...

Problemi con le list view..
Sto creando una listview ottenuta da file.. io vorrei creare il
singolo elemento della listview con il nome del file ma questo
risulta essere troppo lungo (c:\documenti\prospetti\allegati\pippo.txt)
io vorrei che nella lista compaia solo pippo.txt, così solo per semplicità,
però vorrei tenere il perconso completo, ho pensato allora di buttarlo nelle
Hints
come suggerimento..
il problemi sono questi..
come faccio a conoscere l'estensione di un file (sono sempre gli ultimi 3
caratteri vero??)
come faccio a ottenere solo il file (es. pippo.txt senza
c:\documenti\prospetti\allegati\)
potreste aiutarmi.. sono un programmatore C il Pascal lo usi solo da qualche
mese..
Grazie a chiunque voglia rispondermi..
--
Posted from 
laguna.tiscalinet.it
 [195.130.224.86] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:LOBBJOPCEFKFDECGJ...@tiscalinet.it...


Ok questo e OK..
il problema è che con il C io vede le stringhe come array di caratteri
quindi per rubare gli ultimi caratteri io farei grezzamente proprio..
 cont=stringlenght(stringa)
 stringa2[0]=stringa[cont-1]
 stringa2[1]=stringa[cont-2]
 stringa2[2]=stringa[cont-3]
 stringa2[3]='\0';
//stringa2 contiene l'estenzione..
per il file andrei a ritroso nella stringa prendendo tutti i caratteri sino
al "\"
questo perche il C considera le stinghe come array di carattere.
mentre il delphi come considera le stringe ci sono analogie o è unaltra
cosa??


"Daniele Crescimbeni"
| come faccio a conoscere l'estensione di un file (sono sempre gli ultimi 3
| caratteri vero??)
ExtractFileExt
| come faccio a ottenere solo il file (es. pippo.txt senza
| c:\documenti\prospetti\allegati\)
ExtractFileName
benvenuto in un RAD! ;)
Ciao,
Alan Solo

 c:\documenti\prospetti\allegati\)
    Esiste la funzione ExtractFileName... Dai un'occhiata all' Help di
Delphi e capirai come funziona..
_________________________________
Gian Luca Dalla Torre
E - Mail: 
gianluca....@casteo.net
_________________________________

Newsgroup: it.comp.lang.delphi
Titolo: perchè non mi appare il menù???

Sto realizzando una applicazione e sono arrivato già a buon punto, devo solo
inserire un classico main menu per mettere alcune funzioni collaterali.
Qui casca l'asino..... il menù che ho preparato non ne vuole sapere essere
visualizzato, se lancio l'applicativo non viene visualizzato.
Se creo un nuovo form risco tranquillamente a fare apparite il
menù......boh!!
Però io devo fare comparite il menù nel vecchio form.
Chi mi sa aiutare....?
Kris

 ha scritto nel messaggio
news:b6v1lu$tgf$1...@lacerta.tiscalinet.it...


 Perň io devo fare comparite il menů nel vecchio form.
Puň dipendere dal BorderStyle del form.
Ciao.
Gianluca.
Newsgroup: it.comp.lang.delphi
Titolo: Algoritmo di Contrasto Immagini

Dove è possibile recuperare degli algoritmi sul contrato per elaborare delle
immagini.
Grazie Peppe

Peppe wrote:

Nel numero 53 di Io Programmo, nella sezione dedicata a Delphi, 
descrivevano in maniera essenziale come fare. Se ti interessa il cadice 
sorgente fammi sapere ke provvederò a spedirtelo.
Enri'S
-- 
                        --- Linux Powered ---

 ha scritto nel messaggio
news:QjR88.39742$om6.1...@news1.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: Chiamare proprietà da "nome"

in delphi esiste qualcosa che mi permetta di settare o ottenere il valore di
una proprieta dal nome?
es;   qualcosachechiami(oggetto,'proprietā_nome')
grazie

 propietą per nome.
il fatto ch enon ho i sorgenti della vcl .Ho la versione personal free

 altrimenti non le puoi cambiare.
grazie :)))

end;
Tutto ok, pero' da D5 in poi c'e' anche la + comoda
GetPropertyValue(oggetto, 'nome proprieta') (restituisce un Variant)
SetPropertyValue(oggetto,  'nome proprieta', valore come Variant)
Non sono sicuro sulla sintassi
Ciao
--
Piero Bonanno
bop...@libero.it
pie...@tiscalinet.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

 Ciao
Un Saluto
oggi č lunedě che p.!



Pardon, pensavo che avessi usato le "vecchie" procedure in cui si
doveva prima ottenere PPropInfo. Quelle che volevo scrivere io erano
quelle che hai scritto tu :)
Ciao
--
Piero Bonanno
bop...@libero.it
pie...@tiscalinet.it
bpie...@hotmail.com

Newsgroup: it.comp.lang.delphi
Titolo: [d5] cancellare un file in esecuzione

Ciao a tutti, tempo fa avevo trovato un post in cui si poteva sostituire un 
file mentre era in esecuzione, eseguendo delle operazioni (se non ricordo 
male) tra i processi in corso... avrei bisogno di usarlo per fare un utility 
di update della mia applicazione, per� ho necessit� di farlo a runtime
Simone 

 di update della mia applicazione, perï¿œ ho necessitï¿œ di farlo a runtime
Innanzitutto chiariamoci le idee: fare un update runtime non significa 
che tu debba "cancellare un file in esecuzione" come da subject.
Il meccanismo degli update automatici ï¿œ stato giï¿œ discusso sul ng, 
basta che cerchi su ggroups. Oppure potresti anche scaricare i sorgenti 
di firefox e analizzare come fa quando ti chiede di riavviarlo per fare 
un update.
Il concetto dovrebbe basarsi sulla chiusura del programma principale, 
ma prima che esso si chiuda lancia un altro programma che provvede, una 
volta in esecuzione, a sostituire l'exe del vecchio programma appena 
terminato con quello aggiornato.
Cerca anche in google e troverai materiale, tra l'altro c'ï¿œ un articolo 
sul blog di cantï¿œ che descrive un impiego di questa tecnica.
-- 
Morde

Ok grazie... al momento l'avevo risolto lanciando un bat che attendeva un 
tasto e nel frattempo chiudevo l'applicazione... perï¿œ non mi piaceva 
tantissimo
Simone 

 tantissimo
Dai un'occhiata ai sorgenti di della IDE di Lazarus che dopo una 
ricompilazione fa proprio questo, ovvero rilancia sï¿œ stesso. Rispetto ai 
sorgenti di Firefox che consigliava Morde hai il vantaggio che Lazarus ï¿œ 
object pascal ;)
Antonio

ho trovato questo:
per� non ho capito cosa fa
function ExecAndWait(const Filename, Params: string; WindowState:
word): boolean;
var
  proc_info: TProcessInformation;
  startinfo: TStartupInfo;
  Command: string;
begin
  Command := '"' + Filename + '" ' + Params;
  FillChar(proc_info, sizeof(TProcessInformation), 0);
  FillChar(startinfo, sizeof(TStartupInfo), 0);
  startinfo.cb := sizeof(TStartupInfo);
  Result := CreateProcess(nil, PChar(Command), nil,
    nil, false, CREATE_DEFAULT_ERROR_MODE
    + NORMAL_PRIORITY_CLASS, nil, nil, startinfo,
    proc_info);
  if Result then
  begin
    WaitForSingleObject(proc_info.hProcess, INFINITE);
    CloseHandle(proc_info.hProcess);
    CloseHandle(proc_info.hThread);
  end;
end;

 word): boolean;
Sei fuori strada: questo codice lancia un programma e aspetta la sua 
chiusura.
Perchï¿œ non provi a seguire i nostri consigli e *cerchi di capire in che 
modo puoi risolvere* piuttosto che concentrarti sul capire cosa fa un 
pezzo di codice qualsiasi preso chissï¿œ dove?
-- 
Morde

 pezzo di codice qualsiasi preso chissï¿œ dove?
In particolare la unit lazarus.pp e main.pp che contiene questo il 
metodo di questa classe:
*procedure TMainIDE.DoRestart;*
Antonio

ok grazie

 Antonio
Newsgroup: it.comp.lang.delphi
Titolo: Linea in un popupmenu

Ciao a tutti,
come faccio a inserire una linea orizzontale nel mio PopupMenu?
Infatti "nbBarBreak" è verticale?!?

 ha scritto nel messaggio
news:cMIS9.92558$R45.4...@news2.tin.it...


 ha scritto nel messaggio
news:loJS9.92562$Ou4.2...@twister2.libero.it...


 ha scritto nel messaggio
news:CPRS9.75058$Q%4.23...@news1.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: Come trovo l'handle di winzip?

Grazie per i consigli ma non trovo l'handle di winzip. Ho provato con
WinSight ma non ci ho capito nulla.

WinSight ma non ci ho capito nulla.
Che intendi per "l'handle di winzip" ?
L'handle del processo ?
Se e' questo e' abbastanza facile da trovare.
Dimmi se ho capito bene. 
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
--------------------------------------------------------------
"Partire e' un po' morire e morire e' partire un po' troppo !"
--------------------------------------------------------------

 ha scritto nel messaggio
news:8o0b2s$c4u$1...@nslave1.tin.it...


L'handle del processo ?
Se ha parlato di WinSight penso facesse riferimento alla finestra principale
di Winzip!
Bye!
--
- Carlo -

 WinSight ma non ci ho capito nulla.
Ciao,
allora la funzione che ti serve è la FindWindow. Se parli di winsight
immagino e di handle
immagino che tu conosca come si usa questa funzione :)
Per trovare l'handle di una specificata finestra tu ne devi conoscere il
nome della classe e/o il
titolo (la caption)
Di solito conoscere tutte e 2 significa aumentare la probabilità di aver
trovato l'handle giusto.
Quindi ricava il nome della classe (GetClassName) dall'handle della finestra
trovato con il nome
della finestra e poi usa queste informazioni.
Esempio (meglio... visto che non mi sono espresso bene.... :p ) :
var H : handle;
     classname : array[0..255] of char;
WinZipHandle : Handle;
H := FindWindow (nil,'Winzip Version 2.1 ecc ecc');
  // non uso il winzip quindi non so cosa abbia come titolo.
// Da qui poi ricavi il nome della classe :
 GetClassName (H, classname, sizeof(classname)-1);
{ A questo punto conosci il nome della classe che, di norma, non varia mai
(mentre spesso
varia quello della finestra... per dirti ad esempio, che file è aperto).
Questa era un'operazione preliminare... Ora utilizzi queste informazioni per
trovare la finestra
dal nome della classe con eventualmente il nome della finestra (se sei
sicuro che non cambia).}
WinZipHandle := FindWindow (ClassName, nil);
Ok.... spero di averti chiarito un po' le idee :)
Ciao!! Davide DG

di Winzip!
???
Sotto Windows non esiste alcun concetto di "finestra principale".
Vuoi forse dire, la finestra che viene creata dal thread primario ?


Vuoi forse dire, la finestra che viene creata dal thread primario ?
Avevi capito che intendevo quella....ti sei già dimenticato tutta la
discussione fatta su I.C.Programmare.Win32?
La ho chiamata a lungo (magari erroneamente) Main Window...
Ola!
--
- Carlo -

La ho chiamata a lungo (magari erroneamente) Main Window...
Sinceramente non ricordo tale discussione :( 


Sinceramente non ricordo tale discussione
"Ottenere l'handle della finestra principale", e il nome al subject lo dasti
proprio tu! :)


proprio tu! :)
Davvero ? Fu allora che capi' che non c'era nessuna finestra
principale, forse ;)
