mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Disabilitare i pulsanti standard di una window + esecuzione automatica

Ciao a tutti ho due domande.
1) Voglio realizzare un'applicazione, diciamo MYAPP, la cui
terminazione deve essere possibile solo premendo un generico pulsante
Button1 sul form MA NON premendo il classico pulsante 'X' standard in
alto a destra della finestra. In altre parole, vorrei poter
disabilitare il pulsante 'X'. Come fare?
2) Supponiamo che io predisponga l'avvio automatico di MYAPP al momento
del login.
Non e' difficile farlo: e' sufficiente seguire per esempio le
indicazioni fornite qui:
http://groups.google.it/group/it.comp.lang.delphi/browse_thread/thread/b83cf5c19cfd8a57/a57b6d59a7547c4e?lnk=gst&q=esecuzione+automatica&rnum=4#a57b6d59a7547c4e
Ora la mia domanda e': chi provvede a chiudere le applicazioni avviate
automaticamente?
Il sistema operativo al momento del logoff? Oppure, per quanto riguarda
MYAPP, devo essere io a preoccuparmi di disporne la chiusura al momento
del logoff? E se e' cosi', come fare?
Ciao e grazie a tutti

 automaticamente?
Se il sistema è condiviso tra più utenti, le applicazioni di un utente
rimangono aperte, seppure questo faccia un log off e un altro utente si
connetta.  Se non è condiviso, allora gli unici a rimanere in piedi sono i
servizi, tra una sessione utente e l'altra.  In tutti i casi, le
applicazioni ricevono un messaggio di chiusura della sessione Windows, se
il sistema viene spento o riavviato, a meno dei processi senza finestre
che vengono brutalmente "killati".
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 disabilitare il pulsante 'X'. Come fare?
Nel OnCreate della form:
EnableMenuItem( GetSystemMenu( handle, False ),
                  SC_CLOSE,
                  MF_BYCOMMAND or MF_GRAYED );
Ciao
-- 
ACSH
[D4]
Chi fa da se', fatica il doppio

OK grazie mille a tutti ciao!
Newsgroup: it.comp.lang.delphi
Titolo: try...except

Scusate la banalità, ma non ne vengo fuori:
procedure TForm1.Button3Click(Sender: TObject);
begin
 try
  Reset(F);
 except
  on EInOutError do
   begin
    Application.MessageBox('Errore','File inesistente');
   end;
 end;
end;
Reset dovrebbe aprire il file assegnato ad F, io ho volutamente spostato 
il file in modo da provocare l'errore EInOutError, però invece che 
eseguire il codice incluso in except continua a darmi l'errore e il 
programma si blocca.
E' evidente che non ho ancora capito come funziona try...except... devo 
forse dichiarare qualcosa nella sezione Type?
--- posted by geoForum on 
http://www.delphiedintorni.it


Lancia l'applicativo non dall'IDE di delphi...e vedrai che esgue l'except :)
E' normale, l'ide scatena l'eccezione :) (si può evitare , ma non ricordo
come)
Ciao!

Ciao!
Mi ero perso per una stupidata... meglio cosi!
Grazie mille.
Ciao!


 --- posted by geoForum on 
http://www.delphiedintorni.it
Per evitare l'eccezione devi andare in tools -> Debugger Options -> 
Language Exceptions. Se togli la spunta su "stop on delphi exceptions" 
il compilatore non si fermerà più su NESSUN errore. Altrimenti puoi 
specificare dei singoli errori da non visualizzare più.
Kayn

Newsgroup: it.comp.lang.delphi
Titolo: blockwrite in win2000

ho dei problemi con il blockwrite, perchè pur copiando e incollando il
codice dell'esempio della borland, mi da un errore di i/o 103.
Non vorrei che win2000 mi rompesse le scatole per la creazione di files in
questo modo, però uso l'account dell'amministratore del sistema (il computer
lo uso solo io) e non dovrebbe farmi problemi
Posto i lcodice, magari ho sbagliato proprio quello ...
AssignFile(FromF, nome_file);
    Reset(FromF, 1); { Record size = 1 }
    AssignFile(ToF, install_path+'\'+nome_file); { Open output file }
    totale := filesize(fromf);
    barra.max := totale;
    repeat
        BlockRead(FromF, Buf, SizeOf(Buf), NumRead);
        BlockWrite(ToF, Buf, NumRead, NumWritten);
        barra.position := filesize(tof);
    until (NumRead = 0) or (NumWritten <> NumRead);
    CloseFile(FromF);
    CloseFile(ToF);
ciao

     AssignFile(ToF, install_path+'\'+nome_file); { Open output file }
qui manca: rewrite (ToF)
ed e' a posto.
Ciao, Sandro

     AssignFile(ToF, install_path+'\'+nome_file); { Open output file }
ti sei dimenticato di aprire il file in scrittura!!
Aggiungi: Rewrite (ToF,1) e sei a posto.
Ciao, Sandro

 ha scritto nel messaggio
news:9kuad8$6o2eu$1...@ID-43509.news.dfncis.de...

oooops devo aver cancelato la riga dopo l'incollata!
Grazie mille

 ha scritto nel messaggio
news:PLxc7.4117$JY1.2...@news.infostrada.it...

credo che il file debba esistere. prova con un createfilr prima
dell'assignfile.
ciao
Giuliano
Newsgroup: it.comp.lang.delphi
Titolo: File not found

Ho una unit utilizzata da un'applicazione che ho dovuto ricompilare per la 
quale ricevo un messaggio di errore "File not found: Globals.dcu".
La cartella di Globals.dcu è indicata nel Browsing path in 
Tools/Options/Library, ma per compilare ho visto che devo invece indicarla 
nel Search path delle Project/Options.
Ma non è un pò strano ?
 
 
---
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus
 
 

 Ma non è un pò strano ?
 
Se non ricordo male il Browsing Path serve al debugger per trovare i file
sorgenti, mentre in compilazione usa il Search Path.
Questo serve cosi' puoi mettere i .dcu nel search path per avere minor
tempo di compilazione ma poter comunque accedere ai sorgenti mentre
debugghi.
 
ciao
Giacomo

Newsgroup: it.comp.lang.delphi
Titolo: Riuscito Numero Allegati

Ho trovato l'errore per quanto riguardava la ricerca degli allegati ma il
problema sussiste nel senso che una volta che li trova e li provo a salvare
mi da errore nel salvataggio proprio quando faccio :
IdAttachment.FileName := ''+MioFile+'';
            IdAttachment.SaveToFile(IdAttachment.FileName);



Scusa, non per essere scortese, ma che bisogno c'era di aprire un
nuovo thread?
-- 
"La velocità luce non è sufficiente Comandante Nunziatella, 
dobbiamo passare alla velocità smodata!"

Anotnio:
1) risolto COME?
2) QUALE ERRORE?
A


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

Newsgroup: it.comp.lang.delphi
Titolo: Chiedo l'aiuto del pubblico...(Copyright @2000 "Chi vuol essere miliardario")

Ho bisogno di estrarre dai files DBX tutti gli indirizzi emails dei campi
Da: A: CC: BCC:.....ma non so come aprire questi files...qualcuno ha gią
realizzato un'applicazione del genere? Il mio scopo e salvarmi in un file
(TXT) tutte le emails dentro il mio outlook.....chi mi puņ aiutare?
Confido nelle vostre risposte a risentirci, grazie.

 (TXT) tutte le emails dentro il mio outlook.....chi mi può aiutare?
strumenti->rubrica->file->esporta.
--
Consonni Davide
davidec...@virgilio.it

 > (TXT) tutte le emails dentro il mio outlook.....chi mi puņ aiutare?


 ha scritto nel messaggio
news:pyhB7.81902$1H1.8...@news.infostrada.it...


cerca i file dbx che contengono tutte le e-mail di un'account.
--
Consonni Davide
davidec...@virgilio.it

Newsgroup: it.comp.lang.delphi
Titolo: Inizio Oggi!! ho detto tutto:-))

qualcuno può gentilmente indicarmi dove reperire i primi sorgenti per
Delphi??
i primi nel senso .. che inizio dai più semplici logicamente ..
Grazie..

 wrote in message
w2ne6.45174$L94.5...@twister2.tin.it...

Beh la cosa più semplice è un buon manuale alla mano (quello fornito con
delphi  va bene) e gli esempi installati con l'installazione di delphi
stesso.
Buon Inizio!!!
Ciao
Simone

 ha scritto nel messaggio
news:95dvu0$qpj$1...@nread0.inwind.it...


Newsgroup: it.comp.lang.delphi
Titolo: righe colorate sul richedit

Come si può cambiare il colore di una riga sul richedit?

Prova così:
RichEdit1.SelAttributes.Color:=clRed;
richedit1.Lines.add('Riga di colore rosso);
Newsgroup: it.comp.lang.delphi
Titolo: [TMediaPlayer]dimensione finestra di riproduzione

assegnando alla property display un oggetto panel, succede che al momento di
riprodurre un file di tipo video, questo non assume le dimensioni dello
stesso panel, ma bensi' delle dimensioni predefinite, io vorrei invece che
il video prendesse le dimensioni del panel. aiuti?
grazie mille e buon ferragosto
--
Ciao
Gianfranco Marchese
e-mail dgruma@NOPUBBLICITA'
tin.it
 (Da togliere NOPUBBLICITA' se vuoi
rispondermi in privato)
sito internet personale: 
http://www.turbo-pascal.cjb.net
  Tutto sul Turbo
Pascal  1.5

.
.
 MediaAVi.open;
 MediaAVi.display:=panel1;
 MediaAVi.DisplayRect:=Panel1.ClientRect;
 MediaAVi.PLAY;
.
.
con questo esempio visualizzi il file avi (nel mio caso è un divx)
stretchato su panel1
Simo
Newsgroup: it.comp.lang.delphi
Titolo: Passaggio parametri URL => OCX

Salve a tutti,
mi trovo a dover risolvere un questito al quale ancora non sono riuscito a
trovare soluzione. Ho elaborato un ocx che dovra' essere richiamato da una
pagina asp.
Fin qui tutto ok!
Quello che mi serve e' la possibilita' di passare dei parametri al mio ocx
mediante l'url del browser. In pratica vorrei realizzare qualcosa del
genere:
c:\test_ocx\project.asp?var1=1234?var2=987
con questo url che richiama la pagina project.asp (che a sua volta richiama
il mio ocx) mi deve permettere di passare due parametri che poi devo
acquisire direttamente nel'ocx.
So che si puo' fare perche' l'ho gia visto realizzato da un'altra parte, ma
personalmente non sono riuscito a realizzare nulla di funzionante.
I miei dubbi principali sono:
1) Come deve essere costruito il file asp in modo che mi accetti due
variabili nell'url?
2) Come faccio a rileggere questi dati dal delphi?
Grazie per la pazienza di aver letto fino qui, e soprattutto a chi sapra'
aiutarmi!
Sprinkler
spri...@email.it

aiutarmi!
spero di essere stato chiaro e di non aver commesso troppi errori
	Ciao
	MassimoB
 

 ha scritto nel messaggio
news:cCx9c.97359$FJ6.3...@twister1.libero.it...


 ha scritto nel messaggio
news:cCx9c.97359$FJ6.3...@twister1.libero.it...


parte della tua descrizione.
fin dove è ok?
 Ciao
	MassimoB
 

 ha scritto nel messaggio
news:FEvec.123836$FJ6.4...@twister1.libero.it...


Sprinkler
	Ciao
	MassimoB
 

 ha scritto nel messaggio
news:UUvec.121576$Kc3.4...@twister2.libero.it...


questo punto... ;-P
ci perdoneranno ... anche perchè in un certo modo con
delphi lato web è utile sapere ciò di cui parliamo :)
	Ciao
	MassimoB
 

 ha scritto nel messaggio
news:tvEec.122313$Kc3.4...@twister2.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: ...e ancora socket

Se un mio server socket riceve una chiamata da parte di un altro computer, posso "girare" questa chiamata ad 
un altro server? Mi spiego meglio... sul form main della mia applicazione ho inserito un oggetto server che riceve 
la chiamata e tramite l'evento OnAccept chiedo all'utente se vuole o meno accettare questa chiamata. Se l'utente 
dice "sì " apro l'altra mia form sulla quale dovrò gestire la chat (e siamo sempre lì)... ma come posso trasferire la 
chiamata da una parte all'altra? Ho provato ad aprire l'altra form e mettere in stato di attesa l'altro oggetto server ma
ovvimante appena chiudo il primo la connessione con il client cade...e se non lo chiudo la chiamata non può
proseguire!!! 
Ri-grazie a tutti.... ho quasi finito di spulciare pezzo per pezzo tutto il delphi.. Giuro che tra un po' sarò in grado di
autogestirmi !!! :)=
-- 
Posted from IDENT:qmailr@[217.57.169.195] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

proseguire!!! 
Cioe' fammi capire.
Hai un server in ascolto.  A questo server si connette un client.
A questo punto, i due possono gia' scambiarsi informazioni.
Perche' hai due componenti Server ?
A fronte di 1 connessione ci deve essere 1 oggetto Server (sul server)
e 1 oggetto Client (sul client).  La finestra dovrebbe essere solo
un'interfaccia che utilizza questi componenti.
--
Walkie...@Libero.It (ICQ# 8143647)
Newsgroup: it.comp.lang.delphi
Titolo: Edit dei campi in una DBgrid

Ciao a tutti,
	durante la modifica dei campi in una DBgrid ho bisogno di controllare i 
caratteri inseriti dall'utente.
Per farlo uso l'evento OnKeyPress della DBGrid e va bene, il mio 
problema è che nei campi di una colonna particolare l'utente può 
inserire un certo carattere una sola volta.
Dove trovo l'edit (perchè penso sia un campo TEdit) in cui vengono 
inseriti temporaneamente i caratteri prima di essere copiati su DB, in 
modo da controllare che il carattere non sia già stato inserito?
Grazie,
Daniele

BluDes ha scritto:

Io lavorerei sull'evento /OnValidate/ del campo interessato (rendendolo 
"persistente" attraverso il Field Editor): in questo modo, quel tipo di 
verifica è riproducibile automaticamente qualsiasi sia il controllo 
visuale associato al campo, nella stessa maschera o nell'intera 
applicazione (se il DataSet si trova in un DataModule e viene utilizzato 
da più Form).
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

   Marco.
Senza offesa (nel senso di non ingiuriarmi per questo :-) ), ma non ho 
capito una cippalippa...
Non trovo nessun evento OnValidate... mi sa che dovrai spiegarmelo passo 
passo, se avrai la pazienza.
Grazie.
Daniele

 passo, se avrai la pazienza.
Fai doppio clic sul DataSet (tabella, query, ...) a cui la griglia è 
collegata attraverso il componente *TDataSource*: così attivi il "Field 
Editor".
Fai clic con il tasto destro nella finestra del Field Editor e seleziona 
la voce di menu "Add fields..." oppure "Add all fields..." per rendere 
la configurazione dei campi esistenti e le loro proprietà "persistenti" 
(poiché non saranno più generate dinamicamente da Delphi, ma caricate 
dal DFM).
Ciascun campo può essere selezionato nel Field Editor ed è possibile 
modificarne proprietà di formattazione, descrizione e altro ancora, ivi 
compresa la possibilità di agganciare degli eventi, tra cui /OnValidate/.
All'interno di questo evento, inserisci il codice che consente di 
valutare, prendendo il valore del campo, se questo è accettabile oppure 
no in base ai canoni che hai stabilito.
L'evento verrà richiamato per qualsiasi tentativo di modifica del campo, 
da codice o da controlli visuali "data aware".
Mi dispiace non poter essere più specifico, ma non ho la possibilità di 
eseguire Delphi in questo momento. :-|


 
No no, anzi, grazie mille!
Mi hai aperto le porte ad un nuovo mondo che non avevo ancora esplorato.
Daniele
Newsgroup: it.comp.lang.delphi
Titolo: Inserimento dati (Record file)

Salve sto sperimentando con i file record,
volevo sapere quale soluzione si adotta per
fare un inserimento di dati in nu record, ad es..:
#1  121, Mario
#2  128,Antonio
#3  136,Sergio
#4  234,Franco
#5  355,Giancarlo
ora vorrei inserire tra il #2-#3 questo  233,Tiziano,
il risultato sarebbe:
#1  121, Mario
#2  128,Antonio
#3  233,Tiziano
#4  136,Sergio
#5  234,Franco
#6  355,Giancarlo
come dovrei fare ???
Non devo ripetere che sono novizo e sto imparando piano
piano.
Gian

 come dovrei fare ???
Apri tu file, uno legge l'altro scrive, 
leggi fino a 2 scrivi fino a 2
Scrivi 233,Tiziano,
Leggi dal 3 alla fine e scrivi quello che leggi.
In alternativa puoi utilizzare un solo file ma devi stare attento a non
scrivere su recod che non hai ancora letto, aprili in modalita'
condivisa.
Saluti
P.S.
Utilizza TFileStream, e' molto meglio.
-- 
I'am what I'am, I do what I can

Grazie 1000 ci provo !!
Gian
"Setec Astronomy" <setec@_NO_NOSPAM_freemail.it> ha scritto nel messaggio
news:HM1sb.109229$e6.39...@twister2.libero.it...


Newsgroup: it.comp.lang.delphi
Titolo: scan delle directory...

.. si  utilizza Findnext:
  FindFirst('c:\', faDirectory, SearchRec);
  While FindNext(SearchRec) = 0 do begin
     OutLine1.Lines.Add(SearchRec.name);
    Searchdir:=SearchRec.name;
  end;
  FindClose(SearchRec);
ma se io volgio fare in modo che mi cerchi
un file in tutte le cartelle del Hard disk, come
si fa ????
Grazie Max
--//////--

Su 
www.torry.ru
 l'anno scorso trovai un componente free
che simulava la ricerca standard di windows utilizzando un thread.
Non ricordo come si chiamava, ma se vedi sul sito penso che qualcosa
dovresti trovare.
Saluti
AS
-- 
Posted from 
ammi.mclink.it
 [195.110.128.1] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.delphi
Titolo: Posizione corretta di una procedura

Stò imparando ad utilizzare Delphi e mi sono trovato ad affrontare una cosa
che mi
ha sorpreso e che descrivo qui sotto.
Ho la necessità di inserire in una lista l'elenco dei files di una directory
con il codice
seguente :
Procedure ListaDeiFile (Const Cartella: String; SL: TStringList; Const Mask:
String = '*.*');
Var
  FHandle: THandle;
  FD: WIN32_FIND_DATA;
Begin
  SL.Clear;
  FHandle := Windows.FindFirstFile(PChar(Cartella + Mask), FD);
  If FHandle <> INVALID_HANDLE_VALUE Then
    Repeat
      If (String(FD.cFileName) = '.') Or (String(FD.cFilename) = '..')
        Then Continue;
      SL.Add(FD.cFileName);
    Until Not Windows.FindNextFile(FHandle, FD);
  Windows.FindClose(FHandle);
End;
Se posiziono la procedura all'inizio della Unit dopo implementation va tutto
bene in caso
contrario se richiamo la procedura mi sagnala un'errore del genere :
[Error] ManMon.pas(429): Undeclared identifier: 'ListaDeiFile'.
Se dichiaro la procedura in type così:
Procedure ListaDeiFile (Const Cartella: String; SL: TStringList; Const Mask:
String = '*.*');
mi segnala questo errore:
[Error] ManMon.pas(60): Unsatisfied forward or external declaration:
'TForm1.ListaDeiFile'
Scusate se mi sono dilungato, ma sono inesperto e vorrei capire qual'è il
sistema corretto e qual'è la differenza.
Ciao e grazie.
Enrico

 End;
Usando la sequenza try..finally 6 sicuro che cil codice specifiato nella
clausola finally sarà eseguito anche in caso di eccezioni prima di uscire
dalla procedura.
Bye
A.

 [Error] ManMon.pas(429): Undeclared identifier: 'ListaDeiFile'.
Certo. Ogni riferimento nel codice deve essere ALMENO dichiarato, prima.
Quindi: puoi metterla all'inizio della unit, dopo l'implementation, oppure
dopo l'implementation metti solo il prototipo, seguito dalla parola chiave
forward;
Procedure ListaDeiFile (Const Cartella: String; SL: TStringList); forward;
e la procedura vera e propria puoi metterla anche in fondo al file.
Spero di essere stato chiaro. :-)
Ciao
 Max
Newsgroup: it.comp.lang.delphi
Titolo: Un buon libro non fa mai male - aiuto cercasi

Salve NG.
fino ad oggi ho programmato in vari linguaggi (dal C al Pascal sotto DOS al
VB) e ho l'impressione che Delphi abbia una marcia in piu' per quanto
riguarda la gestione dei  database. Mi succede però che ogni volta che la
fantasia spinge sull'acceleratore mi capitano errori che non mi spiego.
Ritengo dunque di non avere basi solide e la cosa migliore in questi casi è
studiare un buon libro su Delphi, ma quale?
Ho preso un libro di M.Cantu' su delphi 6, ben fatto, ma poco adatto ad un
principiante.

studiare un buon libro su Delphi, ma quale?
http://www.amazon.com/exec/obidos/ASIN/0672321157/qid=1027756557/sr=2-1/ref=sr_2_1/002-7480028-4859229
Delphi 6 Developer's Guide (With CD-ROM) by Xavier Pacheco, Steve
Teixeira, David Intersimone
--
Rhymes (
rhy...@myself.com
)
http://www26.brinkster.com/rhymes
" ride or die "

Per iniziare io generalmente indico tre passi, forse il primo a te non serve
visto che già conosci il linguaggio pascal, cmq sono:
Essential Pascal di Marco Cantù
http://www.marcocantu.it/epascal/
Essential Delphi sempre di Cantù (in inglese)
http://www.marcocantu.com/edelphi/
E il libro Delphi in 21 giorni, credo però sia soltanto per la versione 4,
ma più che buona per iniziare proprio con l'interfaccia IDE del Delphi e le
prime essenziali cose. I libri invece di Cantù sono già abbastanza avanzati
per chi è all'inizio, lui stesso lo indica all'interno.
Cmq è buono consultare l'Help del Delphi che una volta preso la mano rende
tanto ed è importante anche vedere molti esempi, scaricare per esempio
materiale da Torry (
http://it.torry.net
) per imparare direttamente sul campo
tramite l'esperienza di altri programmatori. Infine ci siamo noi su questo
NG  ;)
Ciao,
  Fabio

 >Ritengo dunque di non avere basi solide e la cosa migliore in questi casi
č

Newsgroup: it.comp.lang.delphi
Titolo: Invalid Pointer Operation

Buongiorno al NG,
in un'applicazione dove faccio uso intenso di ricerche capita che ( non
sempre purtroppo ) mi compare un bel " Invalid Pointer Operation "...
... il contesto è questo :
L'utente può scegliere di interrogare il DataBase impostando svariati
parametri di ricerca...io mi compongo la query che mando in esecuzione e che
successivamente visualizzo in una griglia...
Il problema nasce quando apro la query che ogni tanto, chissà perchè, mi
solleva l'eccezione...
Non capisco a cosa si possa riferire quell'Invalid Pointer Operation sulla
open di una query...
Qualcuno può aiutarmi a capire ?
La stessa query rifatta uscendo e rientrando nel programma funziona.
...sembra quasi che posso fare un certo numero di query in sequenza e poi mi
viene sollevata l'eccezione..boh!
Ogni Suggerimento è bene accetto
PS ...sto lavorando con D6 DOA 3.4.6.2 e Oracle 9i.
-- 
Alberto Menghini

trappi qualcuno degli eventi della query?
la query è sempre la stessa? Se si, usi campi (x)lob?
-- 
Alberto Salvati
A *Neapolitan* delphi developer who is studing c# & .Net

 la query è sempre la stessa? Se si, usi campi (x)lob?
in che senso la query è sempre la stessa ?
No se ti riferisci all'istruzione sql perchè può variare di volta in volta a
seconda dei parametri che l'utente inserisce.
la compongo così....( tbPratica ->TOracleDataSet )
tbPratica.Close;
tbPratica.DeleteVariables;
cSql.Clear;
tbPratica.Sql.Clear;
tbPratica.Sql.Add( 'SELECT p.rowid, p.ID, p.BARCODE, p.MANDANTE, p.MANDATO,
p.CONTRATTO, ..., ');
tbPratica.Sql.Add( 'FROM Pratica p');
...
if Trim( mmrPratica.FieldByName('Contratto').AsString )<>'' then
begin
        if Pos('WHERE', cSql.Text ) = 0 then cSql.Add('WHERE ');
        if lCondizione then cSql.Add(cCondizione);
        cSQL.Add( '( p.Contratto = :pContratto )' );
        tbPratica.DeclareVariable('pContratto', otString );
        tbPratica.SetVariable('pContratto',
UpperCase(mmrPratica.FieldByName('Contratto').AsString) );
        lCondizione := True;
 end;
...
tbPratica.Open
...è solo un estratto parziale del codice ma dovrebbe farti capire quello
che faccio


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

Che comando gli devo dare per fargli caricare una pagina in locale (Es:
"index.html")?
Il percorso relativo non lo prende... gli devo dare quello completo (Es:
"file://c/villa/index.html")?
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 "file://c/villa/index.html")?
devi esser sicuro della directory in cui ti trovi ,non è detto che il
programma venga lanciato dalla dir giusta :)
(nonserve il path se la dir è giusta)
ciao

 ciao
infatti per esser sicuro se il file htm è nella stessa dir del prog usa
extractfilepath(application.exename)+'NOMEPAGINA.htm'
Davide

 wrote in message
news:tyfF8.56650$
CN3.1...@news2.tin.it

a giusto, l'estractfilepath!! mamma mia che lamer che sono! grazie
amici!


Come faccio ad evitare che un WebBrowser1 piazzato su di una form non riceva
il Drag&Drop di un file
trascinatovi sopra?
Grazie
Newsgroup: it.comp.lang.delphi
Titolo: trial delphi 2006

ciao a tutti, qualcuno sa dirmi dove trovare un trial del delphi 2006 per 
poter provare libreria .net per pocketpc?
Simone 

 poter provare libreria .net per pocketpc?
Lo scarichi dal sito ufficiale..
ciao!
-- 
maz 

cè solo la 2007
Simo 

 cè solo la 2007
Nein, guarda bene nella pagina dei download:
http://www.codegear.com/downloads/free/delphi
:-)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 2009

Salve a tutti.... Qualcuno di voi può sa consigliarmi (se già esiste) un 
buon titolo di libro riguardante il delphi 2009 (enterprise o 
architect)???...in alternativa, nel caso in cui non fossero ancora stati 
realizzati, qualche libro precedente che possa andare bene con quelle 
versioni cè??... ovviamente parlo di libri italiani ed in vendita..
Thx a tutti
Max 


E anche qui è molto difficile trovare libri in italiano.....Sembra che lo
facciano apposta :-). Comunque l'unico che riesco a consigliarti in questo
momento (che tra l'altro ho pure io), è quello di Marco Cantu' che si
intitola  "Delphi 2006 la grande guida"(ultima edizione in italiano).
Comunque se ti interessa, io tempo fà avevo chiesto allo stesso Cantu' se
ne pubblicasse qualcun altro in italiano dato che dal 2006 ne sono uscite
due versioni di Delphi, e lui mi ha risposto di no perchè non c'erano
richieste a sufficienza perchè lui potesse investire il suo tempo :-).
Detto questo, non so che dirti, è molto difficile trovare materiale in
italiano su Delphi......in bocca al lupo, e se casomai trovi qualche testo
diverso da quello che ti ho indicato fammelo sapere che la cosa mi
interessa ;-) ciao.
--- posted by geoForum on 
http://www.delphiedintorni.it

Max - Libero ha scritto:

--------------
Ciao Max
l'unico testo di programmazione che ho letto è Delphi 3 - guida ufficiale (ed apogeo), molto chiaro e utile (venivo dal turbo-pascal). In seguito, pur avendo acquistato Delphi 7 di Cantù non lo ho praticamente usato; preferisco usare le tips & tricks disponibili su Internet, generalmente più che sufficenti. Penso che i manuali di programmazione sono superati dal materiale disponibile on line.
Cordialmente
Pino
 
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it

 
Beh, scusa se mi intrometto ma.....io non credo che on-line possa esistere
una guida completa SOPRATTUTTO IN ITALIANO su Delphi :-), saluti.

Newsgroup: it.comp.lang.delphi
Titolo: Intraweb oppure...?

Ieri ho speso qualche minuto del mio poco tempo libero facendo 
qualcosina con intraweb e devo dire che l'ho trovato abbastanza comodo, 
sopratutto considerando che non so un tubazzo di html, sviluppo web etc 
etc etc.
In pochissimo ho messo una piccolo esempio che interroga una tabella di 
un db interbase.
Proprio in virtu della mia scarsa (x non dire nulla...)conoscenza di 
questo ambito dello sviluppo, chiedo a qualcuno del ng che ne sa di + se 
esistono limiti, controindicazioni e/o soluzioni simili ma migliori o 
più usate.
TIA
A

 più usate.
 vedi 
http://tinyurl.com/vywy
  ne abbiamo già parlato
cmq... sono sempre punti di vista!
ciao
   gabriele

sorry: non ho pensato a cercare nei vecchi post :)
Non cadro nella trappola dell'ot: andro a leggere qualcosa su java.
Tnx
A

Newsgroup: it.comp.lang.delphi
Titolo: Link a FuzzyReport

Ho notato che il sito di fuzzyreport non č piů visualizzabile da 
settimane. Ho caricato sul mio sito il file zip di fuzzyreport (con la 
modifica del file inc per l'uso con delphi 7.... basta usare il pachetto 
per delphi 6).
Lo potete scaricare da questo link:
www.computerando.it/fr2.zip
Ciao
Gianni

)
  "File deletion is murder..." (Futurama)

 morire. :-)
Infatti è un ottimo pacchetto, oltretutto italiano..... non è certo 
facile trovare pacchetti OpenS gestiti da italiani
Ciao

 facile trovare pacchetti OpenS gestiti da italiani
Concordo in pieno. ;-)


Marco «Alka» Breveglieri
	Ciao
	MassimoB
 
---------------------------
http:\\
www.massimobeschi.it

prtroppo la vedo dura :(
Dal post del nostro mitico Aqua, estrapolo: "Tra l'altro credo che stia
cercando qualcuno che sia disposto a prenderne le redini..."
Uhmm... Breveglieri o Beschi li vedrei bene come Project Leaders del nuovo
Fuzzy ! 
^____^
-- 
Morde. (
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/
Firefox, il miglior browser: 
http://www.gxware.org/mozilla/

Morde. 


 o meglio in ufficio :-[
Come ti capisco... ;-)
Ciao!
-- 
Marco «Alka» Breveglieri


 Ho notato che il sito di fuzzyreport non è più visualizzabile da


 Ho notato che il sito di fuzzyreport non è più visualizzabile da


Newsgroup: it.comp.lang.delphi
Titolo: Esecuzione eseguibili

Ciao a tutti vorrei sapere se esiste una funzione per far partire un
eseguibile dall'interno di un altro programma...in particolare se si
puo far partire un eseguibile Dos...

l'argomento è stato trattato in molte occasioni.
cerca nei vechci post e troverai una miriade di risposte.
Pax vobiscum.
A.
Newsgroup: it.comp.lang.delphi
Titolo: Colonne dbgrid: larghezze diverse tra design time e runtime

Qualcuno mi saprebbe spiegare perche' quando a design time modifico la larghezza
delle colonne di un dbgrid, poi a runtime esse "si aggiustano" arbitrariamente 
(di pochi pixel, ma e' sufficente a farmi comparire la scrollbar)?
C'e' un modo per esser certi che il layout sia identico, a design time come a runtime?
Ciao a tutti,
Morde.
morde [at] programmer [.] net

hai le colonne persistenti?
A.

hai le colonne persistenti?
si Alberto


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

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

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

della DBGrid non serve a niente!!!)
Ah... questa proprio non me l'aspettavo!
Io credevo che invece si potesse: l'ho scoperto perche' a design time allargavo
le colonne in modo da far combaciare l'ultima a destra col bordo dell griglia, poi
a runtime essa (popolata dal dataset) si allargava di qlche pixel...
Grazie!


dbgrid?
Si Marco, tutte le mie dbgrid hanno dgColumnResize a false.
Seguiro' la strada suggeritami da LucaP.
Grazie,

Newsgroup: it.comp.lang.delphi
Titolo: D2006 dbexpress + Firebird embedded

ho un problema che non mi spiego :
un progrmma usa i componenti dbexpress e le dll x
firebird embedded 1.54
Directory Test
contiene l'eseguibile
..\Dati .. contiene le dll
fbclient.dll
fbintl.dll
fbudf.dll
gds32.dll
ib_udf.dll
ib_udf.dll
ib_util.dll
msvcr71.dll
msvcp71.dll
dbxint30.dll
<database.fdb>
come prima cosa l'applicativo va s settare i paramtri SQLConnection;
su un Pc che ha installato Delphi 2006 , ma non FireBird Sever , qualunque
sia la directory funziona (trova su BDS4.0/Bin/dbxint30.dll)
Su un Pc senza Delphi , continua a segnalare unable to load dbxint30.dll ,
presente su ..\Dati , anche copiando l'eseguibile in ..\Dati non cambia;
Se copio su \Windows\System32 sis gds32.dll che dbxint30.dll , tutto 
funziona;
Non mi speigo perche' pur avendo le Dll nella directoruy locale ..\Dati ,
non le carica , e continua a cercarle oin \Windows\System32.
Maurizio
^^^^
procedure Tfrm_Dati.ConnettiDataBase(var NomeDataBase:String);
begin
 SQLConnection1.Connected:=False;
 with SQLConnection1 do
 begin
  if Connected then
  begin
   TD.TransactionID := 1;
   IDTrans.TransactionID:=TD.TransactionID;
   if SQLConnection1.InTransaction then
   try
    Commit(TD);
   except
    Rollback(TD);
   raise
   end;
   //Close;
  end;
  Params.Clear;
  Params.Add('User_Name');
  Params.Add('password');
  Params.Add('DriverName');
  Params.Add('DataBase');
  Params.Add('InterBase TransIsolation');
  Params.Add('SQLDialect');
  Params.Values['User_Name']:= 'SYSDBA';
  Params.Values['password']:= 'masterkey';
  Params.Values['DriverName']:= 'Interbase';
  Params.Values['Database']:= NomeDataBase;
  Params.Values['InterBase TransIsolation']:= 'ReadCommited';
  Params.Values['SQLDialect']:= '3';
  LoginPrompt:=False;
  Connected:=True;
 end; 

 firebird embedded 1.54 [...]
Sei sicuro che il componente *TSQLConnection* stia effettivamente 
utilizzando "FireBird Embedded"?
In genere, la DLL ha nome "fbembed.dll", mentre tu hai nella stessa 
cartella entrambe le librerie "fbclient.dll" e "gds32.dll"...forse c'è 
un po' di confusione.
Devi verificare che sia presente la DLL che implementa il "server 
embedded" vero e proprio e specificarla nella proprietà /VendorLib/ del 
componente *TSQLConnection*.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

> componente *TSQLConnection*.
ho preso per valide queste note
ora ho cambiato aggiungendo queste righe ,
  SQLConnection1.LibraryName:=Path+'Dati\dbxint30.dll';
  SQLConnection1.VendorLib:=Path+'Dati\fbembed.dll';
cosi' trova le dll dove previsto.
grazie del suggerimento 


su WinXP reale o virtuale non ha problemi , con Winb98 si;
ho fatto la medesima prova su Win98 (PC virtuale), ma al
momento di aprire il db si blocca
le dll sono le stesse che ho usatoper WinXP
cercando in rete , trovo che sia copla delle librerie
msvcrt.dll e msvcp60.dll , ma nessuna delle 2 e' legata al
server embedded.
come altra prova ho installato FBClient su Win98 e modificato
SQLConnection.VendorLib:=gds32.dll , senza usare il server
embedded.
ma ugualmente si blocca.
Maurizio
Newsgroup: it.comp.lang.delphi
Titolo: Formato del campo della query

Uso una query per estarre dei totali numerici da dei movimenti contabili che 
poi espongo in un DBGrid. Il campo di cui faccio la somma � il campo 
Importo, che sommo come Totale_Entrate quando rappresenta una Entrata, 
oppure come TotaleUscite, oppure come Totale (senza distinguere la natura).
Poich� non posso definire a priori i campi del DBGrid che viene usato per un 
numero di queries che pu� anche definire l'utente, chiedo come fare per 
esporre i valori nel DBGrid con un formato con due decimali.
Uso il LocalSql e questo � un estratto della query:
 
SELECT AA as Anno, cast(0 as float) AS Totale, sum(IMPORTO)*-1 as 
Totale_Uscite, cast(0 as float) AS Totale_Entrate  from MOVIM where ...... 
 

Modo 1: lato db riuscire a scrivere la query in modo che ti restituisca il valore gia' pronto...Non conosco il db quindi non so se si puo' fare.
 
Modo 2: lato app, gestisci i campi della query come persistenti.
In questo modo puoi associare al TField tipizzato un po di cose tra cui la formattazione.
 
 
A.

 ha scritto nel messaggio 
news:72be2778-0b1a-4139...@googlegroups.com...

E' il modo 1 che andrebbe bene, a sapere come si fà, perchè il modo 2 mi è 
inibito dal fatto che il DBGrid può esporre i risultati di parecchie queries 
e quindi le colonne possono essere molto diverso tra loro.
Se il modo 1 dipende dal Db, quello usato in questa applicazione è il BDE e 
quello che si chiamava localSql, che non riesco ad abbandonare perchè va 
bene, c'è troppo lavoro da fareper cambiare, e non so valutare la possibile 
alternativa per un'applicazione solo client e monoutente. Quando chiedo 
consiglio, ne ricevoun sacco tutti diversi e tutti buoni, ma evidentemente 
non c'è una scelta tanto buona che si stacchi dalle altre in modo netto. Va 
beh, ma questo è un altro discorso .. 
 

 beh, ma questo è un altro discorso ..
 
Eh... croce e delizia di delphi... hai N modi diversi per fare la stessa
cosa e quindi non sai mai dire quale sia quello migliore!
 
ciao
Giacomo
 
 

 non c'è una scelta tanto buona che si stacchi dalle altre in modo netto. 
 
A patte access ed sqlserver che sono PEGGIORI, non esiste und DB migliore.
Dipende dal contesto, dal problema, dal sistema operativo, dalle esigenze, dalle richieste che ti fanno, dal budget e molto altro.
 
A.

Newsgroup: it.comp.lang.delphi
Titolo: [D7] dati DB>array - trasposizione DBGrid

Ciao
ho due problemini:
1) devo caricare dati da un dataset in un array, ma non ho capito come si fa 
(finora ho lavorato con i Data Controls su form e sono riuscito a fare quasi 
tutto quello che mi serve... quasi!);
2) ho bisogno di un DBGrid con i campi sulle righe e i record sulle colonne.
Se qualcuno mi sa dire qualcosa gliene sarò grato.
Gianni 

 2) ho bisogno di un DBGrid con i campi sulle righe e i record sulle colonne.
la griglia č passiva e si limita a mostrare cio che le viene passato.
A te non serve una dbgrid, ma la stringrid.
-- 
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"
Newsgroup: it.comp.lang.delphi
Titolo: Form scrollbar

Apro su un netbook (1024 x 600) un programma (D7) dimensionato su 
risoluzione video 1024 x 768 con la form principale che sull'OnCreate ha 
top:=5;height:=768-15;
Mi aspetto quindi che sulla destra dell Form compaia la sbarra di 
scorrimento verticale ma invece la form ha la parte bassa fuori dallo 
schermo e inaccessibile.
Allora mi son messo a fare delle prove ma non riesco assolutamente a 
fare comparire 'sta barra verticale quando l'altezza dalla form è 
superiore a quella dello schermo. Accidenti !
Guido

 Guido
Rispondo di getto, ma la finestra è "massimizzata".
Ciao
M.A.



Rispondo di getto, ma la finestra è "massimizzata" ?
Con il punto interrogativo si capisce meglio la frase...

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 2 vs Delphi 6

Protagonisti:
  Delphi2 Developer
  Delphi6 Personal
Stesso progetto, alcuni componenti sono stati convertiti da me per 
essere compilati anche con D6.
con delphi2 uso un componente in piu' che sotto delphi 6 non ho 
"MDIBackground" un semplice pannello da mettere in fondo al form 
principale (questo non ha eventi collegati).
Lo stesso progetto è aperto contemporaneamente con tutti e due i 
compilatori.
Build All da delphi2: Eseguibile 761.344 Bytes
Build da delphi 6: Eseguibile 1.032.704 bytes
Why? Ripeto stesso progetto, il 35% di eseguibile in piu'.
-- 
---------------------------------------
Per rispondere in privato togliere 1975

Potrebbero anche essere diverse le opzioni di compilazione: Ottimizzazione del codice,
Debug integrato ed altro
Bye,
David (
www.utilityweb.net
)

 
è l'unica spiegazione, oggi magari provo scrivere alla borland, non mi 
piace troppo un incremento del 35% dell'exe.
Ciao


> non mi piace troppo un incremento del 35% dell'exe.
dal 1996 (epoca di uscita di Delphi2) a oggi e' aumentata pure la ram
disponibile nei sistemi, e cosi' la velocita' dei processori, e ben piu' del
35% :) quindi non ti preoccupare troppo della dimensione dell'exe,
considerando, soprattutto, che con upx puoi ridurlo di piu' del 60%.
Ciao, Sandro

Zortek wrote:

non era una cosa grave, non mi aspettavo un ingrandimento dei file exe.
Anche l'IDE č molto piu' grosso (tasm manager di xp mi da il doppio come 
ram richiesta).
Forse č perche' sono rimasto troppo fermo con la versione 2.
Grazie per l'UPX, č eccezionale.
ciao
P.S.
Mi ricordo ai tempi del DOS per raggiiungere i 100k di EXE ho dovuto 
faticare e non poco (circa 10 anni fa).

Newsgroup: it.comp.lang.delphi
Titolo: C'è un sito di questo NG?

Questo NG ha un sito? Dove vengono eventualmente salvati i truschini che si
dicono qui?
Mark il Gatto
Mark er Curioso

 dicono qui?
www.italiandelphi.f2s.com
 ma è ancora in prova, stò traducendo le ultime
cose....questa settimana sono superimpegnato (sono in una commisione di
esame per un corso di "programmazione in ambienti mainframe", sono impegnato
fino a fine settimana), la prossima azzero gli archivi e si parte
(scusatemi).
Se vuoi collaborare fammi sapere.... (le pwd sono a disposizione di tutti)
Ciao
Gianni

Newsgroup: it.comp.lang.delphi
Titolo: Report Builder: perchè mi succede questo?

Ciao e scusate.
Sto cercando di creare un repor utilizzando reportbuilder. Il report è cosi 
composto:
suddiviso in gruppi, nuovo gruppo salto pagina,totale gruppo.
Durante la stampa controllo un campo(X),sommo altri due campi(y+z), conto le 
righe(nr) per ottenere nella banda del fine gruppo i seguenti numeri:
Totale numero righe OK No problem
Totale(y+y)      OK No problem
controllo campo x (ecco i problema)
-----
sul detail
se x <3    contatore x1+1
se x >= 3 e < 7 contatore x2+1
se x >= 7 contattore x3+1
-----
il problema è proprio sulla 1 condizione in quanto mi viene preso in esame 
tutto il dbase e non solo il guppo. Non so se sono stato chiaro. Infatti 
quando faccio il preview del report noto che la label alle quali assegno i 
valori di x1,x2,x3 vengono aggiornate mam mano che il report crea le pagine 
fregandosene del fine gruppo (nonostante il 1° gruppo sia solo di una 
pagina) e questo appunto solo per la prima condizione.
Spero di essermi spiegato e avere un aiuto
Grazie a tutti
GLF
.
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.772 / Virus Database: 519 - Release Date: 01/10/2004 

 x?
esatto la x si trova sul dettaglio
Grazie
GLF


Carissimo,
    ma x viene incrementato ogni riga, ovvero subisce operazioni oppure lo
leggi da qualche altro valore?
Una soluzione potrebbe essere azzerarlo ogni cambiamento di gruppo.
Saluti
    Luigi Nalli
    Senior Developer
    Open.Co 
www.openco.it

> Una soluzione potrebbe essere azzerarlo ogni cambiamento di gruppo.
E' quello che faccio ma nisba.
Comunque ho risolto: Ho creato una tabella temporanea nella quale vado a 
rimpire i cambi in base alle condizioni che mi servono e poi stampo la 
tabella tempornea facendo fare solo i totali per gruppo
Grazie a tutti


Newsgroup: it.comp.lang.delphi
Titolo: Spostare immagine sul form

Salve a tutti. Ho un piccolo vuoto di programmazione che non riesco ad 
affrontare.
Su un form 600X600 ho un Timage con un immagine 900X900, ed avrei bisogno di 
poter scrollare l'immagine con il mouse, magari tenendo cliccato e 
trascinando. Ho provato con il drag, ma non credo che sia l'approccio 
giusto. Suggerimenti?
Grazie 

 giusto. Suggerimenti?
Insisti con quell'approccio è quello corretto
Se vuoi qlcosa di già pronto,
http://delphiforfun.org/programs/Delphi_Techniques/DragImageDemo.htm
ciao
-- 
morde
D5,D6,D7
QT 4.7.0 - MingW- QT Creator 2.1
Newsgroup: it.comp.lang.delphi
Titolo: [forse OT] Avvio di un programma alla connessione in Internet

Ho realizzato un piccolo software che deve essere eseguito non 
appena avviene la connessione ad internet. Vorrei perň che l'evento non
venisse gestito dal mio programma (tramite ad esempio un loop che si
esegue all'infinito finchč non rileva la connessione attivata) bensě dal
sistema operativo Windows. Come posso fare? Esiste una specifica chiave
nei registri? Oppure bisogna creare uno script di lancio via RAS?
Grazie mille, Gohan
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

hook?
A

 A
Ehm... che cosa è un hook? (non replicarmi "uncino" per favore! ;)


cerca SetWindowsHookEx nella guida sdk di windows o nei vecchi post de ng.
A

Newsgroup: it.comp.lang.delphi
Titolo: Convertire Stringa con HEX in Decimale...

Salve a tutti!
Avrei un dubbio che non sono riuscito a risolvere sbirciano nei vari Help di
Delphi(5pro):
mi trovo ad acquisire dei dati che sono, in pratica, delle stringhe
contenenti numeri esadecimali e li devo convertire in forma decimale (in
realtà devo anche fare l'inverso). C'è una qualche funzione tipo HexToInt o
simile?
Grazie anticipate!
Saluti
Panoramix

C'č una qualche funzione tipo HexToInt o simile?
function HexToInt(HexStr: String): Integer;
begin
  Result := StrToInt('$'+HexStr);
end;
-- 
Andrea Laforgia
#exclude <windows.h>

 end;
Grazie mille!!!
:o)
--
=   P  a  n  o  r  a  m  i  x   =
il druido grandangolare
pano.ramixCHIOCCIOLAtiscali.it
Newsgroup: it.comp.lang.delphi
Titolo: Problema molto strano..

Salve,
ho il seguente sorgente:
// Evento onclick di Button1
var
   i : integer;
begin
     i := 0;
     edit1.text := 'Ciao';
     while (i < 5) do
         begin
              i := i + 1;
              button1.caption := INTtoSTR (i);
              sleep (1000);
         end;
Il problema è che quando clicco, la parola 'Ciao' viene scritta nella edit
solo dopo l'esecuzione del ciclo. Come faccio a farlo stampare prima del
ciclo?
Grazie
Luigi

ciclo?
vedi sopra.

          end;
inserisci la chiamata:
Application.processmessage;
prima dello sleep.
Ciao !                {MSX}

      edit1.text := 'Ciao';
        Refresh;   <================


      edit1.text := 'Ciao';
edit1.refresh;


Update
Application.processmessage
Refresh
Quale è la migliore?
Grazie

Refresh
Update si limita a forzare il ridisegno del controllo prima
di qualsiasi ulteriore evento.
Refresh o Repaint ridisegnano il controllo.
Application.ProcessMessages forza il processamento dei
messaggi.
Vanno tutti bene, perche' il problema e' dovuto al ristagno
del messaggio WM_PAINT (che, come saprai, viene processato
per ultimo) nella coda dei messaggi.
Forse con Application.ProcessMessages rischi che l'utente
possa chiudere la finestra (con ALT+F4).
Te lo sconsiglio, io uso fare :
frmSplash.Show;
frmSplash.Update;
--
Andrea Laforgia (mica uno qualunque...)

Cmq avevo già usato Update, sia perché è stata postata per prima :) sia
perché me l'hi suggerita tu, mica uno qualunque... :D
Ciao
--
Luigi
http://web.tiscali.it/luigi_web
ICQ #46240443

 Quale č la migliore?
Application.processmessage processa tutti i messaggi in coda quindi fa anche
altre cose oltre
a ridisegnare e puo impiegare piů tempo (a seconda di quanti messaggi in
coda ha)
Il refresh puoi usarlo sia a livello di form (form1.refresh / refresh) che a
livello di componente
(label1.refresh). Il primo metodo ridisegna tutto il form e tutti i suoi
componenti il secondo solo
il componente specifico. Io se modifico solo un paio di componenti alla
volta faccio un refresh
solo di questi altrimenti lo faccio su tutto il form. Ricordati perň che
dopo un po che la tua
applicazione č impegnata in qualche procedura lunga che non modifica
l'output devi fare il
refresh di tutta la form altrimenti ottieni il tipico comportamento dei
programmi bloccati
(vedi form bianca bottoni che spariscono ecc...).
Ciao

Newsgroup: it.comp.lang.delphi
Titolo: Image color remove

I greet,
how to make from picture bmp or jpg or png (2048x1500(true color))
picture 200x150 so to he be recorded with 50 colours?
Please about example

aToMeK ha scritto:

It's an Italian newsgroup... :-)
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 ha scritto nel messaggio 
news:77a26ebb-9dfc-49c2...@v13g2000yqm.googlegroups.com...

Col solo Delphi dubito si possa fare ma ci sono ottime librerie grafiche che 
puoi approfondire, tipo Graphics32
Ciao Giorgio
Newsgroup: it.comp.lang.delphi
Titolo: Inserire solo numeri in un "Edit"

Salve a tutto il NG.
A me servirebbe poter inserire in un controllo "edit" solamente numeri. Come
posso fare?
Ho provato ad attivare il Keypreview e inserendo la procedura:
procedure TForm1.numeroKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
        if (key<48) or (key>57) then
          key:=0;
end;
Ma dovendo eseguire un calcolo matematico all'inserimento di ogni nuovo
carattere, il programma và in errore ancor prima di analizzare il Keydown.
Grazie a chi vorrà aiutarmi!

 end;
Usa l'OnKeyPress:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not (Key in ['0'..'9']) then
    Key := #0;
end;
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Sei sicuro di non poter utilizzare un MaskEdit e la sua proprietà EditMask?

 end;
Accidenti e se sbaglio? Devo premere canc?
Forse cosě č meglio
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not (Key in ['0'..'9',#8]) then //(#8=BackSpace)
    Key := #0;
end;
X BerseKer Occhio che se uno copia una stringa formata da caratteri e fa
incolla sulla edit il trucchetto non funziona quindi forse ti conviene usare
un maskedit.
Ciao
--
----------------------------------------
Carlo Camarda
chiamac...@tiscalinet.it
]@#[ Anna I Love You ]#@[

 ha scritto nel messaggio
news:40dcc3bd6fb396f70d6...@mygate.mailgate.org...


dall'help :
 0 The 0 character requires a numeric character only in this position.
leggilo da te che faccio te lo copio-incollo io ? daiiiii :)))

 ha scritto nel messaggio
news:adl55l$ptt$1...@newsreader.mailgate.org...


Newsgroup: it.comp.lang.delphi
Titolo: come fare.....

....per associare alla creazione di un mio form a run-time  anche
l'esecuzione di un file audio (tipo messaggio acustico)?
Grazie a tutti
Davide

.. a sapere di cosa parla il tuo post senza essere costretti ad aprirlo?
Basta che chi scrive dia un subject significativo.
Vedi evento OnCreate del form.
Bye
A

 Basta che chi scrive dia un subject significativo.
Hai ragione, scusami.
Grazie dell'informazione, ora guardo....
ciao
Davide

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

qualche tempo addietro ho visto un expert per delphi.
come faccio a fare un expert ?
qualcuno ha qualche esempio?
grazie.
                                                    Gna...@Wappi.com

 wrote in message
8hah8a$2b1$1...@nslave1.tin.it...
