mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Sapere la quantità di RAM fisica?

Salve,
	Come posso fare per sapere quanta Memoria 
RAM fisica e installata nel sistema? E che funzione posso
usare per sapere quanta di questa č libera?
Grazie 1000
MaTTeO.

 usare per sapere quanta di questa è libera?
Il tutto è contenuto nella struttura passata a GlobalMemoryStatus.
Esempio:
var
  ms: TMemoryStatus;
begin
    ms.dwLength := SizeOf(ms);
    GlobalMemoryStatus(ms);
    ShowMessage('Memoria libera in Megabyte ' + FloatToStr(ms.dwAvailPhys /
1024 / 1024) + ' Su un totale di: ' + FloatToStr(ms.dwTotalPhys / 1024 /
1024) + ' - La percentuale utilizzata è il ' + IntToStr(ms.dwMemoryLoad) +
'%');
end;
Ciao!
--
- Carlo -
c.b...@libero.it
Newsgroup: it.comp.lang.delphi
Titolo: Campo nullo

Una select... di una tabella non restituisce alcun record. Leggo il valore 
di un suo campo intero e trovo=0.
Dovrei avere invece una condizione di "Nil" in quanto 0 per me e' un valore 
significativo di quel campo.
Come faccio a distinguere i due stati del campo?
Giorgio 



ds.FieldByName("Nome del campo").IsNull
dove ds è il dataset
Però considera che se una tabella non restituisce alcun record, non ha
molto senso verificare se il record ha un certo campo nullo.
Giuseppe

"Giorgio Padoan" ha scritto nel messaggio

.isnull per i field, .isempty per i dataset.
Ciao
-- 
ACSH
[TurboDelphi]
Chi fa da se', fatica il doppio 

 ha scritto nel messaggio 
news:pan.2006.12.06....@m-from.net...

In effetti pensavo di usare un ds.EOF And ds.BOF per determinare l'assenza 
di record.
Grazie cmq, Giorgio 

 Una select... di una tabella non restituisce alcun record.
In questo caso, tutto quello che riporti di seguito non ha senso.
if (not tuoDataset.isEmpty) then
begin
  ...
end
else
begin
  ...
end;
-- 
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: Aiuto su Query SQL, perchè non funziona?

Ciao Ragazzi,
ho scritto questa query SQL:
SELECT Count (1° campo), Count (2° campo), Count (3° campo)
FROM  nometabella
WHERE [1°campo]=[] AND [2°campo]=[] AND [3°campo]=[];
Ho provato ad eseguirla con Access e funziona, ho provato ad inserirla nel
componente
ADOQuery ma non và.
Ho inserito anche i 3 parametri, ma quando la eseguo mi dà sempre 0.
Segue il codice:
  AdoQuery1.Close;
    AdoQuery1.Parameters.Items[0].Value := Edit1.Text;
    AdoQuery1.Parameters.Items[1].Value := Edit2.Text;
    AdoQuery1.Parameters.Items[2].Value := Edit3.Text;
  AdoQuery1.Open;
  Edit4.Text := (AdoQuery1.Fields[0].AsString);
Qualcuno sà dirmi il motivo?
Potreste dirmi anche le impostazioni corrette del componente ADOQuery?
Grazie.


Cambia in
   AdoQuery1.Close;
     AdoQuery1.Parameters.Parambyname('Parametro1').Value := Edit1.Text;
     AdoQuery1.Parameters.Parambyname('Parametro2').Value := Edit2.Text;
     AdoQuery1.Parameters.Parambyname('Parametro2').Value := Edit3.Text;
   AdoQuery1.Open;
   Edit4.Text := AdoQuery1.Fields[0].AsString;
Così dovrebbe andare ;o))
Ciao
Newsgroup: it.comp.lang.delphi
Titolo: Installshield

Salve,
sono una newbie di Delphi. Ho creato un'applicazione db con Delphi 3 e
vorrei poterla distribuire utilizzando l'Installshield Express for Delphi 3.
Non riuscendo ad utilizzare Installshield, mi sapreste consigliare del
materiale che ne spieghi il funzionamento?
Grazie
Barbara Inverardi
http://www.geocities.com/ResearchTriangle/Thinktank/3213

Barbara Inverardi
qual' č il tuo problema di preciso ?
E' un problema generale oppure riguarda solamente il BDE ?
Voglio dire che parli di un' applicazione DB, quindi le macchine che la
utilizzeranno dovranno aver installato il BDE che dovrai distribuire insieme
a tutti i file che compongono il tuo programma.
Spiega meglio il tuo problema in particolare poi cerchiamo di risponderti.
Per quanto riguarda la guida, io non ho nulla, tranne che l' help dell'
Install shield.
Ti saluto.....alle prossime.
Antonio Tarolla
BSSoftware Tips Mailing - List Support

 qual' è il tuo problema di preciso ?


 Barbara
beh dovresti avere un wizard che ti guida nei vari passaggi...
se hai problemi di inglese, sul repository di mrcoke trovi
le risorse in italiano.
Newsgroup: it.comp.lang.delphi
Titolo: IB6 e AutoInc - Aiuto sono disperato

IB6 e AutoInc - Aiuto sono disperato
Ho creato una tabella con IB Expoert e ho creato
un campo integer IDX e segnato il campo autoinc
non ho ricevuto nessun errore all'atto della sua
compilazione, ma dopo aver collegato la tabella
ai vari campi, e eseguendo il prg., dopo la pressione
del tasto new il campo idx rimane tale non viene
incrementato, dove sbaglio?
Esiste un metodo esterno per recuperare il valore?
Ciao Enzo
www.scozzaro.it

I campi autoninc, in molti casi, vengono assegnati all'inserimento del
record, ovvvero sulla post/Applyupdates.
Consiglio:
creati un generator ed una stored procedure che ti legge il valore
calcvolato dal generatore.
Poi, nella OnNewRecords, assegni al campo il valore restituito dalla stored
procedure.
Bye
AS
Newsgroup: it.comp.lang.delphi
Titolo: TMemo + TRichEdit ??

Salve, avremmo un problema col componente TRichEdit. Abbiamo crato una chat
in cui l'inserimento nel suddetto componente avviene premendo invio e
trasportando il testo di un TEdit su di esso (tipico).
La scelta del TRichEdit è dovuta al fatto che assegniamo al testo al suo
intenro una formattazione di colore molto varia.
Però, come tristemente ci siamo accorti, lo scrollbar del TRichEdit non
SCROLLA le righe di testo aggiunte come dovrebbe, causa l'inserimento di
queste righe non direttamente ma come copia di un altro testo.
Mentre il TMemo lo fa,  ma non supporta i colori. :((
Esiste quindi la possibilità di fondere le due cose e cioè avere un
componente che faccia lo scrolling anche quando si inseriscono le righe di
testo indirettamente e che abbia la possibilità di dare delle formattazioni
di colore al testo?
O al limite è possibile modificare l'uno o l'altro?
Bye!!
--
-====[ Marco Di Stefano, Tester (Gidash)@TheGateMud]==-
 |  email: 
MarcoDi...@hotmail.com
                                |
 |  
http://digilander.iol.it/virtualbros
 
http://thegate.ngi.it
  |
 |  ICQ: 99744163                                   
thegate.ngi.it
 7890   |
-==============================================-

 ha scritto nel
messaggio news:jmpY6.63844$Rq1.4...@news.infostrada.it...


"Virtual Bros "Dzamir & Gidash""  ha scritto nel messaggio
| Esiste quindi la possibilità di avere un
| componente che faccia lo scrolling anche quando si inseriscono le righe
di
| testo indirettamente e che abbia la possibilità di dare delle
formattazioni
| di colore al testo?
Ammetto di non aver capito quello che chiedete ma questa funzione sposta il
cursore sull'ultima riga del richedit
SendMessage(RichEdit1.Handle, EM_LINESCROLL, 0, RichEdit1.Lines.Count);
Quindi, inserite il vostro testo (a proposito, cosa significa
indirettamente?)
Spero di esservi stato in qualche modo d'aiuto.
Ciao.
ACSH
---------------------------
Oggigiorno, l'unica domanda lavorativa
che ti fanno in ufficio e'
"Sono gia' le cinque?"

Newsgroup: it.comp.lang.delphi
Titolo: Datamodules nell'object inspector

Salve! Qualcuno mi sa dire se è possibile inserire una proprietà  di tipo
DataModule,    nell'Object Inspector ? Se si, come posso procedere? Ho
provato a dichiararlo ma quanto tento di assengnagli il datamodule,
attraverso l'ObjectInspector, mi esce questo messaggio 'Invalid property
Value'.
Grazie dell'aiuto. Marco

A prescindere dal fatto che il titolo trae in inganno...
Sarebbe stato meglio una cosa del tipo "Proprieta di classe TDataModule".
Come hai dichiarato la proprieta?
Il datamodule viene creato automaticamente oppure sta nella lista degli
avaiable?
Inoltre, sarei molto curioso di sapere cosa intendi realizzare avendo una
prop di questo tipo.
Saluti
AS
"Se è Microsoft non funziona"
Newsgroup: it.comp.lang.delphi
Titolo: TFileListBox Help

Salve ragazzi,
ho un problema col componente TFleListBox (Palette Win 3.1).
Vorrei mettere in una edit, solo l'estensione del file selezionato, ma non
vorrei usare la copy poichè la lunghezza dell'estensione non è sempre 3
(basti vedere i file *.~pas o altri che genera delphi stesso).
Esiste un metodo già implementato oppure dovrei crearlo da me?
In tal caso un ciclo a ritroso fino a quando trova il punto "."
dell'estensione mi va bene ma lo vedo troppo laborioso se i file da trattare
sono molti.
Come potrei fare?
Grazie
-- 
Karletto
chiamac...@tiscalinet.it
http://www.carletto.cjb.net

 Grazie
Nell'onChange del TFileListBox, scrivi nell'edit (circa, non ho provato):
IlTuoEdit.Text := ExtractFileExt(IlTuoFileListBox.FileName);
A


Grazie 1000 provo subito.

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 4 Standard

Fino a qualche mese fa utilizzavo delphi 4 standard ed ho realizzato
con esso diversi programmi che ancora vorrei utilizzare.
Nel frattempo ho cambiato computer ed ho smarrito il cd originale!!!
Vorrei sapere se qualcuno ha una vecchia copia di delphi 4 che non usa
o almeno sa dove trovare il Data Base Engine su internet (quello credo
sia free).
Grazie a tutti.

sara...@emailxx.it
 ha scritto:

per i l BDE 
http://delphi.icm.edu.pl/
per il CD originale, prova a contattare o la Borland o un rivenditore, 
magari ti fanno fare l'aggiornamento alla 7 o al limite su ebay.
ciao
-- 
-------------------------------
per scrivere in privato
togliere "1975nosp"
to reply remove "1975nosp"

 ha scritto

Se puoi tranquillamente dimostrare di avere il diritto di possedere Delphi 
4.0, basta che tu faccia semplice richiesta a Borland. Dovrebbero farti 
pagare solo le spese di spedizione ed eventualmente il supporto.
Ciao,
Gianluca. 

per i l BDE 
http://delphi.icm.edu.pl/
Ti ringrazio... ma sono 2 ore che giro sul sito (tra l'altro molto
interessante) ma non sono riuscita a trovare il dbe...
sai quale file devo cercare precisamente o in che sezione?
Grazie ancora.

 Grazie ancora.
-- 
Ciao, Anto', [37, 143, AQ] 
MB C SC 220 CDI Magma Rot
"Oggi c'è una grande battaglia di idee ma alla 
fine non ci saranno ne vinti, ne vincitori, ne idee!"
S. Benni da Elianto

Newsgroup: it.comp.lang.delphi
Titolo: Gdiplus.dll nella stessa cartella dell exe?

Se un applicativo sfrutta le librerie grafiche di XP per poterlo usare su 
computer con windows 2000/me/98 è sufficiente installare nella stessa 
cartella dell'exe il file gdiplus.dll che la Microsoft distribuisce per 
questi casi?
St. 

 ha scritto nel messaggio 
news:dthf5h$8n0$1...@newsreader.mailgate.org...



Yes. Comunque, prova prima solo copiando l'eseguibile, magari qualche
altro programma la usa già e perciò dovrebbe già essere presente nella
directory system32. Se non c'è, allora basta copiare la DLL
(gdiplus.dll (*)) nella stessa directory dell'eseguibile o meglio
ancora nella directory system32.
jk
(*) conviene comprimerla prima con UPX, così avrai una DLL molto più
compatta da distribuire.
Jilani KHALDI
http://jkhaldi.oltrelinux.com
Newsgroup: it.comp.lang.delphi
Titolo: Un modo semplice per sapere se si è connessi ad internet

Come da oggetto. Mi serve solo sapere se si è connessi o meno. Nessun'altra
informazione, nel modo + semplice possibile. Ho visto che ci sono dei
componenati apposta, ma fanno troppe cose e sono troppo complicati...
Grazie

 ha scritto nel
messaggio:

O fai un ping ad un server noto oppure usi InternetGetConnectedState()
(wininet.pas)
--
- Carlo -
cbertu81(at)libero(dot)it

 cbertu81(at)libero(dot)it

non lo sono (sotto win xp);
Esistono dei componenti adatti allo scopo su torry e/o dsp. Altrimenti
guarda nella sezione "Tips" del sito 
www.dedonline.com
--
Rhymes (
rhy...@myself.com
)
http://www26.brinkster.com/rhymes
" ride or die "


C'e' un componente che ti dice solo se sei connesso o no, e ci sono due
eventi onconnect e disconnect. il nome e' sulle faq, mi pare sia
zcinetdetect o qualcosa del genere
--
{MSX}  -  
http://msx.rules.it
Mantenitore delle FAQ di it.comp.lang.delphi,
reperibili qui: 
http://gpi.infomedia.it/abc/delphi/FaqDelphi.txt

Scaricati un semplice componente che fa il Ping, lo metti sulla form e ogni
tot lo lanci verso un server sulla rete. Se il risultato è positivo sei su
internet, altrimenti no.
Ciao,
  Fabio

 ha scritto nel messaggio
news:1o35kusmjoin60dba...@4ax.com...

Io lavoro su WinXP e qualche tempo fa ho risolto il tuo problema con la
funzione descritta nelle faq.
Spero di esserti stata di aiuto.
CIAO

 > Rhymes (
rhy...@myself.com
)


Newsgroup: it.comp.lang.delphi
Titolo: Formattazione dischetti

Salve.
Lo so che è una cosa trita&ritrita, ma la mia domanda è un pochino
diversa dal solito.
Mi spiego meglio...
La solita api "shformatnonsoche" non fa altro che 
aprire la dialog standard di formattazione.
Poi, se si clicca sul puslante, parte la formattazione vera e propria.
Ora, esiste un modo per formattare in modo "brutale", 
senza far uscire questa maledetta dialog?
Cioè, cosa succede nella dialog quando si clicca sul pulsante
"Formatta"? 
Esiste forse una api + a basso livello che esegue la formattazione
vera e propria?
Grazie x ogni indicazione
AS
-- 
Posted from 
ammi.mclink.it
 [195.110.128.1] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 vera e propria?
Ciao!
E usare la dialog standard in modo "brutalizzato"? (nascondendo la 
finestra, simulando il clic su formatta con un bel messaggio.. ecc) ?
Se non ti piace questa soluzione (che potresti cmq considerare come ultima 
spiaggia...), ecco cosa ti posso dire :
Per quello che ne so io, devi utilizzare i servizi del driver VxD statico 
VWIN32.VXD (Non so sotto Win9x come si faccia... ma penso che la strada sia 
simile).
Se puoi consultare la MSDN Library (finalmente mi sono deciso a scaricarla 
:)), guarda:
Using VWIN32 to Carry Out MS-DOS Functions
DeviceIOControl  (funzione IOCTL_DISK_FORMAT_TRACKS)
Non sono sicuro che sia la strada giusta perchč non l'ho mai fatto... se ti 
riesce o se trovi altre info ti chiedo gentilmente di postare la soluz!!
Ciao!! Davide DG.
Newsgroup: it.comp.lang.delphi
Titolo: OUTLINE....

Non riesco a  puntare nel punto esatto della stringa presente in OULINE:
ovviamente vorrei prelevare la stringa con un doubleclick !!
Ho provato cosě:
procedure TForm1.Outline1DblClick(Sender: TObject);
begin
  label1.caption:=Outline1.Lines.String[Outline1.Itemindex];   //Funzione
ERRATA
end;
ma non risulta "Itemindex"  ho cercato altre funzioni ma senza successo !!!
grazie, MAX

  label1.caption:=Outline1.Lines.String[Outline1.Itemindex]; 
prova con
label1.caption := Outline1.Items[Outline1.SelectedItem].Text;
Ciao,
Alan Solo

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

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

Salve a tutti,
ho la necessità di trasferire e di ricevere dati tramite una porta USB,...
Cosa mi serve?
Esistono componenti?
Ho trovato info riguardo ad un certo D2xx driver della ftdi, ma nn riesco a
capire come installare il driver e nn sono nemmeno tanto sicuro che con
quello la cosa sia fattibile.
--------------------------------
Inviato via 
http://usenet.libero.it

ho la necessità di trasferire e di ricevere dati tramite una porta USB,...
forse qui puoi trovare qualche info:
http://www.beyondlogic.org/
Ciao

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

ciao.
ho creato un servizio (service application) che ad un determinato evento
dovrebbe eseguire alcune operazioni su un db, niente di eccezionale. 
il problema che ho č che il servizio parte ma dopo circa 15 secondi
termina da sč, senza apparente motivo.
ho provato anche con questo
http://www.devarticles.com/c/a/Delphi-Kylix/Creating-a-Windows-Service-in-Delphi/4/
ma succede la stessa cosa.
non entra mai nella procedure ServiceExecute
uso D7 su XP.
grazie per l'aiuto.
--- posted by geoForum on 
http://www.delphiedintorni.it

devi loggare il comportamento del servizio altrimenti non ne esci.

 grazie per l'aiuto.
Il servizio termina in modo normale oppure si chiude e basta? Vale a 
dire, scoppia?
Hai fatto uso di log? (una strada molto veloce è l'uso del 
SendOutputDebugString, da visualizzare poi con il viewer 
http://technet.microsoft.com/en-us/sysinternals/bb896647.aspx
)
Puoi postare il codice del servizio?
Eccoti qualche buon link da seguire per un'infarinatura di base nello 
sviluppo dei servizi win32:
http://www.tolderlund.eu/delphi/service/service.htm
http://www.devarticles.com/c/a/Delphi-Kylix/Creating-a-Windows-Service-in-Delphi/1/
Ciao
-- 
Morde

Newsgroup: it.comp.lang.delphi
Titolo: DBComboBox codice + descrizione

Salve,
qualcuno sà se
esiste la possibilità in un DBComboBox di far visualizzare
la descrizione di un campo DB,
ma nelle operazioni di insert/update prelevare il codice di tale campo DB
ed operare su esso?
cioè come se nel combobox ci fosse un legame tra i due campi
descrizione-codice
in cui si visualizza la descrizione ma si opera sul codice
saluti
sal
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

sal ha scritto:

Guarda il DBLookupComboBox
Max


Grazie Max funziona alla meraviglia,
era proprio quello che mi serviva.

Newsgroup: it.comp.lang.delphi
Titolo: 3 Domandine

Salve,
 come da soggetto ho da porvi 3 domandine:
- Come faccio a Mostrare (show) un form in modo che sia sempre in primo
piano, ovvero fin quando non lo chiudo non posso andare da nessuna parte.
Tempo fa c'ero riuscito ma non ricordo piu' il comando.
-Come riesco ad aprire un prg DOS mentre sta girando un prg? Per altri tipi
di exe usavo WINEXEC(stringa,sw_show)  ma in questo caso subito dopo
l'apertura non rimane ON la finestra.
-Perche' se creo un Applicazione composta soltanto da un form e da un NMUDP
(senza codice,solo oggetti),la faccio partire e provo ad riavviare (o
spegnere) il pc questo non risponde mentre con tutti i tipi di prg riesco a
terminare la sessione? Come posso ovviare, tenendo sempre in esecuzione tale
Applicazione?

Applicazione?
I don't know...!
Saluti
AS
"Se è Microsoft non funziona"

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

Quando avvio l'esecuzione viene creato l'Oggetto, poi vengono caricate le 
sue proprieta' e qui dovremo essere in stato di csLoading.
Ma allora qual'e' lo stato csReading?
Giorgio 

 Ma allora qual'e' lo stato csReading?
Premiamolo quel F1 ;-)
"csReading - The component is reading its property values from a stream.
Note that the csLoading flag is always set as well when csReading is set.
That is, csReading is set for the subinterval of the time when a component
is loading that covers reading in property values."
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Premiamolo quel F1 ;-)
L'avevo premuto ma inserendo "ComponentState", grazie
Newsgroup: it.comp.lang.delphi
Titolo: OT: dove sono le faq?

Scusate l'OT, ma per non sentirmi rispondere che è stato già postato prima
dovrei leggere le FAQ, ok, ma come le trovo?

 dovrei leggere le FAQ, ok, ma come le trovo?
Ecco qua:
http://gpi.infomedia.it/abc/delphi/FaqDelphi.txt
Ciao e buona lettura :)

non sarebbe il caso di postare le faq su it.faq?
Bye
A.

> non sarebbe il caso di postare le faq su it.faq?
Fatto :)
Newsgroup: it.comp.lang.delphi
Titolo: TreeView...

ma ... e possibile che non si possa gestire l'item (o nodo ) su cui ci si e
posizionati??
Ho fatto una procedura che legge un menu e ne genera un treeView (molto piu
carino ) ma non so proprio come gestire il cambio di voce sul TreeView ( mi
interesserebbe il testo della voce selezionata).
...Grazie cmq a tutti
ciao
Davide


wrote:

Come no... 
Form1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
   Node.Text := 'Pippo';
end;
Inoltre TreeView.Selected ti restituisce sempre il nodo attualmente
selezionato.
Ciao,
Massimo.
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"

 selezionato.
Si ma sempre nella change? perchè mi riporta sempre il nodo principale?
cmq molte grazie! ci avevo perso troppo tempo e stavo desistendo..
Ciao
Davide


No problems.


Newsgroup: it.comp.lang.delphi
Titolo: Problema Intestazioni Report

Salve,
ho il problema di dover stampare una BandaTitolo composta da diverse QRLabel
e QRExpr su diversi rapporti.
Volevo una soluzione elegante per non dover copiare ed incollare su tutti
report, avendo poi il problema della manutenzione.
Utilizzo QuickReport 3.0.5 di Delphi5 Pro.
Grazie anticipatamente,
Fabrizio

 wrote in message
uqTB8.12923$zW3.3...@news1.tin.it...


 Potresti utilizzare il QRCompositeReport.
Ho il problema di dover ripetere il titolo su tutte le pagine.
Sei hai qualche idea fammi sapere.
Ciao Fabrizio

 wrote in message
RixC8.41578$zW3.4...@news1.tin.it...


 Title?
Sě certo ma come faccio a ripeterla su tutti i report senza il copia
incolla?
Ciao, Fabrizio

 incolla?
Il QRComposite come ti ho già detto no?
ci capisco sempre meno....
ciao
Alessandro

 ci capisco sempre meno....
A chi lo dici!!!
Ciao, Fabrizio

Newsgroup: it.comp.lang.delphi
Titolo: Control '' has no parent window

Ciao a tutti,
sapreste darmi qualche indicazione riguardo il messaggio di errore
riportato in oggetto. Tale errore appare quando cerco di trascinare un
componente nella form dalla component palette. Il componente è derivato
da TScrollingWinControl.
Grazie.
Claudio

Cerca tra questi messaggi:
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&oe=UTF-8&q=delphi+has+no+parent+window+error
--
Morde. 
morde[at]programmer[.]net

Newsgroup: it.comp.lang.delphi
Titolo: Quck Report strano!!!

Salve, ho un problemino con quick report allegato a Delphi 5.
Appena avvio il form da cui poi faccio il preview del report tutto a
posto, il report si avvia e mostra tutta la query che avevo preparato
precedentemente.
Poi se chiudo il form e lo riavvio e quindi riavvio il preview i dati
sono scomparsi nonostante la query (su una griglia del form) funzioni
egregiamente. Può dipendere dal fatto che il form si trova in
Available Forms e invece il report in auto-create forms?
La domanda mi è venuta in mente scrivendo e non l'ho potuta
controllare perchè il progetto l'ho su un altro copmuter.
Grazie
Robin

Robin
Oggi ho controllato!! :)
Robin
Newsgroup: it.comp.lang.delphi
Titolo: Ancore

Ciao,
Non riesco a capire perche' nell' Object Inspector non posso 
modificare le impostazioni delle ancore,
si puo' fare solo tramite codice ?!?
Se si', che senso ha allora visualizzarle dato che sono sempre uguali 
per tutti ?
Se no, ehm, come mai non posso modificarle ? :-)
Francesco
IACT Member.
http://Frengo.dragonfire.net/

 wrote in message
odyV1f3lyD6W-pn2-Jxi59ptUhiMy@localhost...


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

Qualcuno di voi l'ha mai provato o usato questo strumenti di protezione?
Cosa ne pensate?
www.ionworx.com
-- 
Lis
Mercatino: 
http://snurl.com/sito_lis
FAQ di it.comp.lang.delphi: 
http://snipurl.com/faq_icld

Cosa ne pensate?
Penso che sia uno dei tanti prodotti a pagamento presenti sul mercato.
Ce n'e' uno di questi, che ora non e' piu' a pagamento, ma altrettanto
professionale: OnGuard dell'ex turbopower, cercalo su 
sourceforge.net
.
Quanto a semplicita' di utilizzo, io sto usando con piena soddisfazione
TMxProtector: 
http://www.maxcomponents.net/download.html#PROTECTOR
-- 
Morde. (
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/
Firefox, il miglior browser: 
http://www.gxware.org/mozilla/
Newsgroup: it.comp.lang.delphi
Titolo: esempio Free space

ciao
c'è qualcuno che può postare sul NG un esempio di come controllare lo spazio
libero presente su un Floppy ?
GRAZIE !!!!
--
§oapware ®  Italia
www.soapware.it

> GRAZIE !!!!
Che urli??
cerca:
file management routines
nella guida di delphi.
Bye
AS
Newsgroup: it.comp.lang.delphi
Titolo: Form iniziale

Come faccio ad inserire nel mio programma una form simile a quella che
appare all'apertura di programmi con outlook, excel,...
Ho provato a crearla normalmente ma mi da una serie di errori in fase di
esecuzione.
Grazie anticipate, Marco.

 ha scritto nel messaggio
news:Xqsw6.91074$yl2.6...@news1.tin.it...



wrote:


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

Si, ma dubito che sappia che quel genere di forms si chiamino "Splash


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

 forms"... per questo non ho usato il termine... :=)
aveva pure chiesto *come* si fa! ;)
+ o - :
nel dpr...
var frmSplash: TfrmSplash;
begin
 Application.CreateForm(TfrmSplash,frmSplash);
 frmSplah.Show;
 ...// carica programma
... e poi potresti chiuderla nell'onShow della form principale
(cioe' quando si e' finito di caricare)
Ciao,
Alan Solo

 Alan Solo

   Show;
non ci giurerei, ma questa e' tanto in fallo quanto lo e' la mia, ;)
meglio non dargli nessun owner
FrmSplash := TFrmSplash.Create( nil );
try
 //carica applicazione
 ...
finally
 frmSplash.Free;
end;
Ciao,
Alan Solo

  file://carica applicazione


 wrote in message
Xqsw6.91074$yl2.6...@news1.tin.it...


 Delphi... :=)
... ma fare Application.CreateForm crea una form con Owner Application,
quindi e' identico a Form.Create(Application) e in entrambi i casi
(essendo uguali) diventa la form principale...
se ho detto una vaccata chiedo scusa, sto andando a memoria (magari
provero'...)
Ciao,
Alan Solo

 Alan Solo

 capace che mi sbaglio pure io... :=)
no, scusa, sono io che ho sbagliato, solo con application.CreateForm
viene impostata la form principale (la prima chiamata).
siccome voglio andare a fondo nelle cose ;) ho sbirciato la vcl:
procedure TApplication.CreateForm(InstanceClass: TComponentClass; var Reference);
var
  Instance: TComponent;
begin
  Instance := TComponent(InstanceClass.NewInstance);
  TComponent(Reference) := Instance;
  try
    Instance.Create(Self);
  except
    TComponent(Reference) := nil;
    raise;
  end;
  //************************************************
  if (FMainForm = nil) and (Instance is TForm) then
  begin
    TForm(Instance).HandleNeeded;
    FMainForm := TForm(Instance);
  end;
  //************************************************
end;
Ciao,
Alan Solo


Anche a me piace... ma in questo periodo sono incasinato... :=)
Devo partire tra pochi giorni per un periodo abbastanza lungo, Pasqua
inclusa.
Quindi faccio adesso a tutto il gruppo( La Forgia compreso... :=)) ) gli
auguri di Pasqua.
Inoltre un augurio speciale a te, a Callegaro, Zortek( o Sandr8, come si fa
chiamare in giro... eheheheheheh ),
Gnaffy ed altri che adesso non mi sovvengono... :=)


 ha scritto nel messaggio
news:5cMx6.9751$Oz4.2...@news2.tin.it...


 ), Gnaffy ed altri che adesso non mi sovvengono... :=)
auguri anche a te DeerBear / Andrea
Ciao,
Alan Solo
Newsgroup: it.comp.lang.delphi
Titolo: Simulare il tasto Applica2 - mi spiego meglio

Mi servirebbe applicare una modifica effettuata al Registro di Windows,
tramite la classe TRegistry.
E' possibile farlo?
Usando le API?
Grazie.

 tramite la classe TRegistry.
cerca
TRegIniFile
nella guida di delphi
bye
AS

 ha scritto nel messaggio
news:quEA8.3119$5k4....@twister2.libero.it...

Non so se ho capito bene (qualche parola in piů perň... stai facendo qualche programma
fuorilegge? :)) ma forse vuoi rendere attiva immediatamente una modifica al registry di
windows.
Se č cosě, ci devi dire *quale* modifica vuoi rendere attiva, perché alcune, tipo il
cambio di associazione per un tipo di file diventano attive all'istante, per altre bisogna
fare certi processi particolari.
Sii piů specifico, altrimenti non ti si puň aiutare.
--
Jax

 fare certi processi particolari.
La modifica da apportare è quella all'indirizzo e alla porta del server
proxy,
da connessioni - impostazioni LAN.
Grazie

 da connessioni - impostazioni LAN.
Da quello che so *dovrebbe* essere una modifica che si attiva immediatamente, anche se ho
avuto modo di sperimentarlo solo su win2000 e si è attivata solo dopo un minuto circa.
Altro non so...
--
Jax
Newsgroup: it.comp.lang.delphi
Titolo: Comunicazione seriale con Delphi 5

Ho la necessità di comunicare via seriale con una apparecchiatura esterna.
Qualcuno sa come si può fare ed eventualmente mi può fornire un esempio?
Grazie
Vescovo Fabio
E-Mail 
Ves...@tin.it

Vescky wrote:

Su torry trovi un componente che si chiama TComPort, io l'ho utilizzato e va
benissimo, all'interno dello zip trovi anche numerosi esempi
Max

Newsgroup: it.comp.lang.delphi
Titolo: file db2cli.dll per componenti DBExpress

Ciao a tutti,
qualcuno sa dove reperire la suddetta dll per far funzionare un componente
Dbexpress che ne richiede la presenza?
Grazie mille

non è che è una dll del client di db2?
Bye
A.


Confermo: nel mio pc, col client DB2 installato, si trova in
C:\Programmi\SQLLIB\bin
Ciao, Vittorio

 wrote in message
atq2pn$2il8$1...@newsreader1.mclink.it...


e dove lo trovo?
Ma il db2 ce l'hai o non ce l'hai? Se ce l'hai, devi installarti il client db2 che si trova
nella distribuzione stessa.
Cerca tra questi messaggi
http://www.ibm.com/search?en=utf&v=11&lang=en&cc=us&q=db2cli.dll
ciao
--
Buon      .-""",
 Natale    /____, \
          {_____}`{} 
Buone    (/ . . \)
 Feste   {`-=^=-`}
         {   `   }
          {     }jgs
Morde.     `-,-`

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

e ovvio che non lo ho... Ho solo il Paradox di Delphi
In tal caso, proprio non so dirti dove trovarla, la db2cli.dll.
Sorry


 e ovvio che non lo ho... Ho solo il Paradox di Delphi
Domanda: ma col dbexpress non dovevi collegarti ad un Database su DB2?
A cosa ti colleghi se non ce l'hai?
Vuoi dire che dbexpress vuole d'ufficio sta dll anche se non devi collegarti
a un DB2????
Sto solo cercando di capire....
ciao, Vittorio
P.S.: Se proprio ti serve sta dll ti spedisco la mia ma, a parte
considerazioni legali ecc., dubito che tu riesca a cavarci fuori qualcosa...

 wrote in message
aXhM9.3912$Q%4.11...@news1.tin.it...


 Non è che me lo potresti mandare?
OK, dimmi dove
Però ricorda che nell'installazione definitiva, se c'e' bisogno di questo
file, ci sarà bisogno lo stesso di una licenza DB2 Client per ogni
postazione.
Ciao, Vittorio

 wrote in message
tOzM9.9658$R45.4...@news2.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: Metodi di ZeosLib

Salve
qualcuno sa' dove trovare una lista dei metodi dei componenti delle ZeosLib?
Grazie
-- 
Gilberto Marzuillo
Via Ceccano, 13
81100 Caserta
Italia
Tel. 
+39 0823351859
Fax 
+39 06233239522
Cell. 
+39 3476496431
Cell. 
+39 3934634151
web: 
www.marzuillo.com
e-mail: 
gilb...@marzuillo.com
icq: 35603715

 ZeosLib?
Di solito quando qualcuno sviluppa una serie di componenti, specialmente 
come i Zeos, fornisce anche un help.
O ci volevi fornire del tuo biglietto da visita?


 ha scritto nel messaggio
news:41561a3c$0$21021$5402...@news.sunrise.ch...


 il mio biglietto da visita è la firma che mando a miei post o e-mail.
Guarda, non ho mai usato le ZeosLib e mi spiace non poterti dare una mano.
Eviterei comunque di postare in firma informazioni come il numero di 
telefono....
Acqua
Newsgroup: it.comp.lang.delphi
Titolo: TADOTable e il suo stato

ciao a tutti,
ho un problemino che non riesco a risolvere, neanche con i libri e internet.
è una cosa banale...ma non ne vengo a capo.
ho una tabella ado:
miaTabella: TAdoTable;
miaTabella.Insert; // per inserire un nuovo record in tabella.
la mia domanda è questa...
che istruzione è necessario usare  per rimettere la tabella in modalità
[dsBrowse]
ho provato.... miaTabella.State := [dsBrowse] ma la proprietà è di sola
lettura.
ringrazio tutti per l'antenzione.
Roberto Gammino

> miaTabella.Insert; // per inserire un nuovo record in tabella.
O usi il metodo Cancel; quindi annulli l'operazione di inserimento o, una
volta inseriti i valori, usi il metodo Post; per confermare l'inserimento
dei dati.
--
Acqua
-------------------------------------------------------
Download new version of my PixExperts for Delphi 6/C++ Builder 6 at
http://www.salexander.supereva.it/Pix_Exp171D6.zip

lettura.
All'atto della conferma dell'inserimento ti basta inserire un codice
del genere:
try
  miaTabella.Post;
except
  if miaTabella.State = dsInsert then miaTabella.Cancel;
  raise;
end;
p.s.: perché usi proprio le TADOTable ?

 ha scritto nel messaggio
news:8olrmvki83taohj8f...@4ax.com...

grazie per le risposte!
non c'è un motivo particolare, mi sermbrava il modo migliore per inserire un
nuovo record in una tabella.
invece per le ricerche SQL uso TADODataSet (per non tirarmi giù tutta la
tabella).
adesso mi viene spontanea la domanda... volendo utilizzare controlli in un
form come TDBEdit esistono altri strumenti?
grazie per l'attenzione
roberto
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.520 / Virus Database: 318 - Release Date: 18/09/2003

Newsgroup: it.comp.lang.delphi
Titolo: cambio dimensioni della form

quando a run-time faccio: MyForm.FormStyle:=fsMDIchild;
la form cambia le impostazioni di Width e Height, a meno che non sia 
impostato
il borderstyle su bsSingle, si puo' evitare che questo avvenga anche quando
il borderstyle e in bsSizeable, ovvero che rimangano le impostazioni 
predisposte?
grazie.

Tratto dalla guida in linea:
Note:	It is not advisable to change FormStyle at runtime.
-- 
Alberto Salvati
A NEAPOLITAN Delphi Developer who is studing c# and .net
"Dicette 'o pappece 'nfaccia 'a noce dammi 'o tiempo che pure te spertoso"
Newsgroup: it.comp.lang.delphi
Titolo: Incrementare un menù

Ho visto che qualche gg fa è stato postato il seguente codice per creare un
subitem in un menù.
var
 miSubItem: TMenuItem;
begin
 miSubItem := TMenuItem.Create(PopupMenu1);
 miSubItem.Caption := 'Pluto';
 PopupMenu1.Items[0].Add(miSubItem);
end;
A me servirebbe una cosa del genere ma con qualche automatismo in più. Cioè
vorrei che il menù si deve espandere automaticamente, con ciclo while, in
base ai dati letti da una tabella. Qualcuno ha già affrontato il problema?
Come può essere la tabella?
Ho provato a fare qualcosina ma praticamente non ho capito come far eseguire
tante volte Items[i] per arrivare al livello i-esimo registrato in tabella e
quindi creare la nuova voce con il metodo Add(Items).
Grazie.

for i:=0 to NomeTabella.RecordCount -1 do
  try
    SubItem:=TMenuItem.Create(nil);
    SubItem.Caption:=NomeTabella.FieldByName('NomeItem').asString;
    PopupMenu.Items[0].Add(SubItem);
  finally
    SubItem.Free;
    NomeTabella.RecNo:=i; 
  end;
Se hai bisogno di ulteriori chiarimenti contattami a 
http://delphiknight.cjb.net
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.delphi
Titolo: assegnare NULL a parametro di query numerico

devo assegnare un valore null a un parametro per un'update di una query,
come fare ?
    qUpdPwd.Parameters.ParamValues['checksum'] := ....
grazie.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

come fare ?
NomeCampoPersistente.AsVariant := null;
-- 
Morde.
"Papa, cosa sono le icone?" "Sono immagini sacre."
"E perche Windows ne ha tante?" 
"Perche ci vogliono i miracoli per farlo funzionare.."

NomeCampoPersistente.AsVariant := null;
Scusa, ho confuso i field con i parameters.
Sccome TParameter.Value e' di tipo OleVariant, il discorso non cambia,
utilizza null.
-- 
Morde. 
(morde at programmer dot net)

 utilizza null.
-- 


object"
Informazioni insufficienti. 
Fornire maggiori informazioni sul codice incriminato.


> NomeCampoPersistente.AsVariant := null;
no: metodo clear.
questa sintassi non è molto pulita. esiste il metodo Clear.
ByeBye
A
--
Per rispondere non usare il reply ma scrivere al seguente indirizzo:
zzato(at)supereva;it
Please, don'r reply this message.
Use this address:
zzato(at)supereva;it

metodo CLEAR.
Bye
A

questa sintassi non è molto pulita. esiste il metodo Clear.
Grazie Albertone :)
Infatti l'help dice:
-TParam.Clear
-Use Clear to assign a NULL value to a parameter. [...]
Siccome ho sempre lavorato a design time sui parametri, non avevo mai avuto la
necessita' di farlo runtime.


questa sintassi non è molto pulita. esiste il metodo Clear.
E` la stessa cosa.  

    qUpdPwd.Parameters.ParamValues['checksum'] := ....
qUpdPwd.Parameters.ParamValues['checksum'] := NULL
Newsgroup: it.comp.lang.delphi
Titolo: [OT] Avviso su Microsoft SP2 di windows xp

Microsoft ha rilasciato una chiave di registro per bloccare il download del
sp2 fino ad aprile 2005.
E dicevate che andava bene.
Alla faccia che ......................
Microsoft.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

dove lo hai trovato??
Simo
"Microsoft" <in...@Microsoft.com> ha scritto nel messaggio
news:82Z84Z66Z251Y1...@usenet.libero.it...


sp2 fino ad aprile 2005.
Per favore vai a trolleggiare da qualche altra parte, qui va a finire che
vieni segnalato all'abuse di 
libero.it
.
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

Newsgroup: it.comp.lang.delphi
Titolo: Problema con file jpg

Salve a tutti,
ho memorizzato delle immagini jpg in dei campi blob di una tabella, ma non
tutti i record hanno un'immagine. Ho questo problema con il seguente codice:
var
  Stream1: TBlobStream;
  Photo: TJPEGImage;
begin
  Stream1 := TBlobStream.Create(Table1.FieldByName('YourFieldName')
                          as TBlobField, bmRead);
  Photo := TJPEGImage.create;
  try
    Photo.LoadFromStream(Stream1);
    Image1.Picture.Assign(Photo);
  finally
  Stream1.Free;
  Photo.Free;
end;
quando nel campo non c'č memorizzata nessuna immagine ho un errore "Jpeg
error #41" che non riesco ad intercettare.
Qualcuno sa che errore č e come ovviare al problema.
Grazie.







> Grazie.
hai provato testando Table1.FieldByName('YourFieldName').isnull ?
ciao ciao, Luca.
-- 
ICQ: 11024183
"La prova che nell'universo esistono altre forme 
di vita intelligente e'  che non ci hanno 
ancora contattato."  ( Bill Watterson )

Newsgroup: it.comp.lang.delphi
Titolo: Documentazione XMLSChema

Salve,
c'e` qualcuno che sa dove trovare documentazione, help files, esempi... 
qualsiasi cosa che possa aiutare ad usare quello che c'e` in XMLSchema.pas
Grazie
Enrico



La prima cosa che dovresti fare è spiegare meglio e nei dettagli che cosa
vuoi sapere... stai partendo dalla risposta (XMLSchema) per farti dare la
domanda appropriata ?
-- 
Morde
Newsgroup: it.comp.lang.delphi
Titolo: Applicazione con database

Salve a tutti e un grazie in anticipo per l'aiuto che mi potete dare.
Premetto che mi diletto a realizzare programmi in delphi per hobby e
ultimamente volevo realizzare un'applicazione che mi permetesse di
gestire più di una tabella. Per fare questo realizzato una procedura
che mi collega alla tabella desiderata attraverso l'istruzione
"Table.TableName:= nome tabella". Il problema che ho è che il nome dei
campi non sono uguali per le tutte le tabelle e nella DBGrid restano
visualizzati i nomi dei campi della prima tabella che ho utilizzato in
fase di debug. Mentre la registrazione dei record viene effettuata
regolarmente. Si può risolvere questo problema o c'è un problema di
impostazione del programma?
PS: Inizialmente volevo realizzare un'applicazione MDI dove le "Form
Child" dovevano contenere una tabella ciascuna, ma quando veniva
eseguita l'istruzione Table.Insert si verificava questo errore:
"Access violation at address 0049A504 in module 'Prova.exe'. Read of
address FFFFFFFF". 
[Gio]


    Via De Gasperi, 14 - 42019
    Scandiano (Reggio Emilia)

[...]
Marco, ho notato che hai una certa attitudine nello spiegare molto chiaramente
le varie caratteristiche di Delphi.
I tuoi post e' sempre un piacere leggerli perche' ci sono delle chiare
spiegazioni sul *perche'* fare una certa cosa, invece che solo il *come*
farla, come normalmente si risponde sul ng.
Dico questo per chiederti se hai magari scritto qualche libro, tutorial,
qualcosa che si possa utilizzare come testo di riferimento...
Ciao
-- 
Morde. 
morde[at]programmer[.]net


Secondo me, spiegare il "perchè" invece del "come" aiuta la persona che
chiede aiuto a ragionare su una cosa e a permetterle, in futuro, di
arrivare autonomamente ad una soluzione senza chiedere nuovamente una
domanda che, magari, è simile se non identica alla precedente.
Delphi mi piace particolarmente e ho sempre preferito documentarmi
cercando del materiale il più discorsivo possibile poichè, se si riesce
ad avere la teoria, la pratica a volte viene da sè...poi mi viene da
pensare, probabilmente sbagliando, che anche gli altri abbiano la stessa
preferenza, quindi scrivo messaggi di risposta attenendomi a questa
"indole"...mentre magari qualcuno vorrebbe solamente un blocco di codice
nudo e crudo...e basta. ;-)
Ti ringrazio comunque dei complimenti ma non ho scritto (purtroppo)
alcun libro, anche se mi piacerebbe. :-)
Solo qualche articolo, e tra l'altro uno solo di questi parla di Delphi.
:-(

Newsgroup: it.comp.lang.delphi
Titolo: Maggiore astrazione...

Ciao a tutti, vorrei sapere se sta cosa si puň fare e come si fa :-)...
Avendo delle tlabel su una form cosě:
label1 label2 label3 label4 label5 , sapete se posso accedere ad esse con un 
ciclo for chiamandole per nome ed aggiungendo il numero?
In casi normali farei cosi
for i:=0 to componentcount-1 do
 if components[i] is tlabel then
  for x:=1 to 5 do
    if tlabel(components[x]).name='label' + inttostr(x) then //fai 
qualcosa...
In questo modo io accedo alle label tutte e 5 senza scriverne il nome... a 
esiste na cosa piů veloce? Mi servirebbe accedere al componente direttamente 
in base al suo nome
esempio voglio label1.caption : label+inttostr(i).caption// error  una cosa 
del genere...
Chiedo scusa in anticipo se ho scritto un sacco di mink.... 

in base al suo nome
  if FindComponent(Format('label%d', [I])) ...

  if FindComponent(Format('label%d', [I])) ...
Grazie mille per la velocissima risposta... saluti a tutti.
Newsgroup: it.comp.lang.delphi
Titolo: coTaskMemFree

ciao
devo mettere qualcosa nel 'uses per usare questo?
coTaskMemFree
erik

si
Bye
A


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

Newsgroup: it.comp.lang.delphi
Titolo: Movimento form

La mia form principale richiama la form di un'altra unit con
NomeForm.ShowModal formata da:
    1. un ciclo che lavora con la porta seriale
    2. una progressbar
    3. un pulsantino da premere alla fine della procedura
Purtroppo, finche' non finisce la procedura non riesco a muovere (con il
mouse) la form che ho richiamato; inoltre, passando ad altri task e
ritornando sul mio programma non viene aggiornata la suddetta form finche'
non finisce il ciclo. :(
Faccio presente che il codice richiamato fa parte del programma principale,
cioe' ho ridefinito la procedura FormShow all'interno del programma in
questo modo:
  TMyProgForm = class(TProgForm)
    procedure FormCreate(Sender: TObject); override;
    procedure FormShow(Sender: TObject); override;
  private
    { Private declarations }
  public
    { Public declarations }
  end;
dove TProgForm e' una form con la progressbar.
Come posso risolvere il problema ?
Ciao.
Simone.
==============================
...e Dio disse: "pkunzip universo.zip"
e-mail: 
drfa...@tiscalinet.it
web: 
http://go.to/drfalken
 (internet
su numero verde, pascal, assembler,
mp3 player, tips'n'tricks)
==============================

 non finisce il ciclo. :(
Ciao!  In un ciclo molto lungo ( > di 2 secondi), dovresti usare la
Application.ProcessMessages
Questa ti permette di "ascoltare" gli altri messaggi che stanno arrivando
alla tua finestra durante il ciclo, in modo da rispondergli ogni tanto.
Ad esempio, se hai un ciclo tipo :
For i := 0 to 400000 do begin
 ... operazioni non troppo lunghe, ma che messe in un ciclo cosě lungo
diventano lunghe...
  Qui ci puoi piazzare Application.ProcessMessages;
end;
Visto che la form puň rispondere ai messaggi, devi fare in modo che, ad
esempio, se l'utente vuole terminare anzi tempo l'operazione, di gestire
l'evento.
Spero di averti aiutato...   Davide DG.

     1. un ciclo che lavora con la porta seriale
Ciao,
         se è un ciclo "normale" puoi fare come ti ha scritto Davide
(possibilmente evita di richiamare Application.ProcessMessages ad ogni
iterazione se sono tante...).
Se stai lavorando sulla seriale con le API (e quindi penso che ti metterai
in attesa con qualcosa di equivalente alla WaitForSingleObject) prova a
sfruttare la MsgWaitForMultipleObjects...
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply



Newsgroup: it.comp.lang.delphi
Titolo: esecuzione metodo da stringa

Devo creare un nuovo componente visuale costituito da un pannello contenente
2 TEdit e 1 TButton. Per semplificarmi la vita mi sarebbe comodo riuscire ad
aggiungere una proprietà in cui specificare il metodo della TForm, su cui è
disegnato, da eseguire.
Esempio:
Disegno sulla TForm1 il mio nuovo componente TMyComp1.
Alla relativa proprietà del componente vado ad assegnargli il nome del
metodo della TForm1 da eseguire: TMyComp1.eseguiForm:= 'TForm1.calcola';
oppure: TMyComp1.eseguiForm:= 'Parent.calcola';
Il metodo 'calcola' della Form madre esegue delle operazioni particolari che
non vorrei duplicare nel mio componente personalizzato.
E' possibile farlo? Qualcuno ha avuto già esigenza simili?
Grazie!

 Grazie!
-- 
Ciao, Anto', [37, 143, AQ] 
MB C SC 220 CDI Magma Rot
"Di sempre cio' che senti e fai cio' che pensi."
    G.G. Màrquez

 ha scritto nel messaggio
news:2zo6e0wmk78k.f...@40tude.net...


Newsgroup: it.comp.lang.delphi
Titolo: Creare un vettore di TServerSocket?

Ciao!
Mi trovo nella necessità di avere un vettore di Server, qualcosa tipo
servers[i]... non riesco però a farlo :-(
Ho provato un classico
var servers: array[1..5] of TServerSocket
nella dichiarazione var della Unit e poi nella Form.Activate un for
che fa
for i := 1 to 5 do
servers[i].Create(Form1);
La compilazione sembra ok ma appena parte il programma mi spara un
exception fault...
Cosa può essere? Dove sbaglio?
Il problema mi si presentava anche altre volte quando volevo creare
vettori di oggetti... alla fine facevo a mano oggetto1, oggetto2 etc
ma non era molto comodo!
grazie 1000

 servers[i].Create(Form1);
servers[i] := TServerSocket.Create(Form1);
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

servers[i]... non riesco però a farlo :-(
vi prego di dimenticare l'immonda czzt che ho scritto... probabilmente
non fa bene programmare ad oltranza :-)
Ovviamente non appena un neurone ha ripreso a girare ho capito e
risolto!
grazie