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

Esiste una funzione tra la libreria CLX che mi permette di ricavare in una
stringa l'indirizzo IP della macchina locale oppure il nome?
Grazie!

su torry trovi una suite dedicata proprio al tcpip:
Synapse TCP/IP Library v.28
è free.
Presumo contenga anche qualcosa per calcolare l'ip che funzioni sia
suWinSozz che su Linux.
La suite è free e funge su kylix, delphi e c-builder.
di + non so
Bye
AS

Grazie!
Ho scaricato il tutto ma non ho trovato nessuna funzione che mi restituisca
l'ip locale.
Mi sai consigliare qualcos'altro?

 Mi sai consigliare qualcos'altro?
Devi proprio legarti alla clx?
Non puoi usare una direttiva di compilazione e, seconda di essa, includere
una funzione +ttosto che un altra?
Bye
AS

Si potrei utilizzare anche una direttiva di compilazione ma l'importante che
abbia la funzione per ricavarmi l'ip in windows e in linux visto che il mio
software dovrebbe girare su entrambi i SO.

Per Winsozz mi pare che stia sulle faq.
Me Linux (Intel) non so....
Bye
AS

Newsgroup: it.comp.lang.delphi
Titolo: Ricerca programmatore DELPHI 5.0

Siamo una azienda di elettronica. Progettiamo e costruiamo apparecchiature
per l'automazione industriale.
Cerchiamo un programmatore in linguaggio DELPHI 5.0 per lo  sviluppo di
applicazioni su PC.
Siamo interessati ad una collaborazione a tempo pieno od ad un part time.
La ns sede e' a 20Km a nord di Milano.
ARTECNICA ELECTRONIC SYSTEM
tel 031 929126
Sig Celio Trinca

Spett.le Sig.Barbieri,
Siamo due programmatori professionisti entrambi specializzati nella
programmazione
in ambiente Delphi.
Saremmo seriamente interessati allo sviluppo "on demand" di applicazioni per
vostro conto.
Il sistema di collaborazione ideale dovrebbe essere basato sul principio del
telelavoro.
Distinti saluti,
Alessandro Loffredo,
Roberto Cozzolino.
-- 
Posted from 
smtp1.libero.it
 [193.70.192.51] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.delphi
Titolo: Se installo una vecchia versione, rischio anche quella attuale ?

Buona giornata a tutti,
attualmente uso quotidianamente Delphi7 con tutti i componenti del caso su 
un sistema WinXP.
Un cliente mi ha chiesto di ampliare una applicazione che feci diversi anni 
fà sotto Delphi5 usando anche alcuni componenti.
Ora se io installo sul mio attuale computer Delphi5 con tutti i componeti 
necessari alla vecchia applicazione, rischio in qualche modo di 
compremettere il Delphi7 che uso quotidianamente ?
In altre parole le due versioni riescono a convivere ?
Se si, devo fare attenzione a qualcosa in ambito d'installazione della 
vecchia versione ?
Grazie mille a chiuque voglia rispondermi.
Stefano Frignani 

 vecchia versione ?
Io ho sempre  installato sulla mia macchina, tra una formattazione e
l'altra, D3, D5, D6 e D7 senza alcun problema nell'uso delle varie versioni.
Usavo seguire un'andamento "cronologico" però...
solo una volta per sbaglio ho installato D7 e subito dopo D6 e non ho
riscontrato alcun problema successivo.
Questo è tutto quello che posso dirti.
Ciao
Valter

> vecchia versione ?
Ciao
devi fare attenzione, se lo usi, alla versione del BDE
GP 

 devi fare attenzione, se lo usi, alla versione del BDE
Non dovrebbero esserci problemi fino a Delphi 5, in quanto la versione è 
sempre la stessa. :-|
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Inviato da X-Privat.Org - Registrazione gratuita 
http://www.x-privat.org/join.php

 In altre parole le due versioni riescono a convivere ?
Per precauzione, anche se non dovrebbero esserci problemi, farei prima un 
punto di ripristino ;-|
Giorgio 

 punto di ripristino ;-|
Il "punto di ripristino" generalmente tiene conto solamente di un 
particolare insieme di file di sistema e chiavi del registro.
Non sono certo che ripristinando il punto precedente si recuperi 
esattamente la situazione presente prima dell'installazione.
Ad ogni modo, Delphi non è un estensione del sistema operativo, quindi 
reinstallare e ripristinare una precisa versione non è un arduo compito.
Ciao,
   Marco.


   Marco.
A mio parere il problema puo' nascere solo sui file di registro, col punto 
di ripristino li salva.
Giorgio 

 di ripristino li salva.
Quello che volevo dire è che Delphi non apporta modifiche solo al 
registro di configurazione, quindi si potrebbe recuperare una versione 
valida ma avere altri file coinvolti con impostazioni errate (ad 
esempio, file INI o altri elementi condivisi esclusi dal servizio di 
Restore del sistema operativo).


Ok ... mi sa che nel giro di qualche giorno ci proverò ... speriamo bene ;-)
Vi prometto che renderò noto l'esito di questo test di alto valore 
scientifico quanto prima.
Saluti a tutti. 

 Stefano Frignani 
Andrea

Sono un ragazzo fortunato ;-)
Come avevo promesso ecco l'esito della prova... funziona bene!
Saluti a tutti
Newsgroup: it.comp.lang.delphi
Titolo: ISAPI vs ASP

Salve, ho un quesito e/o una richiesta da porvi.
Sto cercando di realizzare una pagina web, inutile dire che ho rifiutato di
farlo in delphi perchè l'ho sempre usato per gestire db. Adesso però vorrei
capire se è possibile tramite pagine web chiamare una funzione delphi
all'interno di una DLL passandogli dei parametri, e questo mi restituisce a
sua volta un valore.
Se si,  questa DLL deve  essere creata da progetto web? Non può essere una
semplice DLL creata senza tools internet? Dove posso trovare un esempio di
chiamata ISAPI con il corpo di questa ISAPI?
Gentilissimi come sempre, vi ringrazio anticipatamente,
    Marco Olivieri

 sua volta un valore.
Io ti consiglio di scrivere un oggetto automation e richiamarlo via ASP...
tutto molto più semplice ed efficace.
Ciao
--
Andrea Magni
E-Mail: 
ama...@interac.it

Newsgroup: it.comp.lang.delphi
Titolo: Colorare l'intera riga del DBGrid

Lo so che è la solita domanda, però io non ci riesco ed ho trovato cento 
esempi, ma tutti colorano lo sfondo della singola cella o della colonna. Io 
invece voglio colorare l'intera riga di un DBGrid e solo la riga sulla quale 
ho iniziato un edit.
Questo i colora la colonna:
DBGrid1.Canvas.Brush.Color := clYellow;
DBGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State);
Voglio un colore Yellow per la cella sulla quale sono in edit e un altro 
colore per l'intera riga. Bianco per il resto delle righe del DBGrid.
Come si fa ? Si fa ? 

 Lo so che č la solita domanda, perň io non ci riesco ed ho trovato cento 


 avuto solo che adesso non vedo più nulla.
È normale. Se la setti a true il disegno viene fatto di default (cioè 
all'evento DrawColumnell o come caspita si chiama, è associato un gestore di 
default)
Se la meti a false il gestore d'evento che fa il disegno lo devi scrivere 
tutto tu (in realtà mi sono sempre chiesto se poi, per le righe che non mi 
interessano, posso chiamare comunque quello di default)

Newsgroup: it.comp.lang.delphi
Titolo: DATABASE curiosità mia...

Salve Salvino
  Vorrei sapere se esiste qualche modo ( non ne dubito ) per rendere
indipendenti i database dal database explorer e desktop. Vi spiego, ho
fatto un programmino scemo con database paradox e che però non riesco
a farlo girare in un'altra macchina priva dei succitati programmi.
Come fare?
Grazie
		Carlo
{=';'=}
*******************************************
*  Anti Spam protection, to reply me please remove underline 
*  character from my e-mail
   Protezione da Spam, cancella il carattere _ dalla mia e-mail    *
   per rispondere                                                  *
                            ****************************************

 Come fare?
Database Explorer e Desktop non servono sull'altra macchina. Ma serve il
BDE. Se prepari dei dischetti di installazione con InstallShield (4
dischetti per un programmino scemo) includendo il BDE e poi li usi per
installare sull'altra macchina vedrai che va.
Newsgroup: it.comp.lang.delphi
Titolo: mandare in stampa files pdf

devo mandare in stampa (su stampante che supporta PCL 6)una serie di
file pdf in questo modo
sul cassetto 2 della stampante
file_pag_1.pdf
sul cassetto 3 della stampante
file_pag_2.pdf
sul cassetto 4 della stampante; fronte e retro
file_pag_3_e_4
il primo approcio che ho avuto è  stato quello di
utilizzare
ShellExecute(0, 'print', 'C:\test\file_pag_1.pdf', nil, nil, SW_HIDE);
tralasciando il fatto noioso di avere comunque AcrobatReader sulla barra
della applicazioni
il problema che sto avendo è quello di non avere il controllo sulla
stampante quindi non riesco a specificare per ogni file che
AcrobatReader deve stampare da quale cassetto prendere la carta e se
stampare fronte e retro
c'è qualche possibilità di settare la stampante
in modo corretto prima dello ShellExecute ed evitando
che quest'ultimo si impossesi della stampante ?!?
se non fosse possibile mi verrebbe in mente di installare
più volte la stessa stampante con nomi diversi ed impostazioni
predefinite diverse e poi lanciare lo ShellExecute specificando i
parametri per definire la stampante da utilizzare; ma sinceramente
la vorrei tenere come ultima spiaggia
quali altri metodi posso utilizzare per mandare in stampa
una notevole quantità di pdf senza dover utilizzare ShellHexecute !?!
ringrazio anticipatamente
per le Vostre preziosi illuminazioni
Cordialmente,
Stefano

 una notevole quantità di pdf senza dover utilizzare ShellHexecute !?!
ole?
-- 
Alberto Salvati
A NEAPOLITAN Delphi Developer who is studing c# and .net
"Dicette 'o pappece 'nfaccia 'a noce dammi 'o tiempo che pure te spertoso"

 ole?
la nuova versione del componente che utilizzo per
la creazione del pdf mette a disposizione anche funzioni
per la stampa quindi penso di risolvere in questo modo
tuttavia dove posso trovare documentazione
su Ole con AcrobatReader ?!?!
Cordialmente
Stefano
Newsgroup: it.comp.lang.delphi
Titolo: [configurazione] Applicazione Web

Ho necessità di registrare un dominio e di creare con Delphi 7
un'applicazione web utilizzando i componenti intraweb. 
Vorrei gestire un database a cui accedono una 20ina di utenti e dal quale
effettuano un paio di stampe degli archivi.
Ho pensato di richedere un hosting su server Windows, con database MySql,
con pagine statiche in formato html. 
Ho notato però però che Delphi genera comunque un file eseguibile, ma è
ammesso nel proprio spazio web dei vari provider l'installazione di un
file eseguibile tramite ftp ? 
Sarei orientato per la registrazione e il servizio hosting su 
aruba.it
, vi
sembra che offra un buon servizio ?
Qualcuno di voi ha già avuto esperienze in merito e sa consigliarmi su una
configurazione ottimale...? considerando che sono alle prime armi e lo
scopo dell'applicazione sarebbe esclusivamente 'didattico', tanto per
prendere maggiore dimestichezza con i componenti intraweb e le
applicazioni web ?
Grazie per le risposte
Sparta
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 
aruba.it
, vi sembra che offra un buon servizio ?
Buona lettura 
http://tinyurl.com/qzfm
-- 
I'am what I'am, I do what I can

Newsgroup: it.comp.lang.delphi
Titolo: Ciao a tutti . . .

. . . ho appena aacquistato cristal report 9.0 e lo volevo utilizzare
richiamando i suoi report da Delphi ver. 5.0 c'è qualcuno che sa darmi
qualche inidicazione su come poter fare ? suggerimenti veloci ?
Grazie in anticipo
Gabriele

 e lo volevo utilizzare
auguri ;)
Ciao, Sandro

 ha scritto nel messaggio
news:btodnc$9lshk$1...@ID-43509.news.uni-berlin.de...


 per tutti - ReportBuilder, hai scelto di comprare proprio il peggiore :D
Mi sono sempre chiesto se esistono report, anche non ottimi ;) ma gratuiti?
E poi, io non programmi in Delphi da parecchio tempo, ma delphi non ha
integrato un report designer (Quickreport se non sbaglio) che tutto sommato
fa il suo lavoro?
Ciao

per tutti - ReportBuilder, hai scelto di comprare proprio il peggiore :D
Beh, dipende. CR in alcune cose ha dei problemi è vero, però non fa
così schifo.
-- 
"La velocità luce non è sufficiente Comandante Nunziatella, 
dobbiamo passare alla velocità smodata!"


wrote:

Io non uso CR9 ma il 7 e quindi non so se le cose siano cambiate però:
la Seagate dovrebbe mettere a disposizione delle VCL ad hoc per
utilizzare CR in delphi (crpe.pas).
Ti consiglio di guardare il programma demo che è (una volta tanto)
molto esaustivo.

Newsgroup: it.comp.lang.delphi
Titolo: Distinguere OnCLick e OnDblClick





È possibile distinguere gli eventi Onclick e 
OnDblClick dello stesso oggetto? Purtoppo ho notato che, quando entrambi gli 
eventi sono assegnati, prima del doppio click viene comunque eseguito l'evento 
associato al click semplice!


Grazie



scusa, la soluzione fa schifo, ma č la prima che mi č venuta in mente:
const doppioclick: boolean = False;
procedure TForm1.Label1Click(Sender: TObject);
begin
  doppioclick:= False;
end;
procedure TForm1.Label1DblClick(Sender: TObject);
begin
  doppioclick:= true;
  if doppioclick then showmessage('ciao');
end;
p.s. la prossima volta non postare in html
--
Consonni Davide
bmq...@tin.it
gna...@wappi.com
webmaster of
http://gnaffy.Tripod.com
http://www.traduzioniellepi.com

 ha scritto nel messaggio
news:000c01c099b9$207c7240$37fb1d97@pome...


Newsgroup: it.comp.lang.delphi
Titolo: Nome dell'eseguibile dall'handle

Mi sembrava si potesse ottenere il nome del file di una applicazione
conoscendo l'handle della sua Top Form ma non ricordo come, grazie
Giorgio

 Giorgio
Devi conoscere l'handle del processo, e lo puoi ottenere con
hProcess:= GetWindowLong(handleFinestra, GWL_HINSTANCE);
Per conoscere il nome del processo:
Su windows 9x puoi usare GetModuleFilename
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui/windowsuserinterface/windowing/windows/windowreference/windowfunctions/getwindowmodulefilename.asp
Su windows nt/xp/200x devi usare GetModuleFilenameEx, GetModuleFilename
ritorna solo le informazioni del processo corrente
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/perfmon/base/getmodulefilenameex.asp
http://www.swissdelphicenter.ch/torry/showcode.php?id=616
Saluti,
Antonio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:co1nh2$q3c$1...@news.newsland.it...


Newsgroup: it.comp.lang.delphi
Titolo: Testo in Memo

Come si fa a mettere il testo di un documento di tipo txt o doc in una memo?
Grazie
--
Aloha,
Tihocan
can...@tin.it

Ciao,
penso che il DOC non si possa mettere poichč formattato RTF.
Per caricare un file Txt fai cosě,
Memo1.lines.loadfromfile('percorso\nomefile)
--
- Carlo -
BSSoftware Tips Mailing-List Support
Newsgroup: it.comp.lang.delphi
Titolo: Aiuto aiuto aiuto. (IB server)

Uso Win98 e Delphi5 Client/Server.
Ho installato il sever di IB (ossia mi compare una icona con un triangolo
verde tra i Task di Windows).
Ma se cerco di usare db desktop per creare una tabella IB non risco a
salvarla.
Mi chiede di inserire la password che ovviamente non è definita.
(non devo cambiare valore a true di un componente della connsessione perchè
non ho ancora la tabella.)
La stessa cosa accade se voglio creare una tabella Foxpro o Acces o
qualsiasi altra cosa che non sia Paradox o dbase.
O meglio esistono componenti "migliori" che permettano una interrogazione
sql senza passare da Oracle o altre piattaforme costose.
--------------------------------
Inviato via 
http://usenet.libero.it

Questo messaggio non è molto chiaro.
Ma se IB sta per InterBase allora, tanto per cominciare, la password di 
default di IB è "masterkey".
MG

 Mi chiede di inserire la password che ovviamente non č definita.
Spero tu stia scherzando: ISC4.gdb (il database in cui il server tiene i
nomi degli utenti) contiene di default un user SYSDBA e la sua password
masterkey (da cambiare ASAP).
Sul tuo pc puoi impostare le variabili di ambiente ISC_USER=SYSDBA e
ISC_PASSWORD=PasswordCheSceglierai in modo che non ti siano richieste
dai tool a linea di comando che vengono insieme a IB (FB).
Nel caso non l'avessi gia' data, consiglio una lettura del documento
DevGuide.pdf.
[cut il resto]
Saluti
Paolo Arosio

 ha
scritto:

Grazie mille a tutti.
Conoscete della documentazione in italiano a cui fare riferimento oltre a
Texeira et alt. e M. Cantù .


Newsgroup: it.comp.lang.delphi
Titolo: File Res

Ciao a tutti,
c'è qualcuno che mi può spiegare come utilizzare un file .Res per la
raccolta delle mie icone sia in formato ICo che Bmp.
Io non so da dove iniziare, dalla creazione del file Res alla gestione.
Grazie a tutti
--------------------------------
Inviato via 
http://usenet.libero.it

 Io non so da dove iniziare, dalla creazione del file Res alla gestione.
Cerca su Google un programma di Nome ResHacker è free!
E' abbastanza utile per creare file di risorse.
Per inserirle in delphi basta che aggiungi la riga {$R nomefile} in
qualsiasi unit.
Per caricare le immagini poi puoi usare il metodo LoadResourceName (o
simile)
del controllo Image o della classe Bitmap.
Cerca nella documentazione il metodo che ti ho scritto vedrai i controlli
che
lo utilizzano!
Questo per quanto riguarda le immagini!
Nei file res si possono inserire anche stringhe, cursori, ecc...
ma su questo non so dirti niente.
Se scopri come si carica una stringa o altro da un file di risorse postalo
per favore!
CIAO!



Ti ringrazio per la tua gentilezza se scopro qualcosa te lo dico

Newsgroup: it.comp.lang.delphi
Titolo: [Q] Creare note musicali con delphi

Salve a tutti, sono un programmatore delphi dilettante e avrei un piccolo
problema:
vorrei far "suonare" un piccolo programma in Delphi.
Ovvero data una stringa di caratteri lui mi restituisce in uscita frequenze
audio di varia durata.
so che in Pascal si usava la funzione
Sound (440);
delay (100);
Nosound;
(o qualcosa di simile ) riproducendo la nota LA (440 Hz) per il tempo di 100
millesimi di secondo sull'altoparlante di sistema.
Per realizzare una cosa simile in Delphi (sempre che sia realizzabile) c'è
qualche funzione con cui posso gestire la scheda audio o l'altoparlante di
sistema?
Ringrazio e se possibile contattatemi via e-mail: 
webm...@portalnet.it

mi sembra sia beep( ) con un parametro, ma vado a memoria, e forse mi
sbaglio, dacci un'ochciata.
--
Gna...@Wappi.com
ICQ# 76488613
http://gnaffy.tripod.com/

Con queste procedurine.......
Procedure Suoni(freq: Word);
Begin
  asm
    PUSH  EBX
    MOV   BX,FREQ
    MOV   AX,34DDH
    MOV   DX,0012H
    CMP   DX,BX
    JNC   @@2
    DIV   BX
    MOV   BX,AX
    IN   AL,61H
    TEST  AL,3
    JNZ   @@1
    OR   AL,3
    OUT   61H,AL
    MOV   AL,0B6H
    OUT   43H,AL
@@1:MOV   AL,BL
    OUT   42H,AL
    MOV   AL,BH
    OUT   42H,AL
@@2:POP   EBX
  end;
end;
Procedure NoSuoni;
Begin
  asm
    IN    AL,61H
    AND   AL,0FCH
    OUT   61H,AL
  end;
end;
Saluti. Livio
__________|------|______
http://www.alfabetica.com
secu...@iol.it
tec...@alfabetica.com
tec...@inwind.it

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

Ciao a tutti.
Ho realizzato un piccolo programma che a secunda delle esigenze generà un
file .TXT o un file .HTML.
Il nome ed il percorso del file generato è contenuto un un campo EDIT il
quale contiene la stringa completa (Es.
edit2.text:='c:\windows\my_docs\prova.TXT').
Volevo inseire un pulsante il quale mi aprisse il file generato.
Al gestore dell'oevnto OnClick del pulcante ho associato la seguente riga di
comando:
ShellExecute(GetDesktopWindow, 'open', edit2.text, nil,nil,sw_ShowNormal)
Purtroppo non funziona  in quanto alla compilazione il mio compilatore
Delphi 3.0 mi presenta il seguente errore: Incompatible types:'TCaption' and
'PChar'.
Se al posto di edit2.text mettouna stringa completa di path
(es:c:\windows\my_docs\prova.TXT) il programma funziona correttamente solo
che ovviamente posso aprire sempre e solo il file indicato nella stringa.
Qualcuno mi può aiutare?
Grazie.
--
**************************************
Giorgio Marinangeli
E-Mail 
mgio...@cronosnet.com
ICQ 12941403
http:\\
web.tiscalinet.it/gmsoft
*************************************

Qualcuno mi puň aiutare?
ShellExecute(GetDesktopWindow, 'open', PChar( edit2.text ),
             nil,nil,sw_ShowNormal) ;
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
--------------------------------------------------------------
"Partire e' un po' morire e morire e' partire un po' troppo !"
--------------------------------------------------------------
Newsgroup: it.comp.lang.delphi
Titolo: Traduzione Consts.pas

Ciao,
  vorrei tradurre il file Consts.pas per tradurre diversi form inclusi nelle
VCL. Qualcuno di voi mi sa dire se la traduzione già esiste oppure se esiste
un altro metodo per tradurre solo in italiano le stringhe di Delphi?
Grazie 1000



AFAIK, la traduzione non esiste, comunque ti conviene copiare il
consts.pas nella cartella del tuo progetto, cambiare le stringhe ed
eseguire un build.  Non lavorare sul file originale.
-- 
Andrea Laforgia
"God is dead." -- Nietzsche
"Nietzsche is dead." -- God

 wrote:

Fai come ti dice Laforgia, evitando di modificare l'orginale.
Io lavoro con d6 pro, se anche tu hai lo stesso e mi mandi un'email reale ti spedisco quello che ho tradotto per me.
Ciao
Morde.
morde [at] programmer [.] net

Ti scrivo direttamente
Grazie 1000

Sapevo ed utilizzavo questo metodo. Visto che non ho più il mio file di
traduzione, per evitare di fare doppio lavoro ho chiesto su NG.
Grazie 1000

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

 VCL. 
e usare l'apposito Wizard di Delphi, no??
In D6: menu Project > Languages > Add
-- 
Mauro Falzari ( 
http://digilander.libero.it/mauro.falzari
 )
"Se guardi nell'abisso, anche l'abisso guarda in te." (Friedrich Nietzsche)

In D6: menu Project > Languages > Add
Dipende dalla versione, io ho la professional e dell'ITE non c'e' traccia.


 Morde.
Nella Pro puoi fare file|new|other... <New> Resource DLL Wizard, ma solo
se vuoi avere piu' tempo per il caffe' (in relazione alla velocita'
della macchina, ma in confronto alla velocita' del compilatore
Delphi...)
Saluti
Paolo Arosio

Newsgroup: it.comp.lang.delphi
Titolo: Conversione da secondi a hh:nn:ss

 
          Salve sono 2 giorni che riesco a risolvere questa conversione
come faccio a convertire 215994 secondi in 59h 59m 54s.
Grazie.
Vincenzo Di Falco
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


215994 / 3600 = 59,998333333333333333333333333333 Il resto intero sono 
le ore
59,998333333333333333333333333333 - 59= 0,998333333333333333333333333333 
0,9983333333333333333333 x 60 = 59,9 la parte intera sono i minuti
59,9 -59 = 0,9
0,9 x 60 = 54 sono i secondi rimanenti
--- posted by geoForum on 
http://www.delphiedintorni.it

 come faccio a convertire 215994 secondi in 59h 59m 54s.
FormatDateTime('h"hr:"n"min:"s"sec"', 12321331 / SecsPerDay);
12321331 --> 14hr:35min:31sec
Acqua

> FormatDateTime('h"hr:"n"min:"s"sec"', 12321331 / SecsPerDay);
raise Exception.Create('Raggiunte le 24h il *contatore* riparte da
0!!!!!!');
meglio usare la seguente:
function FormatSeconds(sec : Integer) : string;
var
    hours, mins, secs : integer;
begin
    hours := sec div 3600;
    mins := (sec div 60) mod 60;
    secs := (sec mod 3600) mod 60;
    Result := Format('%s hr, %s min, %s sec', [IntToStr(hours),
IntToStr(mins), IntToStr(secs)]);
end;

Grazie funziona una favola.

Newsgroup: it.comp.lang.delphi
Titolo: Caricare / Non caricare una DLL

Ciao a tutti : ho un problema.
Ho un .exe che carica una .dll ma vorrei che non desse errore nel caso in
cui tale dll(con diversi metodi esportati) non fosse presente nella stessa
directory.
E' possibile farlo?
Non sono un'esperta programmatrice, ma non sono nemmeno alle prime armi.
Grazie a chi mi darà qualche consiglio utile.
Ciao
Nicky

E' possibile farlo?
Caricala dinamicamente avendo cura di accertarti, prima, che il file
sia presente nelle directory in cui viene cercato.
-- 
Andrea Laforgia (ICQ# 87230455) ---------------------------
Non scrivetemi in privato, se non richiesto espressamente.
No replies in private e-mail, unless explicitly requested.
----------------------------------------------------------

E' possibile farlo?
Utilizzando la coppia LoadLibrary + GetProcAddress (il meccanismo _se
non sbaglio_ e' detto di dynamic o late-binding, contrapposto a quello
statico di, ad es, windows.pas).
Esempio:
procedure LinkToDll(DllPath: TFilename);
var Dll: THandle;
begin
  if not FileExists(DllPath) then 
    Abort;	
  // eventuale verifica del fatto che siano gia' stati
  //   linkate le funzioni della dll
  // per le modalita' di ricerca del file, v. win32.hlp
  Dll := LoadLibrary(PChar(DllPath));
  if Dll = 0 then
    RaiseLastWin32Error;	// oppure: Abort;
  try
    @FirstProcedure := GetProcAddress(Dll, PChar(NomePrimaProcedura));
    ...
    @LastProcedure := GetProcAddress(Dll, PChar(NomeUltimaProcedura));
  finally
    FreeLibrary(Dll);
  end;  
end;    
hth
Paolo Arosio

Newsgroup: it.comp.lang.delphi
Titolo: True/False: problema stupido

 
ICQ# 156068277

Grazie.
Sě, nella proprietŕ DisplayValues del campo in questione metti 'Sě;No'
Ciao

 
io uso la libreria Rx...(non mi ricordo bene ma l'ho trovata su torry) e 
tra le altre cose ha una RxDbGrid che riconosce se il campo è Boolean e 
te lo fa vedere come una CheckBox, io mi trovo molto bene.
Inviato da 
www.mynewsgate.net

Newsgroup: it.comp.lang.delphi
Titolo: blob - aprire file senza salvarlo su disco

Buonasera a tutti,
come da oggetto vorrei, dato un blob, aprirlo con la relativa 
applicazione senza salvarlo su disco.
E' possibile?
ho cercato un po in rete ma le uniche soluzioni trovate salvano il file 
in una directory temporanea, come in questo esempio:
http://stackoverflow.com/questions/945785/how-can-i-handle-temporary-files
 
 
Mi confermate che ï¿œ l'unica strada o qualcuno ha soluzioni da 
suggerire?
Grazie,
 
-- 
Emanuele Desideri
 
 

 E' possibile?
 
A mio avviso, a meno che l'applicazione non preveda un canale di comunicazione apposito (es. DDE, OLE, ...) l'unica alternativa è quella di salvare il file con un nome temporaneo (usando le relative API di Windows), da salvare nei percorsi appositi, e lanciare con "ShellExecute" il programma associato per aprirlo.
 
Ciao,
  Marco.
 
-- 
MARCO BREVEGLIERI
#Home: 
http://www.marco.breveglieri.name
 
#Blog: 
http://www.compilaquindiva.net
Newsgroup: it.comp.lang.delphi
Titolo: Pix Experts for Delphi 6

Ciao Ragazzi,
  In quest'ultimo periodo mi sono divertito nello scrivere degli experts per
D6.
Ho implementato diverse cose....:
1) Open current file folder
2) Tab sequence Order
3) Projects Manager... ()
4) Run without debugging
5) Hide/Show non-visuals components
6) Comment/Uncomment Code
Credo che possano essere utili anche a voi e quindi vorrei regalarvi questa
mia
piccola creazione...
Come posso metterla soltanto a vostra disposizione?
Ciao,
 Alessandro

 Come posso metterla soltanto a vostra disposizione?
Potresti mandarla ai tip di torry per esempio .... oppure mandarla alla mia
casella di posta !!! :-))
ciao Luca
Pu...@libero.it

L'ho spedito al tuo indirizzo e-mail!
Fammi sapere cosa ne pensi.
ciao,
  Alessandro.
"Luca Zanni" <Item[i]@nil.String> wrote in message
news:eeUna.49313$iy5.1...@twister2.libero.it...


Come posso metterla soltanto a vostra disposizione?
Dovresti uplodarla in qualche sito free (tipo 
lycos.it
) oppure se qualcuno ha
spazio a disposizione puo' farsela spedire da te e pubblicarla per tutti.
Dipende dagli altri, io non ho al momento spazio web dove poter pubblicare.
Ciao e grazie per questo bel gesto. :-)
-- 
Morde. 
morde[at]programmer[.]net

 wrote in message
news:fk40avg4tt4mivo11...@4ax.com...


QUI, da questo NG.
In tal caso segui il consiglio che ti è stato dato e pubblica, in
qualche modo, quegli experts in modo da renderli disponibili a tutta
la comunità.
Grazie.
-------------------------
    Luca Leoncavallo
lleonc...@racine.ra.it
-------------------------

 Fammi sapere cosa ne pensi.
Ciao Buona Pasqua  buona Pasquetta
mi hai mandato un bpl ma cosa contiene ? niente ?? scusa ha ho passato delle
feste Distruttive !!

scusa ha ho passato delle
 feste Distruttive !!
Cmq complimenti !!!!!!!!!!! Postalo su un sito publico !!!! in modo che
tutti ne possano gioire !!! :-)

Ciao a tutti,
  ho pubblicato il package su torry, spero tanto che vi sia utile. Se non
erro la pubblicazione avverrà a giorni.
Tengo a precisare che non è ultimata la parte relativa all'inserimento
automatico dell'header dei metodi.
 Se avete consigli, critiche, osservazioni, io son qui....
Ciao a tutti
 Alessandro
"Pop Merrill" <lleonc...@NOSPAMeconb.com> wrote in message
news:plr9av41p9aikpsha...@4ax.com...

Newsgroup: it.comp.lang.delphi
Titolo: Event e Unit

Ciao a tutti,
ho aggiunto un evento ad un componente standard (ereditandolo
logicamente).
Fra i parametri dell'evento c'è anche un oggetto DATASET.
Quando all'interno di una unit voglio implementare questo evento devo
prima
aggiungere manualmente fra le uses interface della unit la unit DB.
Come posso impostare tutto questo in automatico?
Grazie
Rino.

> Come posso impostare tutto questo in automatico?
non puoi.
AS

e portami le unit necessarie quando prendo il componente e lo metto su
una form?

onestamente, non ho capito cosa vuoi dire.

allora,
quando metto un componente su una form, fra le uses interface vengono
automaticamente incluse tutte le unit che servono al componente in
questione.
Come posso far includere delle unit che dico io?

non puoi.

 Come posso far includere delle unit che dico io?
Fai un tentativo: aggiungi il percorso delle unit a cui ti riferisci al 
"Browsing Path" dalla finestra di dialogo delle opzioni dell'IDE; 
successivamente, vedi come si comporta Delphi quando salvi il file che 
contiene un riferimento ad un identificatore contenuto nella unit esterna.
D2005/D2006 possiedono inoltre funzionalità specifiche (come "Find 
Unit") per ricercare automaticamente unit in cui sono definiti tipi di 
dati (inseriti dall'utente o selezionati all'interno del sorgente).
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

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

Ciao a tutti, vorrei chiedervi una cosa:
Sapete come fare dei popup tipo MSN???
C'è qlc componente in giro?

 C'è qlc componente in giro?
Qui:
http://people.zeelandnet.nl/famboek/delphi/index.html
Bye
Marco

Grazie, ora provo
Newsgroup: it.comp.lang.delphi
Titolo: funzione locate - richiesta

Vorrei chiedere la cortesia di scrivermi la FUNCTION LOCATE per fare la 
ricerca su due campi indicizzati (attore e convenuto) di un database 
(paradox 7) di Delphi 3.
Grazie fin da ora a chi mi aiuterï¿œ.
Non sono programmatore, ma un neofita autodidatta, che ne sa ancora poco 
di programmazione.....
-- 
Cordiali saluti da
Mazinga
--------------------
"Imago animi est sermo"

 (paradox 7) di Delphi 3.
Locate('attore;convenuto', VarArrayOf(['Sight', 'Diver']), [loPartialKey]);
Ciao.

 di programmazione.....
Per acquisire competenza su una qualsiasi cosa ci si deve impegnare...
Dal guidare una moto al software a tutto il resto.
La cosa drammatica e' che oggi il "messaggio" puo' essere riassunto
nel "e' tutto facile".
Questo non e' vero.
Finche' non inizierai a studiare, a guardare la guida in linea etc,
resterai un "neofita autodidatta":
function Locate(const KeyFields: String; const KeyValues: Variant;
Options: TLocateOptions): Boolean;
Description
Call Locate to search a dataset for a specific record and position the
cursor on it.
[cut]
with CustTable do
  Locate('Company;Contact;Phone', VarArrayOf(['Sight Diver', 'P',
'
408-431-1000
']), [loPartialKey]);
[cut]
che se leggi bene e' praticamente identico al blocco di codice che ti
e' stato suggerito:
Locate('attore;convenuto', VarArrayOf(['Sight', 'Diver']),
[loPartialKey]);
Non c'e' polemica: ti sto dicendo come stanno le cose.
A.

 Non c'e' polemica: ti sto dicendo come stanno le cose.
Per carit�, devo ringraziarVi per la disponibilit� e per la gentilezza.
Ripeto: non era mia intenzione avere la "pappa pronta".
Mi sono appassionato a Delphi 3, che comprai in originale anni fa, ma 
alcune cose, anche consultando i manuali, non riesco proprio a 
comprenderle. E, ora che ho 60 anni suonati, non ho pi� il tempo, n� la 
voglia di "studiare".
Ho "scritto" questo programma dieci anni fa e mi � molto utile nella 
gestione della cancelleria del tribunale dove lavoro. Vorrei solo 
perfezionare la ricerca su due campi. Tutto qui. Ma credo di non 
riuscirci con la funzione locate.
Comunque, ancora grazie a tutti per le risposte datemi. Chiedo scusa se 
sono sembrato un "approfittatore", come si dice a Napoli. Non era 
assolutamente mia intenzione farlo.
Grazie anora


 riuscirci con la funzione locate.
Ah.. allora le cose sono decisamente diverse; se proprio devi usare 
Delphi 3 (sebbene ti consiglio almeno il 5), Installati una macchina 
virtuale XP cos� da avere tutto un ambiente coerente (Windows7 e D3 sono 
ormai incompatibili).
VirtualBox � gratuito e funziona abbastanza bene, poi ovviamente ti 
servir� la licenza di XP...
Quanto alla ricerca specifica, magari il problema � diverso e pi� 
articolato.. ma comunque siamo tutti qui per daci una mano per cui 
scrivi pure ancora!
-- 
byez
Piero

 assolutamente mia intenzione farlo.
A napoli se dice 'a ricotta! :-D
A.


Buona questa......
Grazie per la simpatia dimostratami.

Newsgroup: it.comp.lang.delphi
Titolo: Convertire Pdf a txt

Buongiorno a tutti,
qualcuno di voi sa segnalarmi un componente o una procedura che mi
converta un file pdf a txt?
Grazie mille, 
Dario
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 converta un file pdf a txt?
http://www.torry.net/vcl/vcltools/unitsconversion/pdf2txtocx.zip
<cit.>
PDF to Text software can convert pdf files to text files on the fly 
<fine cit.>
E' a pagamento. Non l'ho mai usato, quindi non posso dare giudizi.
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Dario
Navigando per la rete mi sono ahimè accorto che tutti i
componenti/plug-in
utili alla mia causa sono a pagamento. Ho però trovato un codice
sorgente
che può fare al caso mio e che utilizza gli OLE. Il problema in cui però
sono caduto è che non riesco a creare l'oggetto, mi dice "stringa
errata".
Ho fin'ora utilizzato 2 sintassi 
  App := CreateOLEObject('Acrobat.Application')
oppure 
  App := CreateOLEObject('AcroExch.App')
dove App è una variabile di tipo Variant.
Insomma, sono quelle che ho trovato in giro per il web. Qualche altra
idea
per far girare questi OLE? Io ho Acrobat reader versione 6 se a qualcuno
può interessare...


 dove App è una variabile di tipo Variant.
per curiosità ho voluto provare e questo funzia
uses
  ComObj;
procedure TForm1.FormCreate(Sender: TObject);
var
  I: IDispatch;
begin
  I:= CreateOLEObject('AcroExch.App');
end;
da notare che nel registry del mio computer (regedit) esiste la chiave
 HKEY_CLASSES_ROOT\AcroExch.App
Poi, IDispatch è proprio un'interfaccia base, quindi le cose che ci puoi fare 
sono davvero poche.
Allora ho provato a vedere se sulla mia macchina esistevano delle TLB (Type 
Library) di Acrobat e dal menu Project | Import Type Library ho creato la 
unit dall'elemento (già presente in elenco) "Acrobat 2.0 Type Library" 
corrispondente al file "Accessibility.api".
Ora, con le adeguate dichiarazioni delle interfacce, posso fare molte più 
cose; per esempio
uses
  ComObj, Acrobat_TLB;
procedure TForm1.FormCreate(Sender: TObject);
var
  I: CAcroApp;
begin
  I:= CAcroApp(CreateOLEObject('AcroExch.App'));
  I.Show;
end;
mostra Acrobat.
E così via.
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)


Forse l'OP non ha Acrobat installato ma solo il Reader.
Ciao.
--
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio

 Forse l'OP non ha Acrobat installato ma solo il Reader.
giusto, infatti l'ha anche detto. Per quello ho precisato tutti i passi, cosě 
puň vedere se tra le TLB installate c'č qualcuna che fa il caso suo (dubito, 
ma non si sa mai).


 ma non si sa mai).
Allora mi sa che e' messo male. Da quel poco che so, senza Acrobat si puo'
fare ben poco sui file PDF (sempre se non si sia disposti a pagare per
qualche componente).

Newsgroup: it.comp.lang.delphi
Titolo: Array

Vorrei capire come creare un arrey con due parametri.
Esempio una tavola pitagorica.
Grazie
Andrea

"Andrea Manzo"
| Vorrei capire come creare un arrey con due parametri.
| Esempio una tavola pitagorica.
intendi una matrice?
Matrice: array [1..X, 1..Y] of integer;
per usarla
matrice[x,y] o matrice [x][y]
Ciao,
Alan Solo

Newsgroup: it.comp.lang.delphi
Titolo: quesiti interessanti 2

Porca miseria il mio PC fa le bizze e non credo che l'altro messaggio
sia partito e quindi ve lo roscrivo.
Ho dei quesiti da pirvi.
- Come si fa a creare un collegamento ad un file dentro ad una
cartella scelta da noi? Per creare un file o una cartella no problem
ma per creare un collegamento?
- Come faccio a sapere quando un programma ha finito di lavorare. Per
l'esattezza io da dentro il mio prog. lancio una scompattazione di un
archivio zippato, quindi ho bisogno di sapere quando il winzip ha
finito di lavorare per poi giostrarmi i file.
- Ho avuto degli strani problemi con lo shell execute. Ad esempio dal
mio prog. lancio la calcolatrice di windows (calc.exe), nel mio pc
nessun problema ma in quello del cliente non và. Io non ho capito cosa
può essere, l'unica sostanziale differenza tra i due pc è che nel mio
c'è win98 e nel suo c'è win95; ma pensavo che le API fossero standard
o non è così?
BeH, intanto vi ringrazio e vi saluto, Ciao Gulma ;-))

o non è così?
l'API della shell non è nè standard nè interamente documentata. Evitala
se possibile.
-- 
Posted from 
mx1.aruba.it
 [62.149.128.130] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

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

Salve NG,
ho un problema,come posso visualizzare una serie di immagine da una
TListBox, senza caricare le immagini direttamente sul programma.Ho creato un
Menu di installazione x giochi su un cd,ad ogni nome deve corrispondere
un'immagine,da caricare direttamente dal cd.
Attendo una risposta al + presto.
Grazie posticipati!

> Attendo una risposta al + presto.
E' uno scherzo, vero? ;-))
A.
Newsgroup: it.comp.lang.delphi
Titolo: dove posso trovare la crack di delphi

dove posso trovare la crack di deplhi per levare in numero di giorni
vi ringrazzio

 vi ringrazzio
Come ..zzo scrivi!??!  ;o)

i tuoi genitori non ti hanno educato bene per caso

 wrote in message
news:nLmO8.34442$TS.9...@news1.tin.it...


O capito riformuliamo la domanda in modo adeguata
Esiste un sito dove trovare la crack di delphi

 wrote in message
fQmO8.118840$g04....@tornado.fastwebnet.it...



MA Cerrrrrrrrrto che esiste:
www.crack.delphi.[il numero della versione che vuoi
craccare].
borland.com/alessio.html
"Alessio" <@ .it> ha scritto nel messaggio
news:C_mO8.34512$TS.9...@news1.tin.it...


Potresti postarmi l'indirizzo per il crack del Delphi sei perchè non mi
funziona la modalità che hai inserito.

 mi funziona la modalità che hai inserito.
ROTFL........
--
Jax scusate ma non ho resistito :)))

Bella domanda io ho invece la verisone ufficiale e non
sono mai riuscito a reg. al sito !!! e con indy problemi,
quindi sono rimasto con la versione 4 !!!
Max

Anche riformulata, la domanda contiene comunque errori ortografici!!! che
dislessia in Italia, poveri noi!
- o capito... o soooleee miooo... dov'č la differenza!?
- in modo adeguata... adeguatamente... non mi sembra che cambiassi
qualchosa..
Tanner
"Alessio" <@ .it> ha scritto nel messaggio
news:1_mO8.34508$TS.9...@news1.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: QUERY SQL.

E' possibile fare qualcosa di simile ? :
SELECT DATA,SUM(IMPORTO)
FROM MioArchivio
GROUP BY MONTH(DATA)
Ho provato ma da errore, ma qualcosa di simile.?
Grazie anticipatamente.
Ciao
Davide


Se passi tramite BDE non credo sia possibile direttamente, bde non ti
permette di effettuare delle query raggruppando i dati per
un'espressione.
La cosa migliore, secondo me, consiste nel crearti un campo
supplementare MESE in cui ci scrivi il numero del mese relativo al
campo DATA; questo puoi farlo man mano che scrivi i record oppure in
un'unico blocco con una query del tipo
UPDATE TABELLA SET MESE=EXTRACT(MONTH FROM DATA)
E poi puoi raggruppare la query originaria direttamente per il campo
mese.
Tutto questo per il BDE (paradox) e sicuramente per interbase, altri
db non so se e come supportino la funzionalità.
Phelipe
*-------------------------------*
|     by Phelipe de Sterlich    |
*-------------------------------*
|ELCO Sistemi Gestione del Tempo|
*-------------------------------*
| 
el...@mbox.cyberforli.it
       |
*-------------------------------*

Va bene questo codice :
SELECT MONTH(DATA) MESE,
                SUM(IMPORTO) TOTALE
FROM MioArchivio
GROUP BY MONTH(DATA)
Questo va bene sia per Access che per SQL Server.
Ciao
Solid Snake
Newsgroup: it.comp.lang.delphi
Titolo: Tasti funzione e altro...

Salve a tutti e grazie in anticipo a chi mi darą un aiutino su due
questioni.
1) Qualcuno mi sa indicare se esiste uno standard per assegnare i tasti
funzione alle procedure standard di alcune funzioni? Mi spiego meglio. Le
classiche funzioni Nuovo record, Salva record, Modifica record, Cancella
record ecc... si possono associare mediante ActionList a dei tasti funzione,
ecco qualcuno sa se c'č uno standard di associazione. Tipo il famoso F1 per
l'help?
2) Io ho alcuni applicativi sviluppati con Paradox. Purtroppo mi trovo nella
situazione che se devo aggingere un campo nel DataBase mi tocca andare di
persona o farmi spedire le tabelle per aggiungerlo. Non c'č qualchje utility
che mi permette di aggiungere o modificare il tracciato delle tabelle?
Ancora grazie infinite.
--
Demetrio Battaglia

 Demetrio Battaglia
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.delphi
Titolo: Combo e file

Ciao a tutti,
vorrei chiedervi un consiglio... avrei l'esigenza di caricare facilmente un
database di configurazione da un programma realizzato. Per facilitare la
cosa volevo usare una ComboBox che carichi tutti i file con estensione MDB
presenti nella bath specificata in configurazione. Volevo sapere se ci sono
componenti che permettano di far questo agevolmente, ovvero poter
precaricarsi direttamente i file nell'item della combo (a cui basterebbe
aggiungere un filtro *.BDB).
Grazie per l'eventuale aiuto e per la pazienza.
Uby

presenti nella bath specificata in configurazione. Volevo sapere se ci sono
Premesso che il combo si chiami cmbListaMDB e che tu abbia una TLabel
da qualche parte per indicare lo stato della procedura che si chiama
lblStato, puoi farlo semplicemente da solo:
procedure ScanPath(StartDir: string; SrcSub : boolean);
 var
  sr : TSearchRec;
 begin
  lblStato.Caption := ' Ricerca nel percorso ' + StartDir;
  Application.ProcessMessages;
  if FindFirst(StartDir + '*.*', faDirectory, sr) = 0 then
  begin
   if ((sr.Attr and faDirectory) = faDirectory) and 
       (sr.Name <> '.') and 
       (sr.Name <> '..') then
    if SrcSub then
     ScanPath(StartDir + sr.Name + '\', True);
    while FindNext(sr) = 0 do
     if ((sr.Attr and faDirectory) = faDirectory) and 
         (sr.Name <> '.') and 
         (sr.Name <> '..') then
     if SrcSub then
      ScanPath(StartDir + sr.Name + '\', True);
     FindClose(sr);
    end;
    if FindFirst(StartDir + '\*.mp3', faAnyFile, sr) = 0 then
    begin
     cmbListaMDB.Items.Add(StartDir + '\' + sr.Name);
     while FindNext(sr) = 0 do
     begin
      Application.ProcessMessages;
      cmbListaMDB.Items.Add(StartDir + '\' + sr.Name);
     end;
     FindClose(sr);
   end;
  end;
 end;
Data una directory di partenza (StartDir) e specificato con SrcSub
impostato a true o false se vuoi che venga eseguira una ricorsione
nelle sottodirectory, la procedura ti riempie il combo con tutti i
files mdb che trova.
Il codice non è grabbato, è "autoprodotto". :)
Saluti,
Marco
--------------------------------------------------------------------------------
 t,m,e,e,t,@,h,o,t,m,a,i,l,.,c,o,m,
 Togliete le virgole per rispondere in email.
--------------------------------------------------------------------------------
Newsgroup: it.comp.lang.delphi
Titolo: Una edit su report?

Ciao a tutta la news... Volevo sapere se era possibile portare su di un
report  il contenuto (string/text) di controlli presenti su una form. E se è
possibile in linea di massima come si fa? Scusate se ho scritto una
cavolata... Ringrazio anticipatemente tutti coloro che mi aiuteranno e porgo
un caloroso abbraccio a tutta la news.

i vechi post del ng accessibili tramite google contengono una miriade di 
post sul come stampare un po di tutto:
contenuto di una dbgrid
contenuto di un memo
..
hai gia provato a vedere se li trovi qualcosa di utile?
A

Grazie mille proverň anche se vorrei passare tutto al report e non stampare
direttamente.

 ha scritto nel messaggio
news:p7Z7c.112740$O31.4...@news4.tin.it...

E' un pò difficile se non specifichi quale versione di Delphi e quale
generatore di report ....
Comunque,per darti un'idea, utilizzando (D4..D7) e Fuzzy Report
http://www.fuzzyreport.org/
**************************************** begin code ***********************
Nelle uses metto FR_Class
Dichiaro una variabile
var
   M: TfrView;
begin
Report:=TReport.create(application); // una form con un componente report
fuzzy di nome "repo" ( che fantasia !)
Report.repo.Title:='Test';
try
   Report.repo.LoadFromFile('MioReport.frf'); // carico un report già
disegnato
   M := Report.Repo.ObjectByName('titolo');  //************ nel report ho un
campo rettangolo con il nome "titolo"
   M.Caption := edit1.text; // ci scrivo il contenuto dell'edit
   Report.repo.ShowReport;
finally
   Report.free;
   Report:=nil;
end;
********************************* end code
**************************************************
Un altro modo è quello di generare "dinamicamente" un oggetto dentro il
report, leggermente più complicato.
Giulio

Grazie mille per le risposte. Ma ho risolto così... Associo setto le
proprietà caption dei componenti QRLABEL alle proprietà text dei rispettivi
controlli da stampare così ho il Report impostato come voglio io. Basta
scrivere tutto nell'evento OnNeedData del QuickRep. Grazie mille...
Nell'italia delle teorie ci stiamo teorizzando anche noi :-).
Newsgroup: it.comp.lang.delphi
Titolo: Trasferimento files tra PCs (forse un po' lunghetto)

Buondģ, buone ferie a chi sta per.. ed un "ben tornato" a chi ha ripreso le
sue attivitą quotidiane.
Ho una domandina... "facile facile":
La situazione:
- D5Ent;
- 3 Pc che chiamerņ Pc1, Pc2 e Pc3;
- Pc1 e Pc2 sono in rete tcp/ip;
- Pc3 č da ...contattare telefonicamente (si trova nell'ufficio sopra il
mio, ma il cond non consente il passaggio del cavetto);
- Pc1 = W98SE;
- Pc2 = W2k;
- Pc3 = W95;
Il problema:
Trasferire con un prg, del tipo «struca un botton», tutti i file contenuti
in una cartella conosciuta di un PC, all'interno di un'altra cartella "da
conoscere" contenuta in un altro PC;
Soluzioni:
- Trasferimento Pc1 <-> Pc2 risolto e direi abbastanza semplicemente usando
un TNMMsg ed un TNMMsgServ di FastNet per lo scambio delle info relative
alla cartella sulla quale si starebbe operando ed un paio di funzioncine di
Win per copiare i files; (funge)
- Trasferimento Pc1/Pc2 <-> Pc3 mi dą qualche cruccio (leggi: Non parte il
prg su W95) gią nella comunicazione delle info (l'ho messo in rete per le
prove, prima di lavorarci su per la connessione remota).
Sono tutto orecchie su consigli, componenti, documentazione, approcci
differenti nella soluzione.
Grazie in anticipo a chiunque vorrą dedicarmi, nella umida calura, un po'
del suo tempo.
Francesco.

prove, prima di lavorarci su per la connessione remota).
Non parte.... Cioè?
Scusatemi, ma è cosi difficile essere + chiari nello spiegare i problemi?
In questo modo perdiamo TUTTI tempo prezioso.
Tra parentesi, mai pensato a un collegamento wireless?
Qualcosa di mamma 3com esiste x questa tecnologia, se non vado errato.
BaiBai
A.

 Tra parentesi, mai pensato a un collegamento wireless?
E' stata la prima cosa a cui ho pensato, visto che si va ancora con una
"retina" base 10, ma dall'alto non č stato dato il placet, anzi mi si č data
una certa fretta per il sw.

controlla la versione di WinSock.*
Puo darsi che Winsozz95 non supporti la versione minima richiesta di
Winsock.* per il funzionamento dei componenti che stai usando.
BaiBai
A.

 Winsock.* per il funzionamento dei componenti che stai usando.
...ho appena scaricato l'upgrade di Winsock2 x W95. Ora lo provo.
Grazie. ;-)
Francesco.