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

mi piacerebbe poter trascinare gli items di alcuni checklistbox in
altri check list box... in modo tale da eliminarli dal chklisbox
origine e depositarli nel destinatario....
non riesco a trovare il modo di implementare il trascinamento...
l'unica cosa che sono riuscito a fare è una cosa del genere....
on click....
cklistboxorigine.delete(itemindex);
cklistboxdestinazione.add(cklisboxorigine.items[itemindex));
ma non mi piace...
se ic cklist è vuoto non riconosce l'onclick...
chi mi dà una mano?

 non riesco a trovare il modo di implementare il trascinamento...
Hai provato con DragandDrop ?
Saluti NEA

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

Come posso riprodurre un file midi?
Grazie.

 Grazie.
Con un TMediaPlayer no?
--
Jax
Journeying Artificial Xenomorph

Newsgroup: it.comp.lang.delphi
Titolo: "OR" tra stringhe...

Salve amici...eccomi qua con l'ennesimo quesito "strano"...
Ho 2 stringhe:
prima=     K00000000000
seconda=  12345
E' possibile farne una sorta di "or" in modo da ottenere
K00000012345     (quindi con una lunghezza fissa uguale alla prima)
La prima è sempre uguale, la seconda è il risultato di un'operazione 
matematica, in seguito convertita in stringa e da dare in pasto alla 
fantomatica "or".
Esiste qualche funzione già fatta? Cioè...è possibile fare "or" tra 
stringhe? 

Mi son fatto un loop.... :)  xò sarebbe carino se esistesse una funzione già 
fatta no?

 matematica
*Quale* funzione matematica ? definisci senza ambiguità come dovrebbe
operare questa funzione e sicuramente potrai tradurla in Delphi.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 operare questa funzione e sicuramente potrai tradurla in Delphi.
Fare un' "OR" a livello di char....ma mi sà che ho sparato una 
cavolata....(sai...il caldo!)
Cmq ho risolto con un semplice ciclo che aggiunge degli '0' in testa...mi 
sembra la soluzione più veloce :)


 K00000012345     (quindi con una lunghezza fissa uguale alla prima)
Non ti serve un or, se sono di tipo string basta che togli alla prima la
lunghezza della seconda, poi aggiungi la seconda:
SetLength(prima, Length(prima) - Length(seconda));
terza := prima + seconda;
-- 
/home/nurax/Documents/firma.pan

 
Puoi usare la funzione stuffstring:
terza_=stuffstring(prima,length(prima)-length(seconda)+1,length(seconda),seconda);
cosě non perdi il contenuto di "prima".
bye, giubbe

Grazie a quelli che mi hanno risposto :)
Molto gentili,come al solito!
(non mi pareva ilcaso di fare 2 post di ringraziamento!) 

 cavolata....(sai...il caldo!)
Eh sì, me sa de sì, perché "OR a livello di char" non vuol dire nulla.
Spiegami:
'1' or 'A' = ?


 '1' or 'A' = ?
Poteva essere un'OR a livello di byte :)

 Poteva essere un'OR a livello di byte :)
Capisco, scherzavi ;)


 ha scritto nel messaggio 
news:44e5c525$0$35068$4faf...@reader4.news.tin.it...

n:=Length(Prima)-Length(seconda);
str:=copy(Prima,1,n);
str:=Str+seconda;
Giorgio 

 Giorgio
Grazie! La tua č la soluzione piů semplice! (io addirittura un loop...si 
vede il caldo...)
Newsgroup: it.comp.lang.delphi
Titolo: DLL x Excel [D5]

Salve a tuttti...
qualcuno sa come esportare una dll per Excel ?
Intendo per la funzione "Richiama" di Excel (Office97).
Riesco ad importare tutte le funzioni del kernel e di windows in generale,
ma non le mie...
e non capisco se c'č un errore :
1) In come scrivo la dll (non penso, visto che č semplicissima, giusto per
fare un test...)
2) Nel percorso di ricerca (ma l'ho messa praticamente dappertutto : path,
windows, system, ecc...)
**3) Devo forse registrare in qualche modo la mia dll sotto windows?
mi vengono in mente alcune installazioni di software che ad un certo punto
dicono "Registering DLLs" (ad esempio ICQ...)
Per farvore aiutatemi perchč ci sto impazzendo!!! 8))
Ciao & thx,         Davide DG

 Intendo per la funzione "Richiama" di Excel (Office97).
Ok... ho risolto scrivendo un oggetto COM e utilizzando l'editor VBA di
Excel... è un po' + laborioso ma è + semplice...(credo)
Ciao!!    Davide DG

le DLL non si registrano mica con REGSVR32 <NOMEDLL> ?
--
Gna...@Wappi.com
ICQ# 76488613

aaaaaaaaaaaaaaaaaaaaaaaaargh!
6 un masochista!
Io ne ho creata una per word e funziona alla grande.
nella dll che un form con una dbgrid che mostra il contenuto di una tabella.
Inoltre, il form riceve parametri da word.
Per carita: un com? Manco morto: è tecnologia di zio Billy e quindi non
funziona!
Se vuoi "scavalcare" quella immondizia fammelo sapere: ti mando un po di
codice esemplificativo.
Saluti
AS
"Se è Microsoft non funziona"
Newsgroup: it.comp.lang.delphi
Titolo: file dcu

sto cercando disperatamente un file dcu ma non lo trovo da nessuna parte, ho 
provato anche con i motori di ricerca ma nulla, il file in questione è 
WBFuncs.dcu, sono in possesso del file 'WBFuncs.pas quindi volevo sapere se 
mi potevo ricavare o trasformarlo in dcu e se si, come si fà? uso delphi 7
grazie a tutti per la collaborazione 

 si, come si f`? uso delphi 7 grazie a tutti per la collaborazione
A che cosa ti serve il DCU se hai il sorgente? Includi quello
nell'applicazione da compliare.
-- 
Vuoi distribuire il tuo sito web su CD/DVD?
Prova 
http://www.dwebpro.com/
Vuoi diventare un esperto analista Delphi?
Vieni a fare uno stage con noi: 
http://www.creativepark.it/stage/


ho scaricato questo sorgente dalla rete e facendo come hai detto tu ho 
risolto il problema ma ne ha generato un altro... per favore ci puoi dare 
un'occhiata? il link è questo 
http://www.torry.net/samples/samples/internet/MiniWebbrowserDemo.zip
grazie... 

 grazie...
Scusa se te lo dico, lo faccio senza voler offendere, ma non mi sembra il
modo di usare il NG.
Se hai un problema invia un post spiegando dettagliatamente cosa accade ed
in che contesto, dire "non mi funziona ecco il link" mi sembra piů un
sistema da assistenza clienti o da troll...
Ciao

 Ciao
scusa ma non posso mica scivere sul NG tutto il listato per poi scrivere 
anche gli errori che mi dà (il listato è lungo)
inoltre io non ti ho puntato nessuna pistola alla testa, se mi vuoi dare una 
mano bene altrimenti con la tua critica non mi aiuti a risolvere il 
problema... kmq chiedo scusa a tutti quelli che fanno parte di questo NG e 
che la pensano in questo modo. grazie a tutti 

 ha scritto nel messaggio 
news:47900346$0$4797$4faf...@reader4.news.tin.it...


place was a
    difficult one to reach, but at last satisfactory plans were made,
    the day and hour set. There were three officers and three Chinese
    girls from the Mission. It was a good-sized rescue party and
    divided into three companies, we guarded well the three exits from
    the low-roofed house on Spofford alley. With Sergeant Ross leading
    and our courageous young interpreter at our side, we stealthily
    ascended the dark, narrow stairs to the second floor, where a
    heavy door barred the way, but for such obstacles our good officer
    was prepared. A few blows of his strong hammer made bolts and bars
    yield. We passed through into a small dark passage. From there
    could be heard on all sides sounds of excitement; light feet
    running hither and thither to places of escape, only to be turned
    back by the sight of our guards, who stood on watch. As we
    cautiously felt our way further in we were met by the baffled and
    angry keeper of the den--a woman, but not worthy the name
Newsgroup: it.comp.lang.delphi
Titolo: Caricamento file

Salve a tutti
Avrei la necessità di passare tutto il contenuto di un file TXT in un campo
di una tabella paradox.
Che comandi devo usare da codice ?
Conviene che dichiaro il compo della tabella di tipo BLOB ?
Grazie.

Napoli Daniele ha scritto:

Io, le poche volte che ho avuto questa necessita', salvavo nel DB
(qualunque fosse) solo il percorso del file, senza usare campi BLOB.
Se questo accorgimento su DB SQL seri non ha molto senso, puo' essere
molto utile su DB file based tipo Paradox (prestazioni, dimensioni,
gestione campi BLOB, ecc...).
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Newsgroup: it.comp.lang.delphi
Titolo: modifche sul dbgrid in tempo reale

ho un applicazione dove ho questo problema:
se registro una modifica e dopo richiamo la finestra di riepilogo delle
fatture non riesco a vedere la modifica in diretta sul dbgrid, per vederla
devo chiudere e riaprire l'applicazione.
Il dbgrid ha come datasource una query , come posso fare?Non esiste qualcosa
per fargli fare una specie di refresh ?Mi hanno parlato dell'ipdatesql come
si usa passo passo?Grazieeeeee.
--------------------------------
Inviato via 
http://usenet.libero.it

Prova a fare il refresh della query (NomeQuery.Refresh) dopo aver fatto le
modifiche, dovrebbe funzionare.
Ciao
Max


Se non funziona il refresh(come spesso accade) usa la proprietą requery
Ciao
Newsgroup: it.comp.lang.delphi
Titolo: Opinioni su autoaggiornamento

Salve a tutti,
ho in mente di fare un programma che si autoaggiorni ogni avvio.
Avevo in mente questa idea, mettere una chiave nel registro contentente la
versione, scaricare un file txt, leggerlo, se la versione è la stessa
continua altrimenti scarica i nuovi contenuti.
Solo però ho trovato un problema: ho tre utenti, uno con la 0.1, uno con la
0.2 e un altro con la 0.3. Come faccio a far capire al programma che
l'utente con la 0.1 deve scaricarsi determinati files e quello con la 0.2
altri ?
Avete altre proposte per autoaggiornare un programma ?
Grazie,
Kaldais

rimanendo sulla stessa soluzione...... file txt diversi per ogni versione
Newsgroup: it.comp.lang.delphi
Titolo: Incompatibilità librerie Jedi-Abakus

Salve, ho appena riformattato il mio PC e reinstallato sistema operativo e
Delphi 2005 professional.
Ho applicato gli update da 1 a 3 di Delphi e poi ho iniziato a installare le 
varie
librerie che utilizzavo già in precedenza.
Tutto bene finchè non ho installo le Jedi (JVCL 3.20) e Abakus VCL V2.90
utilizzando i tools di installazione forniti con i pacchetti. A questo 
punto, all'avvio,
Delphi mi dice che non riesce a trovare: AbkStd2005.bpl che però esiste e si
trova proprio dove Delphi la cerca.
Disinstallando e reinstallando ho notato che le librerie singolarmente 
funzionano
regolarmente mentre insieme sorgono i problemi.
Ora, dopo varie installazioni e disinstallazioni, Delphi parte regolarmente 
ma se
apro un progetto sviluppato precedentemente mi da ancora l'errore:
"AbkStd2005.bpl non trovato" la cosa strana è che se chiudo il progetto e lo
riapro subito dopo senza uscire da Delphi tutto funziona correttamente e 
posso
di nuovo compilare il progetto stesso.
Da notare che la situazione precedente la formattazione era esattamente la 
stessa;
non è cambiato nulla (PC, S.O. versioni di Delphi e delle librerie sono 
sempre gli stessi!)
Qualcuno ha qualche idea per risolvere il problema?
Grazie e saluti a tutti
                                           Alessandro 

 librerie che utilizzavo già in precedenza.
Hai provato a reinstallare i vari update e le librerie con le stesse
precedenze date prima della formattazione? Intendo, magari avevi installato
il primo update di Delphi, quindi una libreria, poi un'altro update e a
seguire un'altra libreria...nel mio lavoro problemi del genee capitano quasi
tutti i giorni...non è proprio la stessa cosa ma alle volte capita che +
programmi sovrascrivano una dll condivisa la cui modifica non piace ad
un'altra applicazione ma viceversa non si manifesta alcun problema...
Ciao
Valter

Purtroppo non ricordo l'ordine di installazione; farò qualche tentativo.
Grazie per il suggerimento
              Alessandro 

 trova proprio dove Delphi la cerca.
Prova a spostare AbkStd2005.bpl  nella \Bin di delphi.
Giorgio 

 Giorgio
Ottimo in questo modo problema risolto.
Grazie mille
                                 Alessandro

Newsgroup: it.comp.lang.delphi
Titolo: [Ot] Per chi si è registrato per 4/11..

Ho ricevuto poco fa una mail che conferma l'iscrizione e ricorda data e 
luogo della manifestazione.
Suggerisco a quanti erano preoccupati per questa cosa di controllare.
-- 
Alberto Salvati
An italian delphi developer that are studing c# & .Net

 Suggerisco a quanti erano preoccupati per questa cosa di controllare.
Sì, è arrivata anche a me. :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 Suggerisco a quanti erano preoccupati per questa cosa di controllare.
E' arrivata anche a me, dalla cara Ylenia Mori...
Saluti
	Marco Bortolani
	info @ 
marcobortolani.it
Newsgroup: it.comp.lang.delphi
Titolo: Object Pascal Reference

Partendo da zero nell'apprendimento di Delphi 5, sto studiando il manuale
dell'help in linea "Object Pascal Reference", che è in lingua inglese, e, a
puro titolo personale e a scopo didattico, lo sto piano piano traducendo
letteralmente e integralmente in italiano (output su un documento Word). Per
ora sono al 4° capitolo.
Una volta finito il lavoro (+/- tra qualche mese), secondo voi può
interessare a qualcuno se lo pubblico su un sito web e lo iscrivo ai vari
motori di ricerca?
Cioè può essere una cosa utile?
O magari esiste già qualcosa di simile?
Grazie,
Mauro.
   - - -       - - -       - - -
"Non è morto ciò che in eterno può attendere,
e col passar di strane ere, anche la morte muore."
H. P. Lovecraft, The Nameless City (1921), in Weird Tales, novembre 1938.

motori di ricerca?
Non credo sia legale.
Per le localizzazioni del sw e della documentazione credo sia
necessaria l'autorizzazione scritta da parte della Borland.
Fai bene ad informarti.

sarebbe molto interessante ed utile :)

Mauro Filippetto wrote:

l'idea è interessante e sarei pure disposto a darti una mana. avevo penasto
anch'io a una cosa del genere ma, come dice Walkie Talkie (scusa la confidenza),
penso sia necessaria un'autorizzazione. fammi sapere caso mai, io uso D4 ma
penso sia lo stesso.
Enri

 ha scritto nel messaggio
news:9d1rcj$g8lu3$1...@ID-86629.news.dfncis.de...

Per le questioni di copyright vai su nntp://
forums.borland.com
 newsgroup
borland.public.delphi.non-technical .
Lì puoi domandare( in inglese naturalmente ) tutte le questioni di codesto
genere e spesso risponde John Kaster in persona... :=)
Ciao!
Andrea

 O magari esiste già qualcosa di simile?
Sarebbe una gran bella cosa...
Ciao
Gianni Giusti
Newsgroup: it.comp.lang.delphi
Titolo: Creazione di ActiveX

è possibile (e come?) creare dei componenti AvtiveX (badate non
controlli ma bensì componenti) che compaiano nella pagina dei
componenti? Oppure si devono creare dei componenti COM?
In pratica la necessità è quella di creare dei componenti in builder da
poter utilizzare in Delphi.
Ciao e grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 poter utilizzare in Delphi.
Xche proprio degli activex?
Avessi detto che devi usarli da altri linguaggi, ok.
Ma, se devi usarli da delphi, xche non creare dei vcl?
Bye
AS

 Ma, se devi usarli da delphi, xche non creare dei vcl?
li devo usare in Delphi 6, ma il vero problema è che devono essere 
fatti in Builder perchè li deve fare un mio amico che ha già delle 
rutine che fanno al caso nostro scritte in builder.
Quindi siccome ho saputo (e se così non fosse sarei molto contento) 
che non è possibile creare dei componenti (*.bpl) in builder 
compatibili con Delphi, abbiamo pensato di creare degli ActiveX.
Ora il problema è che il Wizzard del Builder per la creazione degli 
ActiveX (che è uguale a quello di delphi) permette di creare 
dei CONTROLLI ActiveX (partendo quindi da un TControl) 
ma la nostra necessità è quelladi creare dei componenti 
non visuali (partendo da TComponent).
Quindi, è possibile creare dei COMPONENTI ActiveX?
o bisogna creare dei componenti COM?
è chiaro che se esistesse la possibilità di utilizzare 
dei componenti.bpl scritti in Builder sarebbe la soluzione ottimale.
La soluzione estrema sarebbe quella di emigrare il lavoro fatto in 
builder su delphi
Ciao e grazie mille.


Potresti con il Builder creare una DLL esportando solo le routine che ti
interessano cosě come sono ed implementare una classe wrapper in Delphi
che si interfacci ad essa mantenendo cosě la programmazione ad oggetti.
Credo che questa sia la soluzione piu semplice e che richieda meno 
lavoro.
Ciao, buon lavoro


Grazie del consiglio, ora non mi resta che convincere il mio amico 
a passare in delphi.
Comunque non sapresti come creare un ActiveX non visuale?
Ciao e Grazie. 


"Stefano Radici"  ha scritto nel messaggio
| Comunque non sapresti come creare un ActiveX non visuale?
|
In D4, l'autocomposizione di Delphi puo' generare controlli ActiveX
solo da controlli VCL che discendono da TWinControl (e nemmeno da
tutti).
Per creare un controllo ActiveX che non discende ad TWinControl
e' necessario fare tutto a mano utilizzando il framework DAX.
Purtroppo io non ho mai avuto la necessita' di farlo (fortunatamente,
in quanto ad occhio direi che sia una impresa assai difficoltosa),
e quindi non ti posso aiutare ulteriormente.
Prova a vedere se trovi qualche aiuto nei NG Borland dedicati
agli ActiveX.
--
Ciao.
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio
Newsgroup: it.comp.lang.delphi
Titolo: DBWebLabel e dimensione

D2006
Dopo avere inserito delle DBWebLabel all'interno delle celle di una tabella
e averle ridimensionate da 100px (il default) a 8px (devono contenere due
caratteri) se salvo e riapro il progetto me le ritrovo tutte alla dimensione
originale che mi distruggono il layout della table fino al mio nuovo
ridimensionamento.
Oltretutto i campi letti dal DBWebDataSource, all'apertura del progetto,
sono proprio di due caratteri...
E' successo anche a voi? Avete trovato il sistema per bloccare le
dimensioni?
Grazie
Valter

 ridimensionamento. [...]
Non uso abitualmente i controlli dbWeb di Borland, ma generalmente 
attribuisco la dimensione ai controlli usando la proprietà /Style/, cioè 
definendo lo stile (CSS), al posto della proprietà /Width/ o /Height/ 
perché spesso il framework sceglie un'implementazione compatibile solo 
con Internet Explorer.
Prova ad assegnare le dimensioni in questo modo e vedi se il problema si 
ripresenta.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 Non uso abitualmente i controlli dbWeb di Borland [..]
Io devo leggere dei valori da Access e visualizzarli in una pagina. Tali
valori sono di sola lettura.
Pensi sia meglio estrarli manualmente ed assegnarli alla proprietŕ text di
una Label anzichč usare DBWeb?
Grazie
Valter

 una Label anzichè usare DBWeb?
Non vedo problemi con entrambe le soluzioni. Scegli quella che fa più 
comodo. Purtroppo sono un po' a digiuno dei *dbWeb Controls* e quindi 
non posso darti ulteriori indicazioni o suggerimenti. :-(


Newsgroup: it.comp.lang.delphi
Titolo: TOpenDialog per selezionare una directory

E' possibile utilizzare TOpenDialog per selezionare una Directory anzichè un
file ?
Che altro componente già pronto posso trovare nell'IDE delphi ?
Grazie anticipatamente,
Riccardo
-- 

Non c'è un componente ma una funzione, SelectDirectory(). Se hai una 
delle ultime versioni di Delphi puoi usare il controllo ShellTreeView per 
fartene uno custom. In alternativa c'è un componente in ShellShock della 
ex TurboPower (la trovi su SourceForge).
Luigi D. Sandon - D&amp;D Support Team
--- posted by geoForum on 
http://www.delphiedintorni.it

Che altro componente già pronto posso trovare nell'IDE delphi ?
Prova a vedere questo thread di icld: 
http://tinyurl.com/5fhfo
Ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 Prova a vedere questo thread di icld: 
http://tinyurl.com/5fhfo
Grazie mille, proprio quello che mi serviva.
Riccardo
Newsgroup: it.comp.lang.delphi
Titolo: D2007 : quali nuove features ha il debugger?

Mi rivolgo a coloro che conoscono D2007: rispetto al debugger di D7, quali
features in più possiede ?
D7 lo utilizzo già pesantemente per fare il debug di server com e dll..
magari con il 2007 hanno potenziato la parte di debug sui servizi, sui
threads, ecc..
Ciao a tutti
-- 
Morde

 features in più possiede?
Dicevi?
http://blogs.codegear.com/chrishesik/archive/2007/04/13/33946.aspx
:-)
C'è anche un filmato della CodeRage che mostra alcune "feature".
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 Dicevi?
Sei un grande :)
grazie
ciao
-- 
Morde

Newsgroup: it.comp.lang.delphi
Titolo: [delphi]Problemi con debug

 Sapete perche quando cerco di fare il debug, ad un certo punto sulla 
barra del titolo di delphi compare "STOPPED" e il programma va in 
crash!!!!!neanche con ctrl+F2 riesce ad uscire!
premetto uso delphi turbo explore!
Grazie
--- posted by geoForum on 
http://www.delphiedintorni.it

 crash!!!!!neanche con ctrl+F2 riesce ad uscire!
Non so se le informazioni che hai fornito sono sufficienti ad 
individuare il problema.
Cosa fa la tua applicazione? Qual è l'operazione in corso nel momento in 
cui va tutto in crash?
Fornisci qualche dettaglio aggiuntivo... :-)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)


Un esempio:
Eseguo un ciclo su una tabella, per iterare dei record!


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

Salve!
Dovrei plottare un grafico: vorrei fare in modo che se esco dall'area a
disposizione mi vengano visualizzate delle scroll bar. Come posso fare?
Quali componenti (possibilmente standard o gratuiti) devo usare?
grazie
ale.ber
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

ale.ber
	Ciao
	MassimoB
 
---------------------------
http://www.massimobeschi.it/
Newsgroup: it.comp.lang.delphi
Titolo: Sapere la porta Fisica della Stampante

Come da oggetto, vorrei sapere come è possibile avere la porta fisica alla
quale è collegata la stampante.
cioè LPT1: o LPT2: se locale o \\Server\Laser se fosse una laser collegata
su un server.
Ho provato a guardare l'oggetto printer, ma non ho trovato nulla.
Se un anima pia potesse aiutarmi, ringrazio anticipatamente.
--
Gianluigi Genasi
--------------------------
Minisystem Srl
Server di posta Kpnqwest - 
www.kpnqwest.it

>    LPTSTR    pPortName;  << Quello che cerchi?
    LPTSTR    pDriverName; 
    LPTSTR    pComment; 
    LPTSTR    pLocation; 
    LPDEVMODE pDevMode; 
    LPTSTR    pSepFile; 
    LPTSTR    pPrintProcessor; 
    LPTSTR    pDatatype; 
    LPTSTR    pParameters; 
    PSECURITY_DESCRIPTOR pSecurityDescriptor; 
    DWORD     Attributes; 
    DWORD     Priority; 
    DWORD     DefaultPriority; 
    DWORD     StartTime; 
    DWORD     UntilTime; 
    DWORD     Status; 
    DWORD     cJobs; 
    DWORD     AveragePPM; 
} PRINTER_INFO_2; 
Preso dalla guida Windows SDK di D6.
Bye
AS
"Se è Microsoft non funziona"
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Premessa Uso D5 e la cosa dovrebbe funzionare su Win98/2000/Xp (Tombola !!)
Ti ringrazio per l'aiuto, ma pur essendo un annetto che lavoro con Delpi 5
per lo sviluppo di un gestionale,
 le cose più 'tecniche' come quella che mi hai segnalato francamente non le
so mettere in pratica, potresti
dirmi anche come richiamarla, se non ho capito male è una API di Windows,
l'ho cercata nel 'mio' SDK e in effetti
ho trovato qualche cosa.
Forse è meglio spiegare quale è il mio problema reale :
Nella procedura faccio stampe direttamente su stampanti ad aghi facendo :
        AssignFile(P,PRNName);
        Rewrite(P);
        ecc..
ovviamente PRNName è la porta Fisica della Stampante, ora lo rilevo
prendendo
 il nome della stampante dall'oggetto printer. ecc... , mi torna qualcosa
tipo 'Epson on LPT1:' o 'Epson on \\Server\Epson'
da questo era facile ricavare la porta fisica.
Il bello è venuto con Win2000, non so con XP, il caso precedente mi ritorna
'Epson' o '\\Server\Epson' quindi niente porta !!!
Al momento ho risolto passandogli la porta fisica da programma, ma mi
piacerebbe trovare una soluzione più 'pulita'.
Scusate la prolissità.
Gianluigi Genasi

 Gianluigi Genasi

Newsgroup: it.comp.lang.delphi
Titolo: Quanto valutare un'ora di assistenza tecnica?

Come vi comportate in termini monetari per una richiesta di assistenza tecnica in cui non c'è
sostituzione di hardware ma per esempio configurare una rete oppure NT oppure installare del
software, in generale una prestazione legata più al software che all'hardware?
Ringrazio chi risponde.
Marco

 software, in generale una prestazione legata piů al software che
all'hardware?
Beh le tariffe dalle mie parti vanno dalle 60.000 alle 90.000 per ora o
frazione di ora.
--
saluti
FDA

70-130 + IVA a seconda della complessita'/specificita' dell'intervento e/o
dell'eventuale contratto di assistenza del cliente.
Ciao, Sandro

Intendi già con IVA inclusa? Bye
Marco


 Marco
No, naturalmente iva esclusa
--
saluti
FDA

Se si tratta di sciocchezze (utente singolo domestico che non sa usare
internet e/o cose del genere, sulle 50/60.
Se gia' si tratta di aziende con reti etc, secondo me è antieconomico
chiedere meno di 100.000.
Se poi lo si fa per conti di qualcun altro, occorre pattuire un prezzo +
basso, fermo restando la frequenza, il numero e il tipo di intervento.
Saluti
as

Forse gia' lo sapete, ma.. per curiosita': gli americani viaggiano dai 10 ai
15$ all'ora e non di piu'. Escluse spese ovviamente.
In ogni caso, rispetto a noi, una miseria. Ma d'altra parte non pagano le
tasse che paghiamo noi ne' hanno le nostre complicazioni burocratiche
(fatture, consulenti, dichiarazioni iva, ecc.)
Ciao, Sandro


Non per dire ma un cosulente ad alto livello americano viaggia sui 4000$
dollari al giorno...
E ho visto gente in Italia che fatturava 10000 lire all'ora.
Dipende molto da chi fa assistenza (non che piu' uno e' caro piu' sia bravo
cmq), dal numero di ore annuali, se comprendono la trasferta ecc.
Ciao Uberto

 wrote in message
86dc5g$dnf$1...@nslave2.tin.it...

Io prendo 70.000 la prima ora (40.000+30.000 diritto di chiamata)
le successive 40.000. non sono prezzi alti... comunque in genere compenso
questi prezzi bassi con ricarichi su pezzi cambiati durante l' intervento.
Newsgroup: it.comp.lang.delphi
Titolo: Update ado query

So che è una cavoltat ma non riesco a capire come fare a far
funzionare questa query.
L'errore che ho è : "nessun valore predefinito per il parametro
listino1"
Ho listino1 e listino 2 che hanno valori tipo "10,00", credo stia li
il problema !
DM.QArticoli.sql.text := 'Update ARTICOLI set DESART = descarticolo,
UMGEST = umarticolo, LISTINO1 = list1articolo, LISTINO2 =
list2articolo where CODART = codarticolo';
DM.QArticoli.Parameters.ParamByName('descarticolo').Value  :=
StringReplace( slRow[1], #64, #32 ,[rfReplaceAll]);
DM.QArticoli.Parameters.ParamByName('umarticolo').Value    :=
StringReplace( slRow[2], #64, #32 ,[rfReplaceAll]);
DM.QArticoli.Parameters.ParamByName('list1articolo').Value :=
StringReplace( slRow[3], #64, #32 ,[rfReplaceAll]);
DM.QArticoli.Parameters.ParamByName('list2articolo').Value :=
StringReplace( slRow[4], #64, #32 ,[rfReplaceAll]);
DM.QArticoli.Parameters.ParamByName('codarticolo').Value   :=
StringReplace( slRow[0], #64, #32 ,[rfReplaceAll]);
DMAzi.QArticoli.Prepared := true;
DMAzi.QArticoli.execsql;



e' un vecchi bug(?) di ado credo.
hai il campo listino 1 a null e lui non riesce a convertire.
devi normalizzare i campi prima di muoverli.



scusa rileggendo forse non sono stato chiaro
volevo dire il valore che muovi in listino 1 a null

 volevo dire il valore che muovi in listino 1 a null
"muovi in listino 1" .. reminescenze di cobol vero? :-)
Quando andavo a scuola usavamo scrivere sul foglio a quadretti (i 
computer a scuola non c'erano ancora)
pippo <- 100;
e pronunciavamo "pippo prende 100", tutte le assegnazioni andavano 
pensate come il valore che viene mosso da destra a sinistra.
Da qui, per me, risulta che l'assegnazione := del pascal ï¿œ piï¿œ 
intuitiva del = del basic.
Ciao
-- 
Morde

 e pronunciavamo "pippo prende 100", tutte le assegnazioni andavano
perche' questo ? perche' VOI siete tutti dei bamboccioni finocchietti e 
vi viene naturale il pippo che prende
a noi vecchi veniva piu spontaneo il mettere....il muovere dentro....
non so se mi spiego...questione di generazioni !!!!:-)

Boniii :-)
Il valore che passo a listino1 è 5,00
Non è nullo !

Va beh sono un pirla, il campo si chiama LIST1 !

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

ciao
Facendo un DragDrop su una form vorrei trovare il nome del file come posso
fare?(magari anche trascinandolo sopra l'icona dell'exe).
grazie
erik

usa 
ShellAPI.DragAcceptFiles(FrmMain.Handle, True);
poi gestisci il messaggio WM_DROPFILES come segue:
procedure WMDROPFILES(var Message: TWMDropFiles); message WM_DROPFILES;
....
....
implementation
....
procedure TFrmMain.WMDROPFILES(var Message: TWMDROPFILES);
var
  NumFiles : longint;
  Buffer : array[0..255] of Char;
begin
   NumFiles := DragQueryFile(Message.Drop, $FFFFFFFF, nil, 0);
   if NumFiles > 0 then
   begin
     DragQueryFile(Message.Drop, 0, @buffer, SizeOf(Buffer));
       if not Modified or SaveChanges then
         LoadFile(Buffer);
   end;
end;
Acqua
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

mucias gracias :)
Newsgroup: it.comp.lang.delphi
Titolo: TUTORIAL API!!!

Vorrei segnalarvi un tutorial sulle API che potete scaricare dal sito
www.devpride.com
, č veramente completo, sono 8.5 Mb, ma ne vale veramente la
pena

Newsgroup: it.comp.lang.delphi
Titolo: Passaggio parametri ad un eseguibile!!!!

Salve, dovvrei realizzare un semplice programma
che mi permette di passare dei parametri
ad un eseguibile (tipo comando format FORMAT /u dove /u e' il parametro)
Dove posso trovare informazioni su come costruire il codice per il passaggio 
dei parametri
Grazie per chi voglia aiutarmi!!!!!!! 

 dei parametri
la guida in linea?
-- 
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"

 passaggio dei parametri
Vedi le FAQ:
3.3
-DOMANDA:
Come posso conoscere la directory dove viene eseguito il mio programma?
Ciao
ACSH 

ParamCount restituisce il numero di parametri passati al programma 
tramite riga di comando, mentre ParamStr(n) ritorna l'ennesimo parametro 
passato (ovviamente in tipo string)
A proposito ParamStr(0) ritorna la chiamata dell'eseguibile
Esempio una chiamata cosi' C:\Prove\MioProg.Exe P1 P2
ParamCont restituirà 2
ParamStr(1) restituirà P1
ParamStr(2) restituirà P2
ParamStr(0) restituirà C:\Prove\MioProg.Exe
A proposito... i parametri sono divisi con lo spazio e, nel caso si 
vuole passare un parametro che contenga spazi bisognerà rinchiuderlo tra 
doppi apici
Esempio: MioPrg.exe "Questo è un unico parametro"
Ciao,
David
Newsgroup: it.comp.lang.delphi
Titolo: Intercettazione tasto funzione

Come posso fare a intercettare un tasto funzione, anche se il programma in
D7 non è attivo e per esempio sono in Word???
Con l'action list funziona solo se il programma è attivo...
Grazie
Nicola
--- posted by geoForum on 
http://www.delphiedintorni.it


Con gli HotKey, Giorgio 


Mi puoi spiegare circa come funzionano gli hotkey, chr non riesco a capire...


 
Con un Hook direi
ciao
S

 Con l'action list funziona solo se il programma è attivo...
Devi creare un Hook di tastiera. Io non l'ho mai fatto, ma guardando un 
po' su google ho visto che la Jedi JVCL contiene un componente ad hoc... 
prova a darci un'occhiata.
-- 
Jax

 prova a darci un'occhiata.
Guglando ancora un po' ho trovato questo:
http://utenti.lycos.it/carlpasolini/registro/shell/shell12.htm
che spiega come creare un keylogger (eh eh), quindi può adattarsi al tuo 
scopo.
-- 
Jax

 Nicola
// Attivazione hotkey ALT-F4
At:=AddAtom(PChar('HotKeyBroad'));
RegisterHotKey(Handle,At,MOD_ALT,VK_F4);
in Protect inserisci
procedure CMHotKey(var Message: TMessage); message WM_HOTKEY;
Nell'implementazione controlli che il tasto sia quello richiesto e metti il 
tuo codice. Vai all'help con chiave WM_HOTKEY per vedere la struttura del 
messaggio.
A fine programma in destroy mettici un DeleteAtom(at).
Quanto sopra ti permette di usare un tasto funzione. Se intendi invece 
intercettarlo ma lasciandolo agire per l'applicazione che e' attiva allora 
devi usare un hook GLOBALE di tastiera, cerca con global hook.
Ciao Giorgio 

RegisterHotKey(Handle,At,MOD_ALT,VK_F4);
e l'azione che deve eseguire nella pressione della sequenza di tasti
desiderata la metto qua:
procedure CMHotKey(var Message: TMessage); message WM_HOTKEY;
??
Grazie
ancora
Scusate



Se non ricordo male e' un Integer o un DWord.
Clicca col destro del mouse sopra addatom e poi su topic.. andando cosi' 
nell'help contestuale.
Giorgio
Newsgroup: it.comp.lang.delphi
Titolo: Allineamento a destra

Buon giorno a tutti.
Quesito di oggi: sapete come allineare del testo a destra, all'interno di 
una cella di una DBGrig? Naturalmente io vado ad utilizzare l'evento 
DrawColumnCell per colorare la mia cella e poi con TextRec ci srivo 
all'interno. Il problema è però quello di scrivere allineato a destra, 
numeri che non hanno sempre lo stesso formato ...
Vi è capitato di dover gestire una cosa simile?
Questa che segue è un esempio della procedura
procedure TFormCassa.dbgDContoDrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  State: TGridDrawState);
var Stringa:string;
begin
	//Colonna 3 = quantità
    if (DataCol=4)and (not (gdSelected in State)) then
    begin
    	TDBGrid(Sender).Canvas.Brush.Color := $00AEFFFF;
        TDBGrid(Sender).Canvas.FillRect(Rect);
        TDBGrid(Sender).Canvas.Font.Color  :=clBlack;
        Stringa:=Format('%.2f',[Column.Field.Asfloat]);
        TDBGrid(Sender).Canvas.TextRect(Rect, Rect.Left + 3, Rect.Top + 
3,Stringa);
    end;
end;
Grazie
--- posted by geoForum on 
http://www.delphiedintorni.it

Vi è capitato di dover gestire una cosa simile?
prova questo al posto di textRect
  With DBGrid1 Do
      //Scrive il testo allineato in basso a destra con margine di 2 pxls
      Canvas.TextOut(Rect.Right-Canvas.TextWith(Stringa)-2,
                     Rect.Bottom-Canvas.TextHeight(Stringa)-2,
                     Stringa);
Io lo uso per le stringgrid ma credo valga per
qualsiasi canvas e rect.
Ciao MassimoB

 Canvas.TextWith(Stringa)-2
[...]
ovviamente è
Canvas.TextWidth(Stringa)-2
	Ciao
	MassimoB
 

Grazie mille a tutti


Newsgroup: it.comp.lang.delphi
Titolo: Problema con le classi

Ho un problema con una classe, quando cerco di accedere alla proprietą
"Value1" comincia un loop infinito nella funzione "GetValue1" che si occupa
di gestire l'accesso alla proprietą stessa.
Come mai avviene questo?
Ecco il codice semplificato:
interface
type MyClass=class
    private
        function  GetValue1: integer;
        procedure  SetValue1(value: integer);
    public
        property Value1:integer read GetValue1 write SetValue1;
end;
implementation
procedure MyClass.SetValue1(value:integer);
begin
  if Value1<>value then
    Value1:=value;               // e fin qui tutto bene.......
end;
function MyClass.GetValue1
begin
  result:=Value1;       <--------------------- //qui avviene un loop
infinito che mi costringe a killare l'applicazione (e anche il compilatore
:°°)
end;


Mars University: «Knowledge brings Fear»
Newsgroup: it.comp.lang.delphi
Titolo: Stampa di File

end;
devo stampare riga per riga del file? o c'è un modo per dire.. stampa
e via.
Grazie

  WinExec( PChar(SelectedFile), SW_SHOWNORMAL);

Dall'help
procedure TForm1.FormCreate(Sender: TObject);
const
  // The path may need to be changed to accommodate locations of files
  // on your system.
  Path = '..\DEMOS\RICHEDIT\OVERVIEW.RTF';
begin
   RichEdit1.Lines.LoadFromFile(Path);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  // The parameter string shows in the print queue under "Document   // 
name".
  RichEdit1.Print('My Document Name');
end;
Ciao ciao
-- 
******
L'uomo č padrone di ciň che ha da dire ma č schiavo di ciň che ha detto.
****** 


Se vuoi stampare il file usando il programma predefinito per quel tipo
di file puoi usare la ShellExecute con il comando print:
uses ShellApi;
....
ShellExecute(Handle, // Handle della finestra corrente, oppure 0
  PChar('print'),    // Operazione di stampa
  PChar(FList.Items.Strings[FList.ItemIndex]), // file da stampare
  nil,               // Parametri addizionali (se serve),
  nil,               // Directory (se serve)
  SW_SHOWNORMAL);
 
Ciao
Giuseppe Garzotto
--- posted by geoForum on 
http://www.delphiedintorni.it

Grazie mille a tutti e due..
Le ho provate entrambe e funzionano.
Newsgroup: it.comp.lang.delphi
Titolo: Concetti e database...

Ciao,
ho scritto la mia prima applicazione db. Usa tabelle paradox (una master e
una decina di details).
Funziona abbastaza bene, tanto che le persone che la stanno usando, stanno
rapidamente incrementando il numero dei records.
Mi domandavo se l'approccio che ho usato e' corretto. All'apertura del
programma vengono aperte tutte le tabelle
e viene caricata una dbgrid con l'elenco dei nomi. Cliccando su di un nome
vengono visualizzate anche le informazioni presenti nelle altre tabelle. Va
bene cosi' oppure concettualmente e' meglio accedere al db solo con una
query? E per le modifiche, sempre query? E le TTable?
In sostanza vorrei sapere quale e' l'approccio corretto per gestire un db...
Grazie di aver letto fino a qui.
     Ciao

 query? E per le modifiche, sempre query? E le TTable?
Chi usa paradox  ha + vole sottolineato che conviene usare TTable e non
TQuery.
Se invece di paradox avessi scelto un qualunque db client/server,
l'approccio sarebbe stato errato.
Il principio delle query è 'ti mostro solo quello che chiedi"
Usando le query, avresti avuto si la dbgrid, ma anche un edit nel quale
l'utente avrebbe dovuto digitare parte del nome.
Poi, con un apposito pulsante, si esegue la query ed i risultati vengono
mostrati nella dbgrid.
Aprendo tutte le tabelle alla partenza, all'aumentare del numero di records
rischi di avere un decadimento delle prestazioni.
Un trucco consiste nell'avere un pagecontrol, magari uno per ogni tabella di
dettaglio.
La relativa tabella viene aperta solo quando il tabsheet viene mostrato.
Bye
AS

 l'approccio sarebbe stato errato.
[CUT]
Ciao e grazie per avermi risposto.
Valgono le stesse regole anche per Access? Cioe' e' meglio usare una table
piuttosto che una query?
Ciao

 piuttosto che una query?
Io credo di si, ma non so dirti di +.
Io non uso access e/o paradox.
lavoro con Sybase, Interbase e un po di Oracle.
Bye
AS
Newsgroup: it.comp.lang.delphi
Titolo: [d5][d6] acquisire immagine da telecamera ad ip

ciao a tutti, qualcuno ha qualche idea su come acquisire un immagine da una 
telecamera ad ip?? via usb in delphi ho trovato già un sacco di cose ma via 
ip come si interfaccia?
Simone 

 ip come si interfaccia?
Credo che l'unica risorsa "dall'altra parte" di un indirizzo ip sia
nell'interrogare un web service...
verifica e facci sapere
ciao
-- 
Morde

dentro nella confezione ti danno esempio di collegamento via web usando 
activex oppure usando javascript, però girando per internet ho visto alcuni 
software che su windows ti danno anteprima di quello che vede la 
telecamera... che mi serve per interrogare un webservice?
Simo 

 che mi serve per interrogare un webservice
innanzitutto una versione di delphi che li supporti, dalla profesional in
su per intenderci.
Poi, fatti dare i dati del werbservice,e chiedi se espone un WSDL: io per
un progetto ho utilizzato il wizard di delphi 7
(new->other->webservices->wsdl importer) che ritorna un'interfaccia da
istanziare ed usare per inviargli un xml contente le tue "domande" al
webservice.
Questa interfaccia si preoccupa di trasportare il tuo xml tramite SOAP al
webservice, e ti restituisce una risposta che puoi trattare adeguatamente
in base ai tuoi scopi.
Io l'ho utilizzato in questo modo..
ciao
-- 
Morde

 che mi serve per interrogare un webservice?
Stavo rileggendo il thread e ti chiedo: sei sicuro che devi interrogare un
webserver?
Probabilmente la strada piu' veloce e' di crearti un twebbrowser nel tuo
form e scaricare la pagina http dove la webcam riversa i suoi dati.
In altre parole, visualizza la pagina web cosi' come te la propone la
webcam.
Ciao
-- 
Morde

si ma la foto è dentro uno script java o activex come la scarico?
Simo 

Usa VideoGrab fà quello che kiedi
Newsgroup: it.comp.lang.delphi
Titolo: Delphi Day 2007 : novità principali?

Per i meno fortunati che non hanno potuto essere presenti al delphi day..
potreste dirci cosa è uscito di appetitoso dalla giornata piacentina?
Ciao
-- 
Morde


Un'ottimo primo piatto di "caramelle" (non so la definizione esatta, ma la 
forma era quella) ripiene di ricotta e spinaci in un letto di butto fuso.
Un gradito secondo con bistecca ai ferri, non troppo cotta, con contorno di 
deliziose patatine al forno e spinaci.
E come desset, panna cotta in salsa di fragole.
Caffè.
Il tutto innafiato con Gotturnio dei colli piacentini.
Oooops, forse volevi sapere di cosa si è parlato ?
Per quello c'è il buon Breveglieri che di sicuro di fa tutto il reportage. 
:-D
Ciao
Marco

 Il tutto innafiato con Gotturnio dei colli piacentini.
E, come in tutti i raduni di programmatori, niente donne ...
Poi magari ci considerano pure dei misogini!
;-)
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Poi magari ci considerano pure dei misogini!
PARLA X TE!!! :-))
A.

non è vero... una donna mi pare di averla vista... ha pure vinto un licenza 
mi pare
Simo 

 :-D
Ehi, ho anche io una mia vita privata! :-D
Qualcosa cercherò di scrivere, anche se è un periodo piuttosto intriso 
di impegni, magari cercando di recuperare il "pregresso" del mancato 
resoconto della presentazione di Delphi 2007 a Milano, imperdonabile. ;-)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 ha pure vinto un licenza
Che c**o! ;-P
A.

> Ehi, ho anche io una mia vita privata! :-D
DAVVERO????
A.

 DAVVERO????
Spiritoso... :-D
Proprio tu, indaffarato come sei, dovresti capirmi... ;-)


 potreste dirci cosa è uscito di appetitoso dalla giornata piacentina?
Continuo il "filone serio" della discussione per segnalare il blog di 
Marco Cantù che ha pubblicato da poco un resoconto della giornata:
http://blog.marcocantu.com/blog/italian_delphi_day_2007_post.html
Ciao,
   Marco.


 una donna mi pare di averla vista... 
No, e' solo una leggenda urbana, come i coccodrilli albini nelle fogne
americane.


 PARLA X TE!!! :-))
Questo e' vero, lo ammetto: un poco misogino lo sono.
:-)


 Ah gia', e' vero, a te piacciono "vecchie" ...
non "vecchie", mature. Sai l'eta' c'e'.... :-))

 
http://blog.marcocantu.com/blog/italian_delphi_day_2007_post.html
Ora passo al "filone semiserio"... ;-)
Sono state pubblicate anche le foto, le trovate qui:
http://www.delphiedintorni.it/geoxml/delphiday2007/photo.htm


 Ehi, ho anche io una mia vita privata! :-D
potresti rilasciarla sotto licenza GPL, magari trovi una comunità che ti 
da una mano a portarla avanti :-D .
-- 
-------------------------------
per scrivere in privato
togliere "1975nosp"
to reply remove "1975nosp"
Newsgroup: it.comp.lang.delphi
Titolo: Indy per trasferimento file via ftp

con il componente Indy idFtpClient, tramite il metodo * put(nomefile) * 
riesco a
trasferire un file alla volta , ma prima di passare al successivo devo 
attendere
il suo completamento , volendo traferirne piu' di uno (come ad es. avviene 
con
Filezilla) , puo' bastare un * application.processmessages * ?
grazie Maurizio 

 grazie Maurizio 
Ciao,
Andrea

Maurizio ha scritto:

Non è un problema specifico della tua applicazione.
Quando ti colleghi ad un server FTP e invii un file, impartisci un 
comando specifico e, successivamente, inizi il trasferimento del file da 
memorizzare sul server; si suppone che il server non possa rispondere ad 
altri comandi fino a quando l'operazione di trasferimento in corso non è 
terminata.
Per ottenere un (chiamiamolo così) trasferimento multiplo di file, credo 
che tu debba aprire più connessioni (con più componenti *TIdFTP*, magari 
creati dinamicamente) allo stesso server e, per ciascuna connessione, 
invocare il metodo che corrisponde al comando di invio file.
Avrai senz'altro bisogno di creare thread secondari nella tua 
applicazione, poiché il thread primario - a causa della (o grazie alla) 
logica "bloccante" dei componenti Indy, rimarrà sospeso fino a quando il 
metodo non avrà concluso i propri lavori; nel caso di trasferimento di 
file, quindi, fino a quando tale trasferimento non è completo.
Per ciascun trasferimento simultaneo, dal thread primario dovrai creare 
thread secondari, ciascuno in grado di istanziare un *TIdFTP* per 
implementare la connessione ed eseguire il comando di invio del file.
Il thread primario sarà così libero di processare i messaggi in coda 
all'applicazione rendendola in grado di rispondere alle azioni dell'utente.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Newsgroup: it.comp.lang.delphi
Titolo: CREATE TABLE da Delphi con ADO

Salve a tutti,
come faccio a fare da delphi delle CREATE TABLE e delle ALTER TABLE
specificando nel caso di database Access i parametri "Consenti
lunghezza zero" per le stringhe che devo impostare a Yes?

, Jack 
(
gian...@klemy.it
) proferì le seguenti parole...

Hmm, da esperienze Visual Basic (io lavoro con entrambi i linguaggi) pare  
che il motore SQL di Access non consenta questo, purtroppo, per 
ammissione diretta degli help del suddetto linguaggio. Puoi solo attivare 
la opzione "Richiesto" di un campo di Access usando NOT NULL. 
Ad esempio:
CREATE TABLE NomeTabella (NomeCampo Text(30) NOT NULL);
Ti conviene settare la proprietà AllowZeroLength di un campo di una 
Tabella a True, ma non ricordo ora se questo si possa fare o meno anche 
con Delphi.
-- 
|-----------------------------------------------|
|Davide Guida          >>> 
davide...@email.it
|
|-----------------------------------------------|
Newsgroup: it.comp.lang.delphi
Titolo: Accesso dati MSOutlook

Saluti a tutti i membri del NG.
Sviluppo con Delphi da un po' (iniziai con la versione 3 e adesso uso la 7)
ma fino ad ora non mi era mai capitato di inoltrarmi nell'utilizzo di
oggetti COM (ho sviluppato soprattutto applicazioni databased).
Sono a porvi il quesito che mi attanaglia: come faccio ad accedere ai dati
dell'Outlook 2002 che ho sul mio PC? Vorrei in soldoni poter interagire con
la Inbox e i contatti del mio Outlook, ma non ci salto fuori.
Ho provato con i componenti Delphi della palette Server ma mi risponde con
un "Interfaccia non registrata" (in italiano) quando, a runtime, imposto a
True la proprietą AutoConnect (o chiamo il metodo Connect). Ho provato a
guardarmi un po' di file di Help o di siti divulgativi (sono un assiduo
visitatore di 
http://delphi.about.com
), ma non c'č verso.
Sono arrabbiatissimo: se qualcuno gentilmente sa darmi qualche dritta,
gliene sarņ riconoscente per parecchio.
    Marco


per leggere i contatti prova con:
uses ComObj;
procedure TForm1.Button1Click(Sender: TObject);
const
  olFolderContacts = $0000000A;
var
  outlook, NameSpace, Contacts, Contact: OleVariant;
  i: Integer;
begin
  outlook := CreateOleObject('Outlook.Application');
  NameSpace := outlook.GetNameSpace('MAPI');
  Contacts := NameSpace.GetDefaultFolder(olFolderContacts);
  for i := 1 to Contacts.Items.Count do
  begin
    Contact := Contacts.Items.Item(i);
    {now you can read any property of contact. For example, full name and
    email address}
    ShowMessage(Contact.FullName + ' <' + Contact.Email1Address + '>');
  end;
  Outlook := UnAssigned;
end;
Le altre proprietà di Contact sono:
Birthday
Business2TelephoneNumber
BusinessAddress
BusinessAddressCity
BusinessAddressCountry
BusinessAddressPostalCode
BusinessAddressPostOfficeBox
BusinessAddressState
BusinessAddressStreet
BusinessFaxNumber
BusinessHomePage
BusinessTelephoneNumber
CompanyAndFullName
CompanyMainTelephoneNumber
CompanyName
ComputerNetworkName
Department
Email1Address
Email1AddressType
Email1DisplayName
Email2Address
Email2AddressType
Email2DisplayName
Email3Address
Email3AddressType
Email3DisplayName
FirstName
FTPSite
FullName
FullNameAndCompany
GovernmentIDNumber
Hobby
Home2TelephoneNumber
HomeAddress
HomeAddressCity
HomeAddressCountry
HomeAddressPostalCode
HomeAddressPostOfficeBox
HomeAddressState
HomeAddressStree
HomeFaxNumber
HomeTelephoneNumber
Initials
ISDNNumber
JobTitle
Language
LastName
LastNameAndFirstName
MailingAddress
MailingAddressCity
MailingAddressCountry
MailingAddressPostalCode
MailingAddressPostOfficeBox
MailingAddressState
MailingAddressStreet
MiddleName
NickName
OfficeLocation
OrganizationalIDNumber
PersonalHomePage
PrimaryTelephoneNumber
Profession
Suffix
Title
WebPage
Ciao ciao

 per leggere i contatti