mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Ma come cavolo si sposta un file!??!

Sto passando le ore migliori della mai vita a trovare una procedura che mi
muova/copi un file esistente in un altro che crea lui...ho trovato le
funzioni API
CopyFile
MoveFile
(non documentate da delphi :( )
ma vogliono il nome del file da copiare e quello di destinazione sotto forma
di Pchar(mai sentiti nominare :/ ),mentre io vorrei che prendessero la
stringa che gli passo dall' edit1...quindi,come si converte la stringa
contenuta nell' edit1 in un Pchar?

 ha scritto nel messaggio
news:hvDW6.3699$Cq5.1...@news.infostrada.it...
: Sto passando le ore migliori della mai vita a trovare una procedura che mi

se non mi sbaglio in delphi ci sono già le funzioni FileCopy e FileMove
per avere un PChar da una stringa basta che usi:
NomeFunzione(PChar(stringa), etc...);
ciao
giuliano

 contenuta nell' edit1 in un Pchar?
per le funzioni, la puoi facilmente convertire con PChar
(nome_variabile_tipo_stringa)
se invece della variabile inserisci una stringa, direttamente nella
funzione, cioč digitando proprio i caratteri,
la conversione in PChar č automatica !! ( tranne in Delphi 1 mi pare )
Per spostare un file, puoi usare la funzione "RenameFile" che riesce a
svolgere anche questo compito o la
"SHFileOperation" che č molto piů potente ed oltre allo spostamento di file,
fa anche quello delle directory
compresa la cancellazione e la copia. E' quella usata dal cestino di
Windows, almeno dovrebbe !!
Ti saluto....buon lavoro !!
Antonio Tarolla

 converte la stringa contenuta nell' edit1 in un Pchar?
PChar(stringa)
ma prima o poi leggi la parte della guida di Delphi che spiega la 
differenza tra PChar e String

 differenza tra PChar e String
a quanto ho capito Pchar è supportato per avere la compatibilità con
windows,ma non ho capito bene la differenza pratica...il mio inglese non è
il massimo :P
P.S. sono riuscito a far funzionare sto programma rinomina-muovi file :D

 non è il massimo :P
Windows è stato scritto in C/C++, questo linguaggio non possiede un vero e 
propio tipo Stringa, le stringe vengono implementate come arry di caratteri
quindi PCahr converte le stringhe ObjectPascal in Array [0..n] of Char 
richiesti dalle funzioni API di Windows.
Ti faccio alcuni esempi:
var
  Testo, Titolo: String;
begin
  Testo := 'Testo del Message Box';
  Titolo := 'Titolo del Message Box';  
  MessageBox(0, PChar(Testo), PChar(Titolo), 0);  	
end; 
oppure
var
  Testo, Titolo: PChar;
begin
  Testo := 'Testo del Message Box';
  Titolo := 'Titolo del Message Box';  	
  MessageBox(0, Testo, Titolo, 0);  	
end; 
oppure
var
  Testo, Titolo: Array [0..25] of Char;
begin
  Testo := 'Testo del Message Box';
  Titolo := 'Titolo del Message Box';  	
  MessageBox(0, Testo, Titolo, 0);  	
end;
puoi anche fare
begin
  MessageBox(0, 'Testo del Message Box', 'Titolo del Message Box', 0);  
end;
ma non puoi assolutamente fare
var
  Testo, Titolo: string
begin
  Testo := 'Testo del Message Box';
  Titolo := 'Titolo del Message Box';  
  MessageBox(0, Testo, Titolo, 0);  	
end;
Ciao Silent.
Newsgroup: it.comp.lang.delphi
Titolo: [ot] appello delphi day

ciao a tutti, chi viene al delphi day??
Simo

 ciao a tutti, chi viene al delphi day??
Avevi già proposto la stessa domanda qualche giorno fa... ;-)
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

era per fare l'appello finale :P
miiii pignolo

 miiii pignolo
"...e bastardo!" ;-)   (citazione)


Io ci sono.
Ciao
Marco

Newsgroup: it.comp.lang.delphi
Titolo: openpicturedialog1 bug o altro?

Ciao a tutti...
Sapete perchč quando mando in esecuzione la finestra di dialogo con
openpicturedialog non mi porta il filtro jgp di default. Se inserisco a mano
tutto funziona perfettamente. Poi ho notato che lo stesso componente si di
un'altra applicazione funziona perfettamente. Ho provato pure a copiarlo
dall'altra applicazione con copia/incolla ma la stessa cosa mi porta i gif,
ico, wmf ecc... e non i jpg e jpeg sapete perchč?
Inoltre avrei bisogno di un informazione tecnica come si fa ad assegnargli
una cartella di default? Che apre sempre quella?...
Grazie anticipato a coloro sapranno aiutarmi...

 Grazie anticipato a coloro sapranno aiutarmi...
prego
giorgio

)

Newsgroup: it.comp.lang.delphi
Titolo: TurboCad e Delphi

C'è qualcuno che sa indicarmi come interfacciare TurboCad con Delphi ?
Grazie

Hai visto sul sito del produttore?
Bye
A.

Newsgroup: it.comp.lang.delphi
Titolo: cancellare record nei file

seguendo la guida di teixeira e pacheco ver 5, ho imparato a gestire i file
con tipo, riesco a compiere tutte le operazioni tranne che eliminare
fisicamente un record, come fare? grazie a tutti in anticipo
--
Ciao
Gianfranco Marchese
e-mail dgruma@NOPUBBLICITA'
tin.it
 (Da togliere NOPUBBLICITA' se vuoi
rispondermi in privato)
sito internet personale: 
http://www.turbo-pascal.cjb.net
  Tutto sul Turbo
Pascal  1.5

fisicamente un record, come fare? grazie a tutti in anticipo
Non si può fare, a meno di riscrivere il file.
-- 
Andrea Laforgia
#exclude <windows.h>
Newsgroup: it.comp.lang.delphi
Titolo: drawgrid

ciao a tutti.
ho una curiosità da chiedere: secondo voi è possibile con una drawgrid 
ottenere un effetto tipo l'unione celle in excel? se non fosse possibile 
  quale componente mi consigliereste di utilizzare.
grazie a tutti.
alex.

)
  "File deletion is murder..." (Futurama)
Newsgroup: it.comp.lang.delphi
Titolo: R: BDE e rete Locale

 Andrea M.
Possibilissimo, anche io uso  i DBF in rete ma ... con uso eccessivo capita
spesso che salta qualche indice e non esiste Table.Reindex !
Ciao
Davide

...


anche io mi trovo di fronte ad un degrado degli indici con archivi dbf, come
si può fare ????
esiste un rimedio???

se non usi gli indici come fai ad ottenere degli ordinamenti  in maniera
rapida ?
spiegami che forse mi togli dai casini...
grazie, ciaso Flavio

Ciao Flavio
Non uso gli indici perché non ho bisogno di un grande lavoro di
lettura/scrittura su DBF, modifico e salvo campi di un record uno alla
volta, se poi devo fare una ricerca (raramente) aspetto...
Poi per un altro motivo: non ho ancora una grande dimestichezza con i
database
flavio ha scritto nel messaggio ...


Newsgroup: it.comp.lang.delphi
Titolo: numero dei tasti

ciao all
se il tasto "return" č il 13 il tasto "canc" che numero č?
qualcuno ha una lista dei tasti e dei valori?
grazie
ciao

 ha scritto nel messaggio
news:kkNba.68283$zo2.1...@news2.tin.it...

Guarda nelle unit Messages e Windows, trovi tutte le costanti dei tasti.
Ciao
Giorgio

 qualcuno ha una lista dei tasti e dei valori?
[Giuseppe...]
Nell'unit "windows" trovi la lista dei tasti virtuali. E' utile se non vuoi
specificare valori che magari non ricordi, ed anche per mantenere
compatibile il software che si scrive in caso di modifiche ai loro effettivi
valori numerici.
Il tasto canc si chiama vk_delete e corrisponde al valore 46.
Ciao!
Giuseppe

 Il tasto canc si chiama vk_delete e corrisponde al valore 46.
Si l'ho trovato pure io :
  {$EXTERNALSYM VK_DELETE}
  VK_DELETE = 46;
però a me il tasto #46 corrisponde al "punto"
quindi mi funsiona si con il "canc" ma solo con il tastierino numerico e
con"Bloc Num" attivo.
oppure con il tasto "punto" della tastiera :
procedure TForm1.ListBox2KeyPress(Sender: TObject; var Key: Char);
begin
 If Key=#46 then ListBox2.Items.Delete(ListBox2.ItemIndex);
ciao erik

  If Key=vk_delete then ListBox2.Items.Delete(ListBox2.ItemIndex);
Ciao!
Giuseppe
Newsgroup: it.comp.lang.delphi
Titolo: [?] Includere un file WAV in un eseguibile e suonarlo

Mi sapreste dire come fare (o dove trovo un esempio) per includere un file
WAV (o MID) all'interno di un eseguibile e suonarlo?
Cosě a occhio direi che anrebbe incluso in un file di risorse? E' questa la
strada da seguire?
--
Mauro Falzari.
"Se guardi nell'abisso, anche l'abisso guarda in te."
(Friedrich Nietzsche)

 ha scritto nel messaggio
news:a6m50k$flp8v$1...@ID-86629.news.dfncis.de...

Newsgroup: it.comp.lang.delphi
Titolo: Problema (banale?) con le TTreeView

Salve a tutti. Ho un problemino forse inutile. Ho un treeview con circa 4000
elementi. Dopo averli caricati a runtime, il TreeView me li ordina
alfabeticamente, tuttavia non si posiziona automaticamente al primo
elemento. E' possibile ottenere quanto desiderato o mi accontento di
selezionare un elemento qualsiasi e premere HOME? Sto usando la versione
CLX. Grazie a tutti per la
risposta.
HellHound - uccidi CERBERO per l'indirizzo


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

 ========================================
Ciao! Ho provato una cosa simile ma non riuscivo a farlo. Questo sembra
proprio cio' che fa per me! Spero che non ci siano problemi con la versione
CLX del C++Builder (sto facendo il lavoro con il C++Builder e scrivo qui
perche' ho un passato da "Delphista"! Spero che non si offenda nessuno per
la definizione!)


 la definizione!)
Non penso che qualcuno si offenda...la domanda l'hai fatta su Delphi,
poi l'uso che ne fai è una cosa che riguarda esclusivamente te... ;-)
A parte questo, credo che il codice funzioni correttamente anche in
C++Builder, visto che le CLX dovrebbero essere identiche in termini di
struttura delle classi (a parte il linguaggio utilizzato per la
codifica).


Newsgroup: it.comp.lang.delphi
Titolo: Come si accede

La mia domanda č in relazione alla discussione precedente, ma diversa. Cioč, 
avendo caricato in un comboBox degli oggetti, qual'č la sintassi per 
acquisire l'oggetto dalla riga cliccata ?
 
Carico il comboBox cosě (OList č una ObjectList di oggetti di tipo TTitolo):
for i:= 0 to OList.Count-1 do
begin
  rigaCb:= TTitolo(OList.Items[i]).Nome;
   Cb.Items.AddObject(rigaCb,TTitolo(OList.Items[i]));
end;
 
 
 

Ok, mi sono risposto da solo...

Newsgroup: it.comp.lang.delphi
Titolo: utilizzo datamodule in un package a run-time

 Buongiorno a tutti,
ho il seguente problema: ho un package contenente un datamodule, vorrei 
riempire una DBGrid del progetto chiamante usando il datamodule. 
Grazie!
Carlo
--- posted by geoForum on 
http://www.delphiedintorni.it

 riempire una DBGrid del progetto chiamante usando il datamodule. 
Qual è il problema? Cos'è che non riesci a fare?
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

il problema è che la dbgrid si trova nell'eseguibile e il datamodule nel 
package quindi non so come collegare il datasource alla dbgrid poichè il 
package è runtime e quindi riuscire a mostrare il resulset dopo aver 
aperto la query.
Grazie,


 aperto la query.
Direi che puoi collegarli solamente a runtime, tramite codice. :-|

Newsgroup: it.comp.lang.delphi
Titolo: BorderIcons...

Salve a tuti...
domanda forse banale... anzi di sicuro.
Mi serve avere una form che abbia in alto a sinistra sui bottoni si sistema 
(minimizza, massimizza e chiusura) solamente i due di minimizzazione e 
massimizzazione.
In pratica voglio inibire quello che chiude l'applicazione (la x).
Come si fa? ho provato le varie compinazioni true/false nelle proprieta 
BorderIcons ma pare che la combinazion che mi serve non sia ottenibile.
Come posso fare?
Grazie
sky...@email.it


Se ti suggeriscono come si fa, farebbero un gran favore anche a me.
Io ho trovato come soluzione quella di lasciare la X e di inserire un
bottone chiudi che inizializza una variabile.
Nell'onclose se la variabile non č inizializzata la procedura non si chiude.
Poi perň ti chiamano i clienti che si inca@@@no e ti dicono "clicco sulla X
e non si chiude il programma"
:-) Buon fine settimana
Ciao
-- 
Marco Camozzi


Giustamente, IHO: modificare i comportamenti di Windows e'
sempre fonte di dubbi ed incertezze da parte dell'utente finale.
La via migliore e' quella di disabilitare il bottone in questione:
EnableMenuItem (GetSystemMenu (Handle, False), SC_CLOSE,
  MF_BYCOMMAND or MF_DISABLED or MF_GRAYED);
Ciao
ACSH
-- 
http://ctc2007-catand.blogspot.com/

 e non si chiude il programma"
E mettergli un avviso del tipo "pirla, adesso non puoi chiudere il 
programma!" no?
-- 
Jax
Newsgroup: it.comp.lang.delphi
Titolo: programmi con più form

Buondě a tutto l'NG
Dopo aver fatto delle piccole cose (solo una form) vorrei cominciare a 
scrivere qualcosa di piů grosso, perň mi sono arenato subito quando ho 
dovuto da una form principale che č un menů usare altre form e ritornare 
al menů, ho provato a mettere la unti delle form richiamate nella uses del 
menů e per non fare un riferimento circolare ho messo la unit del menů in 
un alttra sezione ma mi va in errore..
Voi esperti come fate a usare piů form?!?
Ciao Paolo
--
pbonfanti2@*NOSPAM*
inwind.it
Togliere dall'indirizzo *NOSPAM*
Vuoi saperne di piů su python clicca 
http://www.pyj.it

Be dipende Form normali, MDI, oppure tutte aperte ma solo alcune visibili etc...
Comunque:
Mettiamo che in Unit1 c'e' Form1 (la form principale) ed in Unit2 c'e' Form2
Ora se dalla form1 voglio richiamare la form2 inserisco:
1) La dichiarazione USES UNIT2 sotto la clausola Interface o Implementation
2) Nel punto dove voglio richiamare la form scrivero'
Form2 := TForm2.Create(Self);
Form2.Show;
Oppure se Form2 è modale
Form2 := TForm2.Create(Self);
Form2.Showmodal;
Form2.Free;
--
Ciao,
David

 Form2.Free;
AS

>>>>> Form2 := TForm2.Create(NIL);
Questa proprio non puo' andare
--
Ciao,
David

 Questa proprio non puo' andare
Se non hai bisogno di passare l'owner va bene anche cosě
partendo dal presupposto che preferisco sempre il parametro self... anche
con nil funziona
perfettamente.
Non vedo dove sia il problema se fai una cosa del genere :
myForm := TMyForm.Create(nil);
try
  myForm.ShowModal;
finally
  myForm.free;
end;
-- 
Gabriele Santomaggio
ICQ# 329902442
Caronte prepara la barca.... si parte per un nuovo viaggio

 Questa proprio non puo' andare
xche?
Se fai la free manuale in un try..finally, che ti frega dell'owner?
A

Ok giusto ma allora è più pulita cosi':
Whith TForm2.Create(Self) Do   // O Nil o Application
Try
   ShowModal;
finally
  Free;
End;
--
Ciao,
David

>>Questa proprio non puo' andare
e quì dici che va bene? Non capisco cosa ci sia di "sporco" nello scrivere
Form2 := TForm2.create(nil);
ed invece questo è pulito :
with TForm2.create(nil) do
......
il fatto di passare nil self application pippo pluto o paperino dipende da
cosa devi fare se dall'altra parte
ti serve un owner oppure no.
Il fatto di dichiarare una varibile ti tipo TFormXXXX è una questione di
comodità
e come ne caso su dipende sempre da quello che devi fare.
Per quello che richiedeva il thread nil andava anche bene, avrei aggiunto un
try finally che è sempre
cosa buona e giusta. :)
ciao

Newsgroup: it.comp.lang.delphi
Titolo: Handle di oggetti

Ciao NG!
sto sviluppando un'applicazione che deve inserire del testo in degli Edit di
altre applicazioni.
Quindi cliccando sull'edit della finestra di un'altra applicazione, in essa
viene inserito il testo.
Avrei bisogno di una funzione da inserire nell'hook del clic del mouse che
mi restituisce l'handle dell'edit cliccato, e una funzione che mi permette
di inserirvi del testo.
Sapete se esiste qualche cosa del genere?
GRAZIE CIAO

 di inserirvi del testo.
quanto chiedi non è di difficile realizzazione.
Per evitare di fare troppi casini a cercare l'handle di consiglio
semplicemente di richiamare WindowFromPoint() nel momento in cui la callback
viene richiamata dal SO.
Per impostare del testo è sufficiente richiamare la SetWindowText() ... se
hai altri problemi chiedi pure.
Ciao! :-)
--
- Carlo -
c.b...@libero.it

Newsgroup: it.comp.lang.delphi
Titolo: scrivere in un file in formato binario (e help delphi 2005)

Una domanda da dilettante in un newsgroup di professionisti, e spero che mi
perdonerete se diro' un sacco di cavolate.
Devo scrivere in un file la cui intestazione inizia con alcune lettere
maiuscole (e fin qui ci arrivo) e poi va inserito un numero in formato
binario, fra l'altro i gruppi di otto bit sono invertiti rispetto alla
scrittura normale. Un esempio: 3560 in formato binario è (divido i gruppi
per chiarezza) 00001101-11101000; io devo scrivere prima 11101000 e poi
00001101.
Ho cercato parecchio, fino a ricavare la stringa del numero in binario dal
decimale ci arrivo, ma dopo?
Con l'occasione vorrei anche capire un'altra cosa: o l'ho installato male
io, o l'help di delphi 2005, almeno per un novellino come me, e' molto piu'
limitato che in passato. Anche qui un esempio: blockwrite, nelle passate
edizioni la ricerca nell'help restituiva la spiegazione della funzione e,
vado a memoria, anche un esempio; adesso nessun risultato. Capita solo a me?
Grazie in anticipo.
-- 
F&R

 decimale ci arrivo, ma dopo?
.."dopo" che cosa ? che vuoi sapere di preciso ? come si scrive la
stringa sul file binario ? ... 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Grazie per l'interessamento, forse ero stato un po' confuso.
Ma intanto l'ho risolto da solo: basta scrivere sul file il chr di ogni
singolo gruppo di 8 che compone il numero binario, nell'esempio che avevo
fatto io 11101000 e poi
00001101, bisogna scrivere chr(232) e poi chr(7).
E sull'help di delphi 2005 qualcuno mi sa dire qualcosa? Io non riesco a
trovarci niente.
Grazie ancora ad Andrea e a tutti, siete mitici.
--
F&R


Newsgroup: it.comp.lang.delphi
Titolo: domanda sull'Oggetto PaintBox [D7]

Premetto che ho cercato sulla guida di delphi ma non ho trovato quello che
penso faccia al caso mio.
Dunque io apro un from contenente un oggetto di tipo TImage ed un di tipo
paintbox. Quando clicco su un bottone io copio l'immagine che ho sul Timage
al paintbox e quando ho finito le operazioni che devo fare su questa
immagine la vorrei spostare di nuovo su Timage chiaramente modificata. Quale
è il metodo che mi permette di fare questo?
Davide

 al paintbox
come lo fai?
Bye
A
--
Per rispondere non usare il reply ma scrivere al seguente indirizzo:
alsalvati(at)
supereva.it

> come lo fai?
Paintbox1.canvas.draw(0,0,bmp");
dove bmp2 mi contiene la bitmap che devo caricare
Ciao
Davide

da provare....
image1.canvas.assign(paintbox1.canvas)


> image1.canvas.assign(paintbox1.canvas)
Ho provato a fare come mi hai suggerito:
l'errore restituito è il seguente
"Cannot assign a TControlCanvas to a TBitmapCanvas"
Davide

Newsgroup: it.comp.lang.delphi
Titolo: per Mikas di Palanthas

o letto la tua risposta sull'uso di QReport com xp e w2000. Ho lo stesso
problema ma, scusa l'ignoranaza, come setto la
dir Temp su win 2000 o XP
Grazie

 ha scritto nel messaggio
news:9ulurf$2gn$1...@pegasus.tiscalinet.it...

scusa se non ho risposto prima ma ho letto il post solo oggi...
allora:
Tasto DX su risorse del computer
Selezioni Avanzate
Clicki variabili d'ambiente
nel dettaglio sopra ci sono due variabili (TMP e TEMP)
    basta clickare due volte e impostare C:\temp su tutti e due
ricorda di creare la directory c:\temp.
chiaro? ciao!
--== 
www.biancomirko.it
 ==--

Newsgroup: it.comp.lang.delphi
Titolo: Query al posto di Table ma...

Ho tre tabelle collegate tra loro, nella pagina
529 del manuale di Marco Cantu Programmare in
Delphi 6, si evince che č meglio utilizzare le query
e non le table per filtrare i dati da grosse tabelle.
Queste tre tabelle sono collegate con Masterfiled
ora vi chiedo sosa bello utilizzare per avere lo
stesso risultato con il componente Query?
Grazie di tutti e Buon Anno
Ciao Enzo
www.scozzaro.it

 ha scritto nel messaggio
news:aujdjr$2s4$1...@news.ngi.it...


 > Delphi 6, si evince che è meglio utilizzare le query


 ha scritto nel messaggio
news:aumvl4$v3v$1...@news.ngi.it...


 ha scritto nel messaggio
news:SYQP9.47374$R45.2...@news2.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: mysql e applicazione delphi

avendo un hosting remoto con db mysql e dovendo scrivere un applicazione
delphi che accede a questo db contemporaneamente da più client sparsi in
posti diversi (utilizzando internet) cè qualche precauzione da tenere???
-il server ha delle limitazioni per il numero di connessioni???
-delphi mi resta sempre collegato al db durante l'esecuzione
dell'applicazione oppure mi si sgancierà dopo un certo timeout??
Simone

 -il server ha delle limitazioni per il numero di connessioni???
su quello vai tranquillo, mi sembrava di aver letto qualcosa sul sito di 
mysql cmq non ti preoccupare se puoi limitarle lo devi fare tu dal file di 
configurazione.
ciao


??? perchè una vpn???
ho solamente un exe che deve consultare/gestire/inserire delle tabelle di un
db di prodotti
Simo

 di un db di prodotti
perchč cosě lasci una porta aperta e chiuque riesca a conoscere la password 
di root o di un'utente con molti privilegi potrebbe fare quello che vuole 
del tue db.
Inoltre lo scambio delle info non avviene crittato.
Credimi lascialo cosě in rete e vedrai che tempo poche settimane che begli 
scherzetti che ti fanno ;)
ciao

Nel caso possa interessarti, c'è un articolo di Bob Swart sull'uso di
MySQL con dbExpress da Delphi.  Lo puoi scaricare dalla sezione
"Sample Articles" di 
www.thedelphimagazine.com
-- 
Andrea Laforgia
Open Delphi Manual
http://groups.yahoo.com/group/delphi_open_manual/

tu come lo svilupperesti un applicazione del genere????
Simone

 tu come lo svilupperesti un applicazione del genere????
Tempo fa mi ero interessato alla cosa (poi il cliente ha rinunciato)
cmq sostanzialmente ci sono credo due vie possibili.
a) utilizzi dei webservice (i + sostengono il metodo migliore)
b) fai tutto come vuoi fare tu ma fai passare le info tramite un tunnel 
crittato (una vpn).
Per creare la vpn hai diversi modi:
il migliore IMO (ma il + costoso) è quello di utilizzare degli apparecchi 
hardware. Un costo abbordabile lo ottieni con i firewall zyxell (zywall) 
necessiti di uno che permetta n connessioni di ingresso e degli zywall 
versione client sui pc remoti.
altrimenti puoi fruttare tecniche software. es. windows permette di creare 
vpn tra pc collegati tra loro via internet.
naturalmente in entrambi i casi e fortemente consigliato almeno un ip 
statico.
Per ultimo ti dico che se scegli la strada della vpn devi anche studiare 
dei sistemi per non scambiare un volume troppo elevato di dati xchè la 
velocità è quella che è (anche con adsl molto veloci).
Ciao
Newsgroup: it.comp.lang.delphi
Titolo: D2006 win32 anomalie debug

se ometto riga evidenziata da atserischi (6) quando esegue la riga 7,
passo passo con F7 , salta direttamente a (end) senza segnalare errore;
nel progetto l'opzione debug sulla voce Compiler e' attivata.
anche qui se imposto un dataset che non ha il compo ID_ARTICOLO salta a
fine routine.
     iRifArticolo:=ClientDataSet5.FieldByName('ID_ARTICOLO').AsInteger;
altre opzioni possibli ?
Stefano.
repeat
     iRifArticolo:=ClientDataSet5.FieldByName('ID_ARTICOLO').AsInteger;
     ClientDataSet4.Close;
     sSQL:='SELECT * FROM TB_MERCI WHERE 
TB_MERCI.ID_MERCE='+QuotedStr(IntToStr(iRifArticolo));
6) ****     SQLDataSet4.Close;  *****
7)    SQLDataSet4.CommandText:=sSQL;
     SQLDataSet4.Open;
     ClientDataSet4.Open;
     sArticolo:=ClientDataSet4.FieldByName('CODICEARTICOLO').AsString;
     ClientDataSet5.Edit;
     ClientDataSet5.FieldByName('CODICEARTICOLO').AsString:=sArticolo;
     ClientDataSet5.Post;
     ClientDataSet5.Next;
   until ClientDataSet5.eof;
   ClientDataSet5.Close;
   SQLDataSet5.Close;
 end; 

a parte la nomenclatura che farebbe venire l'ulcera a chiunque...
nelle uses della unit hai sysutils?
A.

> nelle uses della unit hai sysutils?
ulcera a parte , si la unit sysutils e' presente.
Stefano 

 ulcera a parte , si la unit sysutils e' presente.
sei in un thread, in un com/active?
A.

> sei in un thread, in un com/active?
sul form principale di un''applicativo vcl32
Stefano 

non ho capito chi fa cosa...
i clinetdataset sono legati a dei provider?
A.

 passo passo con F7 , salta direttamente a (end) senza segnalare errore;
cancella i dcu, e ricompila.
-- 
Morde. 
(email fittizia, non sono contattabile)
ICLDweb: 
http://www2.samatel.com/icld/

>
si i CDS sono legati al DSP
CDS--> DSP --> SQLDataSet
DataSource --> CDS 

> si i CDS sono legati al DSP
allora togli tutto il codice legato agli sqldataset.
devi lavorare SOLO sui cds.
Quindi,
cds.commantext := '...';
cds.open;
cds.close;
while not cds.eof
..
A.
Newsgroup: it.comp.lang.delphi
Titolo: ttoolbar ereditata

Ciao a tutti,
nella mia applicazione ho una form base che contiene una ttoolbar con
alcuni pulsanti. Ereditando dalla form base mi porto giustamente dietro
anche la toolbar con i pulsanti, il problema č che se vado ad aggiungere
nuovi pulsanti, questi appaiono sempre alla destra dei pulsanti gią
esistenti, anche spostandoli a design time. č normale? posso ovviare a
questo comportamento in quelche modo?
esempio:
form base (toolbar)
btn1 btn2 btn3
form ereditato (tollbar) (design time)
btn1 btn2 btn4 btn3
form ereditato (tollbar) (runtime)
btn1 btn2 btn3 btn4                  ---> PERCHE'?
spero di essere stato sufficientemente chiaro,
in attesa di lumi vi ringrazio
-- 
Emanuele Desideri

purtroppo la property Index è readonly... Una scappatoia
(macchinosa..) ci sarebbe...
nel tuo form base definisci n protetti metodi, uno x ogni pulsante
"base" da aggiungere alla toolbar..
Cose del tipo:
PrepareButtonNew()
prepareButtonEdit()
...
Poi dichiari un metodo virtuale:
function TbaseForm.PrepareToolbar: integer;
begin
end
Poi, nei discendenti ne fai l'override:
function TInheritedForm.PrepareToolbar: integer;
begin
   preparebuttonnew();
   // aggiungi pulsante custom specifico per questo form
  preparebuttonedit();
   // aggiungi pulsante custom specifico per questo form
  ..
end;
In questo modo, ogni form ereditato stabilisce da se l'ordine di
"comparizione" dei pulsanti..
su 2 piedi di meglio non so trovare.
A.

 A.
Grazie Alberto,
speravo in qualcosa di molto piů veloce, in fondo tutto questo non vale la
pena se consideri che a me serve solo per avere il pulsante di uscita
sempre in fondo a destra...altre soluzioni che ho trovato sono di
aggiungere tale pulsante solo nelle form ereditate oppure mettere 2
toolbar...al momento ho intrapreso la seconda strada...
grazie comunque dell'aiuto e della dritta!
saluti
-- 
Emanuele Desideri
Newsgroup: it.comp.lang.delphi
Titolo: COME SETTARE UNA STAMPANTE COME PREDEFINITA





Ho un problema:


- Programma delphi che utilizza uno strumento di 
reportistica che usa dei Template e genera dei .DOC che a loro volta vengono 
mandati in pasto a Word tramite l'uso di un oggetto TOleVariant.


- Il programma emette stampe su più modelli e 
quindi su più stampanti voglio che Word prenda in automatico la stampante che 
l'utente ha settato dal programma...


 


COMUNQUE BASTA PREAMBOLI:


Dopo Aver fatto


 


Printer1 := TPrinter.Create;


ListBox1.Items := Printer1.Printers;


 


poi sull'Onclick della Listbox1


Vorrei settare la stampante scelta come predefinita 
in modo che Word usi quella in automatico.


 


Grazie in anticipo


________________________________
 David 
Marcucci  

                
Programmatore 

            Direzione 
Sistemi Informativi
   SITA S.p.a.



"Marcucci David"
scrive ffra l'altro
------=_NextPart_000_0047_01C0D7A6.3F637700
Content-Type: text/html;
 charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=3D"text/html; charset=3Diso-8859-1" =
http-equiv=3DContent-Type>
<META content=3D"MSHTML 5.00.2919.6307" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>Ho un problema:</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>- Programma delphi che utilizza uno =
strumento di=20
reportistica che usa dei Template e genera dei .DOC che a loro volta =
vengono=20
mandati in pasto a Word tramite l'uso di un oggetto =
TOleVariant.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>- Il programma emette stampe su pi=F9 =
modelli e=20
quindi su pi=F9 stampanti voglio che Word prenda in automatico la =
stampante che=20
l'utente ha settato dal programma...</FONT></DIV>
<DIV>&nbsp;</DIV>
[...]
Non si capisce molto.
Per favore non postare HTML e usa caratteri minuscoli hel Subj.
Grazie e
Saluti
Paolo Arosio

Newsgroup: it.comp.lang.delphi
Titolo: Web service e DB: riparto da zero

Ricominciamo da capo. Sto rantolando nel buio senza ottenere alcun
risultato e, cosa ben più grave, senza capire pressochè nulla di quello
che ho fatto fin'ora. Procediamo quindi per step.
Dunque, ciò che sto cercando di realizzare è una semplice applicazione
che, premedo un tasto, richiama una funzione di un web service la quale
non deve far altro che connettersi al mio db MySQL, eseguire una select
quindi restituire i record ottenuti.
La mia applicazione a questo punto deve ricevere questi record e
visualizzarli su una DBGrid.
Bene, da dove parto?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Bene, da dove parto?
Sicuramente devi crearti 2 componenti software la parte client che puoi
vedere quě:
1)
http://dotnet.borland.com/bdntv/delphi/d7xml.html
  cosě ti fai un'idea  di come si realizza un client per un web services,.
e la parte Server:
 Con delphi non ho mai realizzato un WebS
ma c'č il bellissimo wizard su File - New - Other - WebServices - SOAP
Apllication Server
che ti crea anche la parte server dell'applicazione che non dovrebbe essere
troppo difficile.
--
ciao
   gabriele
Newsgroup: it.comp.lang.delphi
Titolo: BDS 2006 e utilizzo memoria

Salve a tutti,
ho un piccolo problema con BDS 2006 (a dir la verità l'avevo anche col 
2005): tenendo aperto  l'ambiente di sviluppo e compilando il progetto 
alcune volte, ho notato che la quantità di memoria utilizzata da BDS 
continua ad aumentare fino a raggiungere livelli tali da costringermi a 
chiudere e riavviare il programma.
Qualcuno sa da cosa dipende questo comportamento e, se per caso bisogna 
avere qualche accorgimento particolare per ovviare a tale inconveniente?
Grazie
LV 

Luca Vitali ha scritto:

Se non ricordo male, uno degli "hot fix" disponibili risolveva proprio 
questo problema o comunque un difetto legato alla gestione della memoria.
Ad ogni modo, installa gli Update disponibili e il relativo "hot fix" e 
controlla se il problema persiste.
Per ulteriori informazioni, vai qui:
http://bdn.borland.com/article/33688
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Newsgroup: it.comp.lang.delphi
Titolo: chiudere form

apre quello secondario , l'altro rimane aperto.
Il "Close" viene eseguito *dopo* la ShowModal.  La chiamata a
ShowModal, diversamente da Show, e` sincrona.  Per ottenere il
risultato che vuoi devi usare Show, non ShowModal.

ciao a tutti,
ho un form che ne richiama un 'altro in showmodal. Prima di richiamare lo
showmodal ho inserito CLOSE per chiudere il form principale. Ma quando si
apre quello secondario , l'altro rimane aperto.
Come mai?
ciao
--

"Andrea Laforgia" <x@x.x> a écrit dans le message news:
onv72v0889fpso3fl...@4ax.com...

Altra soluzione: prova a chiamare ShowModal nell'onClose del primo Form.
IceCream

Altra soluzione: prova a chiamare ShowModal nell'onClose del primo Form.
Questa non e` una soluzione, il primo form non si chiude, rimane
comunque in attesa.

"Andrea Laforgia" <x@x.x> ha scritto nel messaggio
news:bb582vcrosror2j2d...@4ax.com...

a me funziona:
la form di lavoro in chiusura, assegno, su Onclose, "close" della form
pricipale !!

pricipale !!
Non capisco che cosa vuoi dire.  Inserire uno ShowModal nell'OnClose
del form principale, significa non consentire al form di chiudersi
subito, ma dover aspettare che si torni dallo ShowModal.

Andrea Laforgia wrote:



Questa volta hai ragione. Ma provando con onActivate, funziona:
if not Visible then
    ilTuoForm.ShowModal;
Il primo Form probabilmente non finisce di chiudersi, ma almenon non è più
visibile.
IceCream
---------------------------------------------------------------------------
Messaggio inviato attraverso 
http://www.trucchiperpc.it
 - sezione newsgroup

visibile.
Non ha senso questa soluzione.  Se si vuole che il form si chiuda,
bisogna usare (come ho detto nel messaggio originale) Show e non
ShowModal.  Ogni qualsiasi palliativo del genere di quello che
suggerisci non rappresenta una soluzione al problema.

"Andrea Laforgia" <x@x.x> a écrit dans le message news:
36c82vk0kmvur8vqi...@4ax.com...

E se c'è un'altro form dietro che non si deve potere attivare?... (sarà
un'ieda strana, ma non più di quella del post originale)

un'ieda strana, ma non più di quella del post originale)
Quella del post originale non mi sembra tanto strana, in ogni caso se
si vuol lasciare il form dietro si usa lo ShowModal, normalmente.

"Andrea Laforgia" <x@x.x> a écrit dans le message news:
52d82vsgsiag0k8oo...@4ax.com...

Scusa, ma non mi hai capito bene. Supponiamo che Form1 apre Form2, il quale,
chiudendosi, deve mostrare Form3, impedendo l'accesso a Form1 (sempre
visibile dietro). Qui Show non basta, visto che Form1 sarebbe accessibile.

visibile dietro). Qui Show non basta, visto che Form1 sarebbe accessibile.
Non e` logico che l'interazione tra Form2 e Form3 influenzi il
comportamento di Form1 che e` a monte dei due.  Se il tuo programma ha
di questi problemi, probabilmente l'interfaccia andrebbe rivista.

visibile dietro). Qui Show non basta, visto che Form1 sarebbe accessibile.
Io nel codice di Form1 scriverei:
...
Form2.ShowModal;
Form3.ShowModal;
...
In pratica, quando viene chiusa form2, sale form3 in primo piano, e sotto rimane sempre
form1 non attivo.
Ciao
Morde.
morde [at] programmer [.] net
Newsgroup: it.comp.lang.delphi
Titolo: Ridimensionare bitmap

Salve a tutti,
ecco qui un problema che mi sta facendo impazzire:
come posso ridimensionare un file bitmap ?
Ho provato con questo codice:
procedure ResizeBitMap(bm : TBitMap; w, h: integer);
var  TempBM:tBitmap;
begin
  TempBM:=TBitmap.Create;
  TempBM.Assign(BM); // copy from the subject bitmap into a temp location
  bm.Height := h;    // resize the subject bitmap
  bm.Width  := w;
  stretchblt(        // Spandex it back home.
                       BM.Canvas.Handle, 0, 0, W, H,
                       TempBM.Canvas.Handle, 0, 0, Tempbm.Width,
TempBM.Height,
                       SRCCopy
               );
 tempbm.Free;       // free the scratchpad.
end;
Carico quindi una file bitmap in un TBitMap, lo ridimensiono e salvo di
nuovo ma il risultato e' orribile, le immagini appaiono tutte rovinate.
Qualche idea?
Grazie per l'aiuto,
Ukkiosan

Non ricordo se sta sulle faq.
Ma se cerchi su delphi3000 dovresti trovare del codice che fa 'sta cosa.
Bye
AS
-- 
Posted from  [212.17.220.41] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Ma se cerchi su delphi3000 dovresti trovare del codice che fa 'sta cosa.
Grazie,ho risolto in modo egregio. Ma dove trovo le faq??
Ciao,
Ukkiosan
Newsgroup: it.comp.lang.delphi
Titolo: Ancora JVCL

Se sar� confermata l'indicazione avuta che JVCL ha un componente DBGrid che 
consente l'ordinamento ascendente e discendente tramite un clic sulla 
colonna del DBGrid, allora installerei il pacchetto. Prima vorrei 
approfittare dell'esperienza che qualcuno potrebbe avere su questo per 
rivolgere le seguenti domande:
- � vero quanto sopra ?
- come � valutato il pacchettto Jedi ? E' opportuno utilizzarlo ?
- non � che nella versione Delphi 2007 (comprato ma non ancora installato), 
questa specifica feature del DBGrid c'� gi� ? 

 - è vero quanto sopra ?
Che fiducia!
Butta un okkio qui: demo fatta a posta per te.
http://www.jurisweb.it/public/JVCLdemo.htm
Ciao,
Gianpiero

 - � vero quanto sopra ?


Newsgroup: it.comp.lang.delphi
Titolo: installazione/disinstallazione package e componenti

Ho un poblema: 
Se creo un nuovo package con delle componenti e poi li disinstallo 
(package e componenti)  se provo a re-installarlo l'installazione 
funziona alla perfezione, ma le componenti non vengono piú visallizzate 
nella palette e non c'é verso di farle apparire.
E'un problema noto o faccio qualcosa di sbagliato nell'installare e 
disinstallare il package? Uso Delphi 7
Grazie.
--- posted by geoForum on 
http://www.delphiedintorni.it

Come non detto..
Le componenti erano installate ma nascoste nella palette.
Mi scuso per la domanda banale, ma ero disperato..

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 2.0

Vendo delphi 2.0 con libri
30 €

...esiste ancora ??
forse per qualche museo !!
:-O

Newsgroup: it.comp.lang.delphi
Titolo: datamodule e impaginazione componenti

salve a tutti, cè un sistema per salvare l'impaginazione del datamodule, in
modo che da un pc all'altro non mi sposti tutti i componenti dataset?
Simone


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

 ha scritto nel messaggio
news:iMQta.90078$K35.2...@news2.tin.it...


 wrote in message
news:_PSta.51589$3M4.1...@news1.tin.it...


 ha scritto nel messaggio
news:W9Tta.97030$DT4.2...@twister1.libero.it...


Newsgroup: it.comp.lang.delphi
Titolo: Ancora tabelle in rutime....

Ciao a tutti
, già qualche giorno fa ho proposto il mio problema, ma la soluzione
ancora non è stata raggiunta!
Ripeto che la mia esigenza è quella di creare, in maniera dinamica, delle
tabelle con alcuni campi che abbiano settata la proprietà DefaultValue.
Queste tabelle verrano utilizzate da un'altra applicazione preesistente e
non modificabile, che richiede tabelle di questa specie.
Aggiungo inoltre che queste tabelle devono necessariamente venire create in
runtime, data la variabilità di alcuni campi.
Ho provato già le proprietà defaultExpression e autoGenerateValue, ma non
danno il risultato richiesto, dato che visionando la struttura di una
tabella generata in questo modo con Database Desktop, la proprietà
defaultValue rimane nulla.
Tuttavia sono sicuro che questa cosa è ottenibile, dato che lo stesso
Database Desktop poggia sul BDE!
Una probabile soluzione su cui sto lavorando è quella di estendere alcune
classi, ma sarei felice di una soluzione più pratica!
Spero di essere stato sufficientemente dettagliato, e di non avervi seccato
troppo con questo sproloquio!
Grazie!
Dario
di...@libero.it

>
[...]
Ripeto che la mia esigenza č quella di creare, in maniera dinamica, delle
tabelle con alcuni campi che abbiano settata la proprietą DefaultValue.
Queste tabelle verrano utilizzate da un'altra applicazione preesistente e
non modificabile, che richiede tabelle di questa specie.
[...]
<<
Bde32.hlp: cerca VCHKDesc e correlati;
oppure: crea le tabelle _a mano_ con tutti i campi default val che ti
servono; usa il BDE per aggiungere runtime i campi _normali_.
hth
Paolo Arosio
ps: il thread che avevi aperto il 30/5 esiste ancora
Newsgroup: it.comp.lang.delphi
Titolo: Dbgrid - stringgrid e totali

ciao a tutti! è possibile inserire in una dbgrid l'ultima riga per
calcolare i totali? Altrimenti come è possibile farlo con una
stringgrid? io ho provato ma mi continua a segnalare "Cannot insert or
delete rows from grid". ciao
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

E' sbagliato il presupposto.
la dbgrid non ha righe, si limita a mostrare le righe di qualcos'altro, 
ovvero un dataset.
nella stringgrid metti quello che vuoi, in una dbgrid serve un record.
Se vuoi una soluzione rapida, basta mettere un pannello sotto la griglia 
nel quale usando edit o roba simile most i totali, e buonanotte.
Se vuoi spendere soldi, puoi prendere la quantumgrid di 
developerexpress; magari se cerchi su soliti siti potresti trovare un 
qualcosa di free...
-- 
Alberto Salvati
A *Neapolitan* delphi developer whow is studing c# & .Net

 nel quale usando edit o roba simile most i totali
...oppure usare un bel ClientDataset nel quale introdurre alla fine una
riga con i totali e mantenere l'utilizzo della cara dbgrid ;-)
Saluti
	Marco
	info @ 
marcobortolani.it

 delete rows from grid". ciao
hai bisogno di un footer per la dbgrid oppure in alternativa dbgrid custom
che lo includa, io uso la smdbgrid (
http://www.scalabium.com/smdbgrid.htm
),
se fai una ricerca con google ne trovi altre.
-- 
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

Newsgroup: it.comp.lang.delphi
Titolo: DB Senza BDE, possibile???

Salve a tutti,
qualcuno di voi ha idea se esistano componenti che permettano l'accesso 
ad un db paradox, senza BDE(e nemmeno ADO)???
Grazie a tutti per la dritta,
Davide
PS ho gia' cercato in rete, ma ho trovato solo per oracle...

http://www.kylecordes.com/bag/list.html
Giulio

 ha scritto
nel messaggio news:AQI1c.60125$gk.25...@news3.tin.it...

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.611 / Virus Database: 391 - Release Date: 03/03/2004


Firebird, con IBX o FIBPlus o IBO
Newsgroup: it.comp.lang.delphi
Titolo: Edit multi riga

Ho un campo alfanumerico di 160 caratteri.
Mi piacerebbe far vedere al cliente un DBEdit che visualizzi due righe.
Cosa ho fatto: ho utilizzato un TDBMemo al posto del TDBEdit (visto che cmq
sfrutta una sola linea anche se è alto 300 pixel !).
Il problema del TDBMemo è che accetta gli ENTER e, soprattutto, se hai
definito un bottone con la proprietà Default o Cancel a TRUE non la
intercetta.
In parole povere: ho creato una form con due bottoni: OK (ModalResult =
mrOK, Default = TRUE), Annulla (ModalResult = mrCancel, Cancel = True)
poi ho aggiunto i TDBEdit e fino a quì tutto ok. Se aggiungo il MEMO ma non
lo uso con un BLOB ma con un campo "normale" l'ENTER e l'ESC si deve
comportare come un normale EDIT.
Allora cosa ho fatto: ho ridefinito la KeyPress facendo in modo da passare
in un altro oggetto e simulare la pressione del tasto ENTER (per quanto
riguarda l'ESC faccio la stessa cosa).
        procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
        begin
             if (Key = #13) then
             begin
                  Key := #0;
                  SelectNext(TWinControl(Sender),false,true);
                  ActiveControl.Perform(WM_CHAR,13,0);
             end;
        end;
Il problema è che il comando ENTER viene dato, ma non viene rispettata la
proprietà DEFAULT.
Ho provato a fare anche la perform di CM_DIALOGCHAR e CM_DIALOGKEY ma nulla
!
La soluzione sarebbe semplice se creassi un oggetto e facessi l'override
della "CMDialogKey" ma non è quello che voglio visto che è la prima volta
che mi viene fatta una richiesta del genere e, per ora, non ho intenzione di
creare un nuovo oggetto.
spero di essere stato chiaro, ringrazio in anticipo chiunque mi aiuti.
p.s.: ho delphi 4
ciao
Solid Snake IT

"Solid Snake IT":
| Cosa ho fatto: ho utilizzato un TDBMemo al posto del TDBEdit (visto che
cmq
| sfrutta una sola linea anche se è alto 300 pixel !).
| Il problema del TDBMemo è che accetta gli ENTER e, soprattutto, se hai
| definito un bottone con la proprietà Default o Cancel a TRUE non la
| intercetta.
prova a mettere nell'OnKeyDown:
if Key=VK_ENTER
 then begin
  ... // fai quello che devi fare alla pressione del'enter
  Abort;
 end;
come hai detto la soluzione piu' pulita sarebbe un'override,
ma questa e' piu' veloce (da fare)
Ciao,
Alan Solo
Newsgroup: it.comp.lang.delphi
Titolo: riconoscere il CD-ROM

Come a faccio a far rilevare la lettera della o delle unità CD-ROM ?
Grazie !                                    Fox

Come a faccio a far rilevare la lettera della o delle unità CD-ROM ?
così su due piedi (anzi seduto :-)) posso dirti di utilizzare l' API
"GetDriveType".
In base al risultato che ti restituisce capirai esattamente di che drive si
tratta.
Ti saluto.....ciao !!
Antonio Tarolla
BSSoftware Tips Mailing - List Support

usa questa API qua:
The GetDriveType function determines whether a disk drive is a
removable, fixed, CD-ROM, RAM disk, or network drive. 
UINT GetDriveType(
    LPCTSTR lpRootPathName 	// address of root path 
   );	
 
Parameters
lpRootPathName
Points to a null-terminated string that specifies the root directory
of the disk to return information about. If lpRootPathName is NULL,
the function uses the root of the current directory. 
 
Return Values
The return value specifies the type of drive. It can be one of the
following values: 
Value	Meaning
0	The drive type cannot be determined.
1	The root directory does not exist.
DRIVE_REMOVABLE	The drive can be removed from the drive.
DRIVE_FIXED	The disk cannot be removed from the drive.
DRIVE_REMOTE	The drive is a remote (network) drive.
DRIVE_CDROM	The drive is a CD-ROM drive.
DRIVE_RAMDISK	The drive is a RAM disk.
 
See Also
GetDiskFreeSpace 

 wrote in message
8bokh7$f6n$1...@news.flashnet.it...

Grazie !                                    Fox
+ FAQ di questa si crepa!! :)
Var Conta:Char;
For Conta:='A' to 'Z' do begin
If GetDriveType((Pchar(Conta+':\')))=DRIVE_CDROM then
ShowMessage(Pchar(Conta+':\')+' Drive CD-ROM');
end;
Newsgroup: it.comp.lang.delphi
Titolo: Copiare directory intere

Ciao,
esiste qualche funzione già fatta che mi permette di cpoiare un'intera
directory (comprese le sottodir) ?
grazie
Solid Snake IT
"Nemo mortalium omnibus horis sapit" (Plinio il VECCHIO)

 ha scritto nel messaggio
news:9bm9s4$mhi$1...@fe2.cs.interbusiness.it...



Devi usare la API SHFileOperation  (guarda nell'help Windows SDK).
Ciao.
Roberto

Newsgroup: it.comp.lang.delphi
Titolo: le FAQ

Da questa sera un comodo motore di ricerca ci permetterà di trovare le FAQ
di it.comp.lang.delphi ed altre raccolte da me alla pagina
www.sendai.it/encom
 nella sezione "Ricerca"
Chi vuole contribuire è benvenuto
--
Massimiliano Etere
maxe...@infinito.it
www.sendai.it/encom
ICQ#: 129227562


www.sendai.it/encom
 nella sezione "Ricerca"
Scusa, una cosa che non c'entra molto.
Ho provato a cercare "C++" e sono venuti fuori 2 record, tra
cui uno mi ha incuriosito, l'ho aperto e ho letto un passo:
"Object Pascal è una versione ampliata del Pascal "standard"
che tra l'altro implementa le classi (*), come in C++.
<...>
*: si anche pascal normale implementava le classi (la parola
chiave era Object) ma facevano molta piu' pena.. niente a
che vedere con l'Object pascal :)"
Ma chi l'ha scritta sta cosa ? :)
Il Pascal normale (se con "normale" si intende il Pascal
standard) non implementa affatto le classi.
Forse ci si riferisce al Turbo Pascal, ma e' un'altra cosa
rispetto a cio' che e' comunemente inteso come Pascal
"normale".  A parte il fatto che il TP introduce la gestione
dell'OOP a partire da una certa versione in poi.
Poi, chi l'ha detto che facevano "molta piu' pena" ? Turbo
Vision faceva pena ?
-- 
The Follet

 cui uno mi ha incuriosito, l'ho aperto e ho letto un passo:
Dobrebbe far parte delle FAQ di questo news... adesso controllo...
--
Max Etere
maxe...@infinito.it
www.sendai.it/encom
ICQ#: 129227562

Vision faceva pena ?
Beh penso sia da correggere...cmq il redattore di quella FAQ penso
intendesse una cosa del genere: "fa + pena rispetto all'OP"...
----
Lawrence "Rhymes" Oluyede
rhy...@myself.com

intendesse una cosa del genere: "fa + pena rispetto all'OP"...
gią, credo anch'io... insomma non ho mai usato il pascal "normale" o
il turbo pascal in modo OO... ma non credo proprio sia ai livelli del
Object Pascal, quello che ci ritroviamo in delphi...
Ciao,
Alan Solo

 Object Pascal, quello che ci ritroviamo in delphi...
Mai visto Turbo Vision ?
-- 
Posted from  [80.105.34.80] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Object Pascal, quello che ci ritroviamo in delphi...
Falso. Era un po' più complesso, ma a parte il fatto che le classi si
chiamavano oggetti aveva tutte le sue cosine al posto giusto (tra
l'altro è sintatticamente ancora supportato in delphi).
Ciao.
-----------
Ore 18.30: premo invio.

Ma insomma... quella FAQ la brucio o la lascio lě??? :)
--
Max Etere
maxe...@infinito.it
www.sendai.it/encom
ICQ#: 129227562

Ma insomma... quella FAQ la brucio o la lascio lě??? :)
Le ho lette: mi sembrano piů che oneste, a parte la frase in questione
che č tutto fuorché "tecnica", nella forma e nel contenuto :)
Massimo.
