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

ciao a tutti
(D.version D6)
Ho un componente
TrivialFTPServer sulla form :
DefaultPort:=21;
Active:=true;
.. faccio una scansione sulla porta 21 con un portscanner ma la 21 risulta
libera difatti non riesco a connettermi nemmeno con il client (neanche al
demo indy sulla 69)
questa cosa non la capisco.
conoscete un componente ServerFtp di facile utilizzo?
grazie
erik

 ha scritto nel messaggio
news:Zn1_a.41153$an6.1...@news1.tin.it...


 Hai un firewall?
azz lo vedo solo ora il messaggio.
No,nessun Firewall
ciao
erik
Newsgroup: it.comp.lang.delphi
Titolo: Comandi windows

Salve ragazzi, sono uno nuovo ed un pò inesperto. Mi chiedevo se esisteva
una procedura di delphi che chiuda windows (inteso come sistema operativo).
Vi spiego meglio cosa stò facendo; sto scrivendo un programma che verifica
una password all'avvio di windows, e voglio che al terzo tentativo di
immissione errata, il programma in delphi chiuda o riavvii windows, come
posso fare ?
Ringrazio in anticipo tutti coloro che vorranno aiutarmi.
Ciao

Ciao,

per chiudere Windows, devi utilizzare l'api "ExitWindowsEx".
Prova ad utilizzarla guardando l'help Win32 Sdk.....ora devo scappare. Se
hai problemi scrivi ancora.
Ciaoooo !!!!
Antonio Tarolla

 posso fare ?
Devi chiamare la funzione API : ExitWindowsEx (guarda l'help per maggiori
info).
ciao
Solid Snake

 posso fare ?
Eheheh... attento ai crack !!
Cmq.... guarda la funzione api :  ExitWindowsEx
Ciao!  Davide DG


Ho provato a fare come mi hai detto, scrivendo:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if (MaskEdit1.Text='xam80') then Application.Terminate
 else Windows.ExitWindowsEx(?,?);
end;
Però non sò cosa mettere come vaolri tra parentesi, ho provato ha mettere
due valori a caso come (0 , 0) ma non succede niente.
Inoltre volevo porti un 'altro quesito. Il mio programma viene lanciato
all'avvio di Windows 98, dopo che ho modificato il registro di windows.
Nonostante il mio programma sia il primo task lanciato, windows continua a
eseguire tutti i task che vengono dopo il mio.
Come posso fare per far capire a windows di aspettare l'esecuzione del mio
programma, che termina con il giusto inserimento della password, per far
partire tutti gli altri ?
Ti ringrazio per l'aiuto....Ciao
Max

 due valori a caso come (0 , 0) ma non succede niente.
Guarda l'help, comunque a me funziona con
exitwindowsex(EWX_shutdown,a);
il parametro a è riservato e come indicato dall'help viene ignorato.
Esistono anche altri comandi EWX_ ne trovi una lista sempre nell'help on
line.
END.
Ahem, olevo dire ciao!
Newsgroup: it.comp.lang.delphi
Titolo: Decodificare .qrp

Salve, utilizzo Delphi6, salvo dei QReport in file .qrp e vorrei poi
riuscire a rileggerli magari codificandoli in un file di lettura
standard(.doc, .pdf, .txt, ecc...).
Qualcuno sa come fare ho ha mai utilizzato la tecnica? Premetto che sono
un neofita di delphi
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

da neofita, il primo suggerimento è una ricerca sui vecchi post di questo ng
tramite google.
Questo argomento è stato già trattato in passato.
Bye
A

 A


 un neofita di delphi
guarda 
www.wptools.com
 (ci sono un altro paio di produttori di filtri per
esportare in pdf, ma non mi ricordo gli indirizzi);  il lavoro di
conversione deve essere fatto PRIMA di salvare (perchč vuoi farlo dopo
aver salvato il report in un file ?).
Ciao
Marco


 conversione deve essere fatto PRIMA di salvare (perchè vuoi farlo dopo


 conversione deve essere fatto PRIMA di salvare (perchè vuoi farlo dopo


 Buona giornata a tutti
Se ti interessa esportare in formato testo mi pare che il quickreport
abbia già di suo un filtro di quel tipo (guarda nell'help fornito con
Delphi)

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 2006 e supporto .NET

Ciao, qualcuno mi sapreppe dire se il Delphi 2006 supporta .NET 2.0 o solo 
.NET 1.1 ?
Grazie 

Ciao a tutti, qualcuno mi saprebbe dire se Delphi 2006 supporta .NET 2.0 o 
solo .NET 1.1 ?
Grazie in anticipo 

 .NET 1.1 ?
Solo .NET 1.1. al momento (il supporto a .NET 2.0 per tutte le librerie 
annesse e connesse al framework, 
VCL.NET
, ECO, 
ASP.NET
, WinForms sarà 
introdotto nella prossima versione).
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 
Sai quando avverrà?
Ciao

 Sai quando avverrà?
Si suppone nei primi mesi del 2007, secondo la "roadmap ufficiale" 
pubblicata qui: 
http://bdn.borland.com/article/33519
.

Newsgroup: it.comp.lang.delphi
Titolo: Problema di installazione di Delphi 7

Salve a tutti, sono un principiante del Delphi. Mi è stato consegnato un 
cd di Delphi 7A ed ho un problema al momento dell'installazione: "Error 
1305. Error reading from file \install\program 
files\Borland\Delphi7\Help\d7indy.hlp Verify that the file exists and 
that you can access it" Se l'inglese non mi tradisce significa che 
codesto file non viene letto, ma andando ad esplorare la cartella in 
questione da cd, il file lo vedo e se faccio doppio click si riesce 
anche ad accederci. Provo a fare RETRY ma dopo un po' di installazione 
ricompare l'errore. Qualcuno ha idea di come risolvere tale problema? Vi 
ringrazio per l'attenzione.

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

 buon funzionamento dell'ide.
L'ho fatto! Ma quando la barra di installazione arriva alla fine, il cd 
continua a girare e ogni tanto mi salta fuori la suddetta finestrella 
d'errore. Ci sono due opzioni, RETRY che ritenta di leggere il file e 
CANCEL che se premuto mi chiede se voglio abortire l'installazione e 
cliccando su YES non installa piů niente; invece NO mi ripropone ancora 
di riprovare a rileggere il file mancante.

Se mi spedisci in privato (
mari...@inwind.it
) un tuo indirizzo fisico ti
mando una copia del mio CD.
Forse il tuo è danneggiato.
Ciao
Mario
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Il Thu, 30 Dec 2004 16:17:48 +0000, Da Man ha scritto:
semplicemente prova a copiare tutti i file del cd su di una cartella sul
tuo hard disk, e lancia il setup da li!
ciao f
-- 
====================================
Coltiva linux, che tanto windows si pianta da solo!
Linux registered user: 364664 (
http://counter.li.org
)

 ciao f
Ringrazio tutti voi, ho risolto i problemi!
Newsgroup: it.comp.lang.delphi
Titolo: Test: informazioni sistema operativo

Salve a tutti, avrei bisogno di un favore: ho scritto questa procedura per
ottenere più informazioni possibili sul sistema operativo in uso, e vorrei
vedere se funziona, quindi vi chiedo di provarla e di farmi sapere se risponde
correttamente oppure che errori restituisce. Ogni altro consiglio è ben
accetto!!
Grazie
Procedure FGetVersionEx1;
var
  OS: TOSVersionInfo;
begin
  with OS do
  begin
    dwOSVersionInfoSize := SizeOf(TOSVersionInfo);
    GetVersionEx(OS);
    case dwPlatformId of
      VER_PLATFORM_WIN32s:        edit1.text:= 'Win32s on Windows 3.1x';
      VER_PLATFORM_WIN32_WINDOWS:
      case dwMajorVersion of
        4: case dwMinorVersion of
             0: if szCSDVersion = 'B' then
                  edit1.text := 'Windows 95 OSR2'
                else
                  edit1.text := 'Windows 95';
             10: if szCSDVersion = 'A' then
                   edit1.text := 'Windows 98 SE'
                 else
                   edit1.text := 'Windows 98';
           else
             edit1.text := 'Unknown';
           end;
        5: edit1.text := 'Windows ME';
      else
        edit1.text := 'Unknown';
      end;
      VER_PLATFORM_WIN32_NT:
      case dwMajorVersion of
        3: edit1.text := 'Windows NT 3';
        4: edit1.text := 'Windows NT 4';
        5: edit1.text := 'Windows 2000';
      else
        edit1.text := 'Unknown';
      end;
    else
      edit1.text:= 'Unknow';
    end;
    edit2.text:=inttostr(dwMajorVersion);
    edit3.text:=inttostr(dwMinorVersion);
    edit4.text:=inttostr(dwBuildNumber and $FFFF); file://low order
    edit5.text:=szCSDVersion;
  end;
end;

Ho provato, ma non riconosce il millenium, mi dice che e' sconosciuto.
il valore "os.dwMinorVersion" viene impostato a 90 e "os.dwMajorVersion"
viene impostato a 4.
ciao
Newsgroup: it.comp.lang.delphi
Titolo: da Try a Except

Esiste un comando in Delphi perchè il mio flusso passi nell'Except di un
Try? Fin'ora ho sempre creato io un errore apposito (tipo un
strtoint('a') ), mi chiedevo se esistesse qualcosa di più specifico.
Mi spiego meglio con un esempio:
Try
  <..>
  if a > 0 then
    strtoint('a');  // questo causa il crash che mi porta nell'except
  else begin
    <..>
  end;
Except
  Result := False;
End;
Grazie mille,
Saluti
Dario
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


abort

 strtoint('a') ), mi chiedevo se esistesse qualcosa di più specifico.
Raise Exception ?
Ciao, Vittorio

 strtoint('a') ), mi chiedevo se esistesse qualcosa di più specifico.
Non mi sembra una soluzione molto pulita. Il costrutto *try...except* 
serve a gestire eccezioni, pertanto dovrebbe essere riservato a 
quell'utilizzo; per controllare il flusso di esecuzione della tua 
applicazione ci sono altri costrutti da utilizzare, senza ricorrere a 
queste "pratiche incerte" che, a mio avviso, portano più danni che 
benefici e potrebbero tranquillamente essere evitate o segnalare una 
parte di codice che probabilmente deve essere ripensata.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Inviato da X-Privat.Org - Registrazione gratuita 
http://www.x-privat.org/join.php

 strtoint('a') ), mi chiedevo se esistesse qualcosa di piů specifico.
Hai provato a dare un'occhiata al costrutto try...finally?
-- 
Lis                   
www.alessandroghezzi.it
Angolo del buonumore  
www.alessandroghezzi.it/ridere
O'Telma Formula 1     
www.snurl.com/otelma
Tutti sanno che una cosa č impossibile da realizzare, finché arriva uno
sprovveduto che non lo sa e la inventa (A.Einstein)

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

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

Salve ragazzi sto creando un applicazione client/server/client
utilizzando come componenti TCustomWinSocket. Se alla componente server
voglio far connettere piu client su porte diverse come faccio ad
indicargli la porta?
Dopodiche dovrei deviare il flusso che un client C1 invia su una porta
P1 in ingresso su un l'altra porta P2 su cui è connesso l'altro client
C2.
Dato che nn conosco molto le TCustomWinSocket qualcuno sa darmi qualche
consiglio?
Grazie

 consiglio?
E dire che ti avevo scritto l'applicazione completa...

Lo so, infatti quella funziona, grazie
Ora ne devo realizzare un altra con questi componenti!!
Newsgroup: it.comp.lang.delphi
Titolo: [D5] TToolButton ripetere Click se tenuto premuto

Salve,
   in Delphi 5, come devo fare per far si che se premo e tengo premuto 
un TToolButton venga ripetutamente eseguito il suo metodo Click?
Grazie, ciao.

Luigi Siciliano ha scritto:

Soluzione "Casereccia", ma funzionale
- nell'evento onMouseDown del ToolButton fai partire un timer nel cui 
evento OnTimer richiama l'evento Onclick (se assegnato) del ToolButton, 
e nell'eevento onMouseUp fermi il timer.
Altre ...
-Guardi nei soliti siti se qualche anima pia ha fatto un toolbutton che 
fa al caso tuo
-Ti derivi il toolbutton e ti scrivi cio' che ti serve
Altre soluzioni ... al momento non mi sovvengono :)
^_Goblin_^
-- 
Ibis et redibis non morieris in bello
http://goblinland.myminicity.com/

 -Ti derivi il toolbutton e ti scrivi cio' che ti serve
E' proprio quello che non ho capito come fare, l'evento OnMouseDown che 
pensavo fosse il piï¿œ appropriato (anche leggendo il corrispondente 
evento del TDBNavigator) non sembra essere quello giusto.
Grazie, ciao.

 A me serve simulare un TDBNavigator.
... Non credo che tu abbia letto bene il mio post precedente ... :(


 
Ti chiedo scusa per non aver risposto che con il timer potrebbe 
funzionare ma ritengo che non sia la strada giusta per via delle risorse 
che viene ad occupare il timer.
Ciao.

 Ciao.
mmm....
hai per caso guardato come fa il TDBNavigator ??
Ebbene si ... Usa un timer che si crea e distrugge alla bisogna :)
Alla luce della "mia" scoperta, confermo il mio primo post, e lo 
rafforzo con un piccolo esempio di pseudo codice
var x:Integer;
Procedure create
begin
   x:=0
   oTimer := TTimer.Create;
   oTimer.onTimer := Timer;
   oTimer.interval := 50; //dovrebbe andar bene
end
procedure close
begin
   oTimer.Free;
end;
procedure Timer
begin
//chiamata al click del bottone
   buttonclick
end
procedure buttonClick
begin
   inc(x);
   caption := IntToStr(x);
end
Procedure OnMuoseDown
begin
   oTimer.enabled := true;
end;
Procedure OnMuoseUp
begin
   oTimer.enabled := False;
end;
Da quello che mi sembra di aver capito è la stessa logica del Navigator


 
In effetti, dopo averti risposto ho cercato meglio nel codice del 
TDBNavigator e, con mia meraviglia, ho scoperto che usa il TTimer :(
Ho quindi utilizzato lo stesso approccio.
Grazie ancora e non volermene :)
Ciao.

Newsgroup: it.comp.lang.delphi
Titolo: mysql help

In locale mi si connette... invece da remoto mi continua a dare 
user/password errata...
Ho provato creare un utente in mysql con il % nel campo host ma non 
funzia ugualmente.
Cosa posso fare?

Aragorn wrote:
<cut>
mi son dimenticato di dire che uso i componenti dbExpress...
Newsgroup: it.comp.lang.delphi
Titolo: Impedire spazio EDIT

Ciao a tutti, in una dbedit vorrei impedire che si potesse digitare lo 
spazio, come posso fare? Grazie 1000
-- 
Lorenzo Mendini Iz2FOS
http://www.polopositivo.org
 (Home Page) 

in molti vecchi post si parla di inibire alcuni caratteri oppure di
gestire la pressione del tatso invio come se fosse il tab per andare al
controllo successivo.
Vedi anche nelle faq
AS

 
hai due possibilita'
1) Intercetti l'evento ON_KEY_DOWN e lo gestisci a tuo piacimento nel 
caso venga digitato uno spazio
2) utilizzi un TMaskEdit
-Jeffo
-
www.milkeyway.net

 spazio, come posso fare?
OnKeyDown e fai una if dove se il codice chr è quello dello spazio, 32,
allora then key=0;
ciao!
-- 
Morde. 
ICLDweb: 
http://www2.samatel.com/icld/

ciao io ho fatto il seguente "codice" sull onkeydown della mia dbedit :
if Key=32 then
     Key:=0;
ma non funziona infatti lo spazio si continua a fare.... grazie 1000 ciao 
ciao 

spazio, come posso fare?
Posso chiederti perché?

semplicemente per evitare che gli utenti scrivano i dati in modo errato 

semplicemente per evitare che gli utenti scrivano i dati in modo errato 
E tu faglieli scrivere.  Controllerai dopo se sono corretti o meno.

 ha scritto nel messaggio
news:43cfe893$0$1064$4faf...@reader2.news.tin.it...

Con edit funziona, prova potrebbe andare anche con DBedit.
se funziona, puoi inibire altri caratteri, esempio [0..9]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if  Key in [Chr(32)] then
  Key:=#0;
end;
Carmine

end;
Personalmente, consiglio di lasciare che l'utente inserisca tutte le
porcate che vuole e, solo dopo, controllare la correttezza delle
informazioni.  E' difatti possibile che un'utente faccia un
bell'incolla di una stringa con tanto di spazi, nel TEdit, ed ecco che
tutti i bei controlli di prima vanno a farsi benedire.

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

Come faccio quando devo scrivere dentro un campo Edit una Psw fa r comparire
gli * al posto delle Lettere?
Grazie
Paolo


Imposti il carattere * al posto del carattere #0 nella proprieta'
PasswordChar del tuo Edit! :)
HTH
 Marco
Newsgroup: it.comp.lang.delphi
Titolo: [D7] Stampa direttamente su stampante predefinita ...

Ciao a tutti,
magari sto' chiedendo una banalita' pero' ... non risco proprio :-)
ho necessita' di stampare un file PDF (Acrobat) direttamente sulla stampante
predefinita
in background.
Potete indicarmi come fare ?
Grazie mille
Filippo
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Usi ShellExecute(Handle, 'print', PChar('c:\pdf.pdf'), nil, nil, SW_SHOW)
Leggi l'help per maggiori informazioni riguardo i vari parametri dell'API
Ciao
ACSH
-- 
If you don't think carefully, you might think that programming is
just typing statements in a programming language.
(Ward Cunningham)

 (Ward Cunningham)
ma dove c@@@o le prendi 'ste frasi, diverse ogni volta? :-))
Questa andrebbe incisa sul marmo con lettere di bronzo...
A.

Alberto Salvati ha scritto:


Qui:
http://sysprog.net/quotlang.html
oppure qui:
http://it.wikiquote.org/wiki/Informatica
Una delle mie preferite e'
First learn computer science and all the theory. Next develop a
programming style. Then forget all that and just hack. (George Carrette)
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Newsgroup: it.comp.lang.delphi
Titolo: master/detail - Metodo corretto inserimento?

ho 2 tabelle (access) master e details collegate da un IDordine, 
autoincrementante nella master e numerico nella detail.
Se inserisco un nuovo record nella *master* ma non faccio
il post, e inserisco nuovi record nella *detail*, l'IDOrdine è indefinito 
(vuoto).
In sostanza vorrei sapere quale è la procedura corretta per gestire, ad 
esempio
una tabella ORDINI(master) e DETTAGLI(details), il momento in cui l'utente
inserisce il nuovo ordine (insert senza post), comincia a inserire i 
dettagli (insert e post, n volte)
 e poi ci ripensa cancellando l'operazione e quindi l'ordine...
Devo per forza fare il post della tabella master?
Nella mia maschera ci sono DBEdit collegati alla tabella master(Ordini) ed 
una dbgridcollegata alla tabella details.
Il risultato e' che nella tabella principale è tutto corretto ma nella 
details ho
alcuni dettagli senza IDOrdine...
Spero di essermi spiegato bene...
miyomo 

 alcuni dettagli senza IDOrdine...
In questo modo risolvi:))
poi se usi altre tecniche di acceso dati faccelo sapere.. suppongo tu
utilizzi ADO ma personalmente anche in quel
caso utilizzo i CDS.
ciao
  gabriele
Newsgroup: it.comp.lang.delphi
Titolo: delphi e componenti xml

ciao, dovendo ri-fare una procedura che esporta un file xml, che componenti
mi consigliate??? nell'attuale versione l'xml lo genero a mano!!!
Simone

E' cosi difficile riportare la versione dei delphi nei post?
Magari mettendola nella intestazione?
E non si puo certo dire che questa cosa non sia stata fatta presente + volte
in questo ng, a volte anche + volte nella stessa giornata.
Idemo dicasi per db, tecnologie di accesso ai dati, codici e messaggi di
errore, versioni e sp di winsozz.....
E ogni volta tocca aspettare che qualcuno faccia le solite domande
necessarie per inquadrare la situazione.
Aiutateci ad aiutarvi.
A
--
Per rispondere non usare il reply ma scrivere al seguente indirizzo:
alsalvati(at)
supereva.it

 ha scritto nel messaggio
news:bk6h31$ic$1...@newsreader1.mclink.it...


Tab Internet -> XMLDocument

Lo hai passato l'Update Pack 2?
Per il Web buona parte delle cose sono state inserite con quello.

Newsgroup: it.comp.lang.delphi
Titolo: WEB APPLICATION SERVER

Qualcuno mi sa dire come si fa a migrare un progetto da  web debugger
a isapi, sulla porta   http//localhost:1024/.... tutto funziona ma per
portare il progetto a ISAPI e pubblicarlo in  inetpub/scripts..  come
si fa?
grazie a tutti Rox

 grazie a tutti Rox
Ciao
Andrea

 Cannot debug project unless a host application is defined. use Run|parameters
  dialog box
                              OK 
---------------------------------------------------------------------------
ho spostato comunque la dll in inetpub/scripts/   ma richiamandola con
 
localhost/scripts/mia.dll   
non funziona
Sicuramente sono io lo stordito ma dove sbaglio ?  help me grazie
Newsgroup: it.comp.lang.delphi
Titolo: D6: impressioni?

Qualcuno ci sta gia' lavorando seriamente? Che impressioni ne avete tratto,
in particolare come stabilita', bug, valocita', dimensione exe, ecc.?
Io ho completato ieri la collezioni di tutti i miei componenti aggiuntivi in
versione D6, installati e ho fatto il porting di un grosso progetto che
attualmente gira sotto D4. Tempo necessario per il porting: 10 minuti. Si e'
trattato di cambiare i nomi di alcune unit di sistema, aggiungerne altri,
ecc. ma niente di particolare. La cosa curiosa e' che il rebuild globale del
progetto, che sotto D4 contava 250.000 linee circa, qua arriva a malapena a
160.000. Il tempo del rebuild infatti e' molto meno. Mi sembra migliorata
anche la velocita' di avvio del programma compilato dall'IDE. L'eseguibile
in compenso e' salito di 300 Kb abbondanti (circa 6 mega contro i 5,6
dell'analoga versione in D4).
Che si dice in casa Borland quanto a prestazioni, velocita' del compilatore
ecc.?
Ciao, Sandro

160.000. 
In che senso?
Chris

dell'analoga versione in D4).
Premesso che arrivo da D4: mi sembra in genere leggermente piu'
veloce, nulla di piu'. 
Ho avuto alcuni errori di protezione (non per colpa mia eheheh,
aprendo e chiudendo degli esempi).
Una cosa che mi ha fatto in@@@@re è il fatto che manca, per loro
ammissione, molta documentazione che hanno promesso verrà rilasciata a
tempo debito (ad esempio WebSnap).
Ho fatto pochissimo porting, solo un po' di utility, e ho avuto pochi
problemi:
1) nuove unti che prima non esistevano (come Variants,dcu)
2) Una serie di warning su codice non portabile in CLX. 
per esempio nelle DLL nella dichiarazione di export ho dovuto
sostituire gli index con name.
es:
exports 
  InitializeProc Index 2;
mi da un werning e devo fare
  initializeproc name 'initializeprc'
La cosa piu' fastidiosa, pero', è stato l'allineamento dei record:
ho alcune DLL che passano delle strutture che, con delphi  6 hanno un
SizeOf diverso. Ho dovuto usare {$A-} in quanto di default non sono
piu' packed.
Ciao,
Massimo.
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"

Newsgroup: it.comp.lang.delphi
Titolo: D7pro ftp

Buongiorno a tutti.
idftp1.Put('C:\volume1\test\rpc.py');
premetto che:
Ho i diritti per trasferire il file
ho già fatto un change dir per spostarmi sulla dir
l'errore è:
Socket error #10061 connection refused
Visto che dalla doc di delphi non ho capito volevo sapere anche
l'istruzione su come scaricare un file via FTP
sono davvero nella m****
Grazie a tutti in anticipo
--
pbonfanti2@*NOSPAM*
inwind.it
Togliere dall'indirizzo *NOSPAM*

 l'istruzione su come scaricare un file via FTP
ifdtp1.get(NomeFileSuServer,NomeFileLocale)
Giulio

 Giulio
ciao e grazie

Newsgroup: it.comp.lang.delphi
Titolo: Rave report..

Qualcuno usa rave report?
Ho 2 problemi:
1- Come si settano i margini della pagina? Sara' banale ma non lo trovo..
2- Le Anchor non funzionano :-(
   Come posso fare in modo ad esempio che una region sia sempre larga come 
la pagina???
-- 
maz

in molti hanno tozzato con rave.
Se cerchi bene trovi un po di th relativi a questo tool di
reportistica.
Personalmente non l'ho usato, ma visto il tono dei vari msg, credo che
non lo userei...
Pax vobiscum
A.
Newsgroup: it.comp.lang.delphi
Titolo: Informazione: Gestire grossi database.

Salve, 
per gestire un grosso database con un numero di record di 500.000
-1.000.000 di record formati ognuno da 10-20 campi cosa mi consigliate
di usare il formato DBase o Paradox?
Grazie in anticipo.
Robin

 wrote

se proprio devi scegliere tra i due, credo che Paradox sia decisamente
migliore.
Perň vista la grande mole di dati, ti suggerirei di approdare su qualcosa di
piů serio. Insomma il BDE lo lascierei da parte e visto che Interbase č
diventato freeware, ci farei un pensierino anche perchč non so come dovrai
trattare questi dati, ma iniziare bene significa molto probabilmente
continuare bene !!!
Ti saluto....buona scelta.
Ciaoo !!
Antonio Tarolla





Passa ad interbase.
Con quella mole di dati i dbf ed i db diventano pesanti.
Saluti
AS
"Se è Microsoft non funziona"

 di usare il formato DBase o Paradox?
Nè l'uno, nè l'altro.
I Databases basati su files non sono adatti a gestire questi volumi di dati.
Usa Interbase 6, non te ne pentirai.. ;)
Ciao,
-=SIMO=-

> di usare il formato DBase o Paradox?
senza nulla togliere a Interbase, per gestire un grosso DB di
2.500.000 record utilizzo felicemente il formato DBF con il prodotto
CodeBase.
Un mio conoscente con lo stesso sistema gestisce >8M record.
Per avere un'idea delle capacita' del prodotto, CodeBase puo'
indicizzare >9.000 record al secondo.
Ciao
Duilio

 indicizzare >9.000 record al secondo.
Quanti utenti ? :)
Ciao,
-=SIMO=-

>Quanti utenti ? :)
5
Tutte le informazioni su 
www.sequiter.com
.
Da qui puoi anche scaricare un demo.
Io lo uso dai tempi del DOS e posso raccomandare il prodotto per la
velocita' e l'affidabilita'.
Ho sempre pensato di provare Interbase un giorno o l'altro (credo che
sia un ottimo prodotto), ma il tempo non c'e' mai e preferisco
sfruttare l'esperienza gia' acquisita con i DBF.
BTW per piccole procedure uso Apollo, MOLTO piu' lento di CodeBase e
molto meno affidabile, ma piu' facile da usare.
Ciao
Duilio
Newsgroup: it.comp.lang.delphi
Titolo: Leggere una directory

Salve a tutti,
esiste un modo semplice per leggere il contenuto di una directory
senza usare componenti visuali quali TFileListBox?
Nel vecchio TP4 mi pare ci fosse una funzione che restituiva una
matrice di stringhe, ma potrei anche sbagliarmi.
Niente del genere?
Bye.
- Mariano.-

 senza usare componenti visuali quali TFileListBox?
Puoi usare (anche ricorsivamente) FindFirst/FindNext/FindClose ... se non
sbaglio qualcuno (mi pare Laforgia, ma potrei sbagliare) ha postato pure un
esempio di utilizzo.
Ciao!
--
- Carlo -
c.b...@libero.it

Niente del genere?
program GetDirInfo ;
{Andrea Laforgia 09/11/2000}
{$APPTYPE CONSOLE}
uses Classes, SysUtils ;
type TDirectoryInfo = record
                        Location : String ;
                        NumFiles : Integer ;
                        Size     : Integer ;
                      end ;
procedure GetFolderInfo( Folder : string ;
                         RecursiveScanning : boolean ;
                         var di : TDirectoryInfo ) ;
    procedure ScanFolder( Root : string ;
                          Level : integer ) ;
    var SI : TSearchRec ;
        Error : integer ;
    begin
      ChDir( Root ) ;
      Error := FindFirst( '*.*', faAnyFile, SI ) ;
      while ( Error = 0 ) do
      begin
        if ( SI.Name[1] <> '.' ) then
        begin
          if ( RecursiveScanning and
             ( ( SI.Attr and faDirectory ) <> 0 ) ) then
          ScanFolder( SI.Name, Level + 1 )
          else
          begin
            Inc( di.NumFiles ) ;
            Inc( di.Size, SI.Size ) ;
          end ;
        end ;
        Error := FindNext( SI ) ;
      end ;
      FindClose( SI )  ;
      if ( Level > 0 ) then
        ChDir( '..' ) ;
    end ;
begin
  di.Location := ExpandFileName( Folder ) ;
  di.NumFiles := 0 ;
  di.Size := 0 ;
  ScanFolder( Folder, 0 ) ;
end ;
var MyDirInfo : TDirectoryInfo ;
begin
  GetFolderInfo( 'c:\backupDati\cts', true, MyDirInfo ) ;
  WriteLn( 'Numero file contenuti in ''' +
           MyDirInfo.Location + ''' : ' + 
           IntToStr( MyDirInfo.NumFiles ) ) ;
  WriteLn( 'Misura (byte) : ', MyDirInfo.Size ) ;
  ReadLn ;
end.
--
Andrea Laforgia (ICQ 87230455)
"A C program's trick is sometimes a C++ program's trap"
                                          [S.B.Lippman]

Newsgroup: it.comp.lang.delphi
Titolo: dove posso trovare un manuale di delphi in rete????

dove posso trovare un manuale di delphi in rete???? vi prego aiutatemi!!!!!

 dove posso trovare un manuale di delphi in rete???? vi prego
aiutatemi!!!!!
http://www.kaposnet.hu/books/tysdelphi4/
Newsgroup: it.comp.lang.delphi
Titolo: Debugger Exeption notification aiutooo

Ciao a tutti
č da alcuni giorni che non riesco a togliere questo errore !!!
Uso un database Access con ADO .... nell'evento Afterpost riedito un campo
per aggiornarlo come segue :
procedure TDM.ADOTCommAfterPost(DataSet: TDataSet);
var c1:TDataSetNotifyEvent;
begin
If not editcomm then
   begin
   with AdoTComm do
        begin
        c1:=Afterpost;
        Afterpost:=nil;
        edit;
Fieldbyname('Numero').Asstring:=datetimetostr(yearof(fieldbyname('DataNewEnt
ry').AsDateTime));
        post;
        Afterpost:=c1;
        end;
   end;
end;
ed Ecco l'errore "Debugger Ex... notif..." Impossibile individuare la riga
specificata per l'aggiornamento.
La cosa che mi fa piů rabbia č che lo stesso codice messo in una nuova
applicazione per provare solo il database funziona. quindi non capisco
veramente cosa il mio programma faccia per creare quell'eccezione.
grazie

xche complicarsi la vita?
Non puoi usare l'evento OnBeforePost?
Come fai tu:
1) fai l'edit di un recordů
2) lo salvi
3) lo rimetti in stato di edit
4) lo aggiorni
5) lo risalvi
procedure TDM.ADOTCommBEFOREPost(DataSet: TDataSet);
begin
Dataset.Fieldbyname('Numero').Asstring := ...
end;
Bye
A


Ti darei completamente ragione visto che editare salvare aggiornare
risalvare non è proprio la cosa più pulita da fare... il problema in verità
è che il valore che dovrà prenere il  campo "Numero" è dato anche dal campo
ID che è un contatore del db access e che si aggiorna solo dopo l'evento
afterpost
Stefano

sorry!
Bye
A.

specificata per l'aggiornamento.
l'unica cosa che ti posso consigliare e di rivedere MOLTO
minuziosamente se ci sono altre Action o procedure 
che entrano in concorrenza con l'afterPost
Lo dico perchč NON č sempre vero che 
l'esecuzione delle varie azioni e procedure č
sequenziale, questo anche perchč se vedi 
il taskManager di Win ti accorgi che la tua applicazione
alle volte ha piů di un thread ...
quindi occhio ad altri possibili interventi sul DB
	Ciao
	MassimoB

Newsgroup: it.comp.lang.delphi
Titolo: condizione where

 With Query1 do
 begin
  SQL.Clear;
   sql.add('UPDATE Tanagrafe SET reparto = null WHERE IDospite = idospite');
  ExecSQL;
Nel codice di cui sopra dovrei pero' al posto di scrivere WHERE IDOspite =
idospite
fare riferimento invece al valore di un edit sulla form
per esempio   WHERE IDOspite = form1.edit1.text;
ho provato e riprovato,ma per bene che vada ricevo un messaggio di errore
del tipo field not found
quake e' la sintassi esatta??
Grazie per la risposta.
Paolo


Open Delphi Manual (
http://groups.yahoo.com/group/delphi_open_manual/
)
Newsgroup: it.comp.lang.delphi
Titolo: scrittura dati lentissima, codice incriminato !

procedure tFrDocu1.CopiaClick (sender : tObject);
var C1,C2,C3,C4,C5 : Integer;
     C6 : variant;
     c7, c8, c9 : stirng;
begin
	C1 := Table1['C1'];
	C2 := Table1['C2'];
	C3 := Table1['C3'];
	C4 := Table1['C4'];
	C5 := Table1['C5'];
	C6 := Table1['C6'];
	C7 := Table1['C7'];
	C8 := Table1['C8'];
	C9 := Table1['C9'];
	Table1.Insert;
	Table1['C1']:= c1;
	Table1['C2']:= C2;
	Table1['C3']:= C3;
	Table1['C4']:= C4;
	Table1['C5']:= c5;
	Table1['C6']:= C6;
	Table1['C7']:= C7;
	Table1['C8']:= C8;
	Table1['C9']:= C9;
 
table1.post
;
end;
 
Tutto qua !

 Tutto qua !
Boh, l'unico consiglio che ti posso dare è creare una nuova applicazione 
e metterci *solo* questo codice (oltre allo stretto indispensabile): 
niente controlli visuali, niente campi calcolati, niente eventi 
associati alla tabella... prova e vedi se così va più veloce.
Adesso però, leggendo l'help, ho visto che il tuo modo di accedere ai 
dati, ossia Table1['x'], equivale ad usare la proprietà FieldValues:
Cito l'help:
Note:	Because FieldValues always uses Variants, it may be a somewhat 
slower method of accessing data, than using a field's native format (for 
example, using a field's AsXXX property), especially in applications 
that process large amounts of data.
Prova ad usare FieldByName('X').AsString o AsInteger
-- 
Jax

 Table1.Insert;
Il problema potrebbe risiedere nell'insert che obbliga lo spostamento di 
diversi record, dal successivo fino all'ultimo.
Prova con Table1.AppendRecord(c1, c2,..,c9);
che fa anche il .post.
Ciao Giorgio 

 che fa anche il .post.
Concordo che questo potrebbe essere il vero problema, e concordo anche 
sull'uso di FieldByName() ma non capisco la necessità di fare 
immediatamente il post visto che il record deve poi essere modificato; 
peraltro se per qualsiasi motivo ciò non avvenisse ne risulterebbe un 
duplicato secco.

 ha scritto nel messaggio 
news:ea82st$1aj1$1...@newsreader2.mclink.it...

Usando appendrecord la modifica degli eventuali campi va' effettuata prima.
Giorgio 

 Usando appendrecord la modifica degli eventuali campi va' effettuata prima.
Vero, lavorando solitamente con sql mi sfuggiva completamente.
Peraltro trovo che nel caso specifico usare sql sarebbe particolarmente 
vantaggioso.
Newsgroup: it.comp.lang.delphi
Titolo: Query nei cicli

Possibile che mettendo una Query in un ciclo dopo un po' di iterazioni
questa impazzisce? Esempio:
While not Tabella.EOF do
 begin
 Query1.Active:=false;
 Query1.ParamByName('CODICE').AsString:=Codice;
 Query1.Active:=true;
 [...]
 end;
Dopo circa 1800 iterazione mi dice paramentro invalido. Ho provato ad
aumentare dal BDE memoria, numero files ma sembra non dare i risultati
sperati.
P.S.: Uso Delphi 3.0 Standard e BDE 5.11.
Grazie a tutti.
--
Giuseppe Fraddosio
fradd...@libero.it
fradd...@supereva.it

 ha scritto nel messaggio
news:PF8F6.86756$s93.9...@news.infostrada.it...


> Anche a me capitava. quando sono passato a D4 č andato tutto a posto.
Quindi ora non posso farci niente?



  Query1.Active:=false;
  Query1.UnPrepare;
  Query1.ParamByName('CODICE').AsString:=Codice;
  Query1.Prepare;
  Query1.Active:=true;
Ciao
Simone

   Query1.Active:=true;
Provero' a fare anche questo, pero' avevo risolto cosi':
Query1.Active:=false;
While not Table1.EOF do
 begin
 Query1.ParamByName('CODICE').AsString:=Codice;
 Query1.Active:=true;
 [...]
 Query1.Active:=false;
 Table1.Next;
 end;
Sembrera' strano ma cosi' ha funzionato. Avevo pensato questa soluzione
quando avevo notato che dopo che mi dava l'errore di paramentro invalido, se
ripetevo la stessa query funzionava.


Newsgroup: it.comp.lang.delphi
Titolo: PARADOX E WIN2000

Salve a tutti,
uso D5 su WinNT. WinNT non supporta la porta USB, quindi devo passare a
Win2000. Vorrei sapere se Paradox funziona con Win2000. Grazie a tutti.
Daniele.

 ha scritto nel messaggio
news:3A41E235...@tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: Trigger Firebird

Sto usando IBOConsole per creare le tebelle per Firebird.
Nell'inserire un Trigger son comparsi anche SET TERM^; e COMMIT WORK^ . Che 
significato hanno?
Grazie, Giorgio
SET TERM ^ ;
/* Triggers only will work for SQL triggers */
CREATE TRIGGER "TRIG_DATI" FOR "DATI"
ACTIVE BEFORE INSERT POSITION 0
as
/* code here */
begin
new.id_dati=GEN_ID(GEN_DATI,1);
end
 ^
COMMIT WORK ^
SET TERM ;^ 

1) 6 ot
2) è documentatto
3) oggi sono buono e spiego...
il dialetto di firebird deriva da quello di interbase.
Il dialetto di interbase richiede, qualora hai statement multipi, la
separazione con il carattere ";".
Ora, se hai 5 righe, serve un *qualcosa* per far capire al db che un
blocco di istruzioni sono in realta una sola istruzione, racchiusa in
trigger o strored procedure.
Quindi, si usa set term x dire al db "usa il carattere x per capire
DOVE finisce una singola istruzione"
BaiBai
A.

 ha scritto nel messaggio 
news:1164275252....@j44g2000cwa.googlegroups.com...
1) 6 ot
2) è documentatto
3) oggi sono buono e spiego...
Ammetto che non ho cercato.. :-) ciao giorgio

Newsgroup: it.comp.lang.delphi
Titolo: Cerco book's code (grazie)

Scusate se vi faro' perdere qualche secondo, ma devo un ringraziamento
pubblico ad
Acqua, che ha risolto il mio problema.
Ferdinando

> devo un ringraziamento pubblico ad Acqua, che ha risolto il mio problema.
nessuno potra' piu' dire che "la classe non e' Acqua" ;)
Ciao, Sandro

> nessuno potra' piu' dire che "la classe non e' Acqua" ;)
ROTFL!
Acqua
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.delphi
Titolo: [AR] OFFERTA: Programmatori C "junior" Cercasi

 Inviare un esaustivo Curriculum a: 
sam...@tin.it
Inviare un esaustivo forward, completo di header, a 
ab...@libero.it
 .
Mandarlo a TIN e' inutile, ma tanto sono gia' stati sbattuti fuori da
Usenet, se continua cosi' li fanno uscire a calci anche dal resto di
Internet,,,
<wanna>D'ACORDO?</wanna>
Ciaotutti,
*

..non ti curar di loro, ma guarda e passa.
Bye
AS
"Se č Microsoft non funziona"
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

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

Mi potreste fare un piccolo esempio di come posso passare dati elaborati dal
mio programma (fatto con Delphi 7) a una pagina creata con Rave? Per poi
fare una stampa? Premetto che nella pagina Rave ho gia creato un campo Memo
e ho salvato il progetto. Poi???
Grazie per l'aiuto Lanfranco


Open Delphi Manual (
http://groups.yahoo.com/group/delphi_open_manual/
)
Newsgroup: it.comp.lang.delphi
Titolo: Setup shell extension

Ciao!
mi vedo costretto a chiedere ancora un suggerimento.. :-(
Ho realizzato una shell extension property sheet, ma non ho molta esperienza
di GUID...
Quando devo installare la mia shell extension devo creare tutte le volte una
nuova GUID?
Oppure è sufficiente utilizzare la GUID che ho creato sul mio sistema
durante lo sviluppo? (univocità RuleZ)
Vi ringrazio in anticipo
Bye Bye
--
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
|()|===================|()|
|()|                                           |()|
|()|        .-=] ExTrEmE [=-.      |()|
|()|                                           |()|
|()|          ICQ#12987528        |()|
|()|   MailTo : 
extr...@tin.it
  |()|
|()|                                           |()|
|()|===================|()|
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/

 durante lo sviluppo? (univocità RuleZ)
La seconda che hai scritto, dovrai solo ri-registrarla ma il GUID (Globally
Unique IDentifier) resta lo stesso...
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply
Newsgroup: it.comp.lang.delphi
Titolo: TreeView cambia immagine della radice

Per prima cosa volevo approfittare di questo mio primo messaggio per
salutare tutti: mi auguro infatti di potere frequentarlo abitualmente
ma, soprattutto, in modo che sia costruttivo per tutti :-)
Se qualcuno poi fosse cosi' gentile da confermare l'esistenza di un
bug di Delphi, ed eventualmente conoscesse un mezzo per girarci
attorno (brutta traduzione di workaround :), il benvenuto per me, non
potrebbe essere migliore ;-)
Il problema che ho verificato e' questo: in un componente che ho
realizzato, che eredita le proprieta' di un TTreeView, ho associato
una TImageList nella corrispondente proprieta'. Quando poi vado a
esplodere l'albero associato al TreeView associo al nodo radice una
icona settando opportunamente la proprieta' imageindex del TreeNode
corrispondente. E fin qui, tutto funziona egregiamente. 
Il problema sorge quando vado a fare una espansione del nodo,
cliccando sul pulsante di espansione (ho settato la proprieta'
haschildren del nodo radice a true) e chiamo una funzione che mi
costruisce i figli del nodo radice durante l'evento Expanding. 
Senza che io tocchi l'attributo ImageIndex della radice infatti (anche
in seguito, l'Image index del nodo radice rimane sempre corretto, ho
verificato con il debugger), l'icona visualizzata cambia
improvvisamente.
Questo problema si verifica solo con il nodo radice ... con tutti gli
altri nodi il procedimento di espansione, molto simile a quello della
radice, funziona egregiamente.
Di piu', cambiando l'imageindex associato alla radice, non cambia
l'icona, come non viene ripristinata l'icona corretta nemmeno dopo un
refresh del componente.
Ringrazio in anticipo chiunque possa darmi notizie in merito a questo
problema.
ciao, Michele

potrebbe essere migliore ;-)
Hai settato TTreeNode.SelectedIndex = a TTreeNode.ImageIndex?
Ciao,
Massimo.
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"

problema.
Resta il saluto a tutto il gruppo, dato che ho risolto da solo il
problema impostando SelectedIndex uguale a ImageIndex per ogni nodo.
Ovvio direte voi ... ma forse non tanto ;-)
ciao, Michele

Hai settato TTreeNode.SelectedIndex = a TTreeNode.ImageIndex?
No, non lo avevo fatto, e il problema era proprio quello... ;-)
Grazie comunque per l'indicazione risolutiva.
ciao, Michele
Newsgroup: it.comp.lang.delphi
Titolo: Nuova Unit

 
          salve, scusate la domanda stupida , ho cercato sia nella guida che in google
ma proprio non riesco a trovare il modo per aggiungere una nuova unit in D5.
grazie.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ma proprio non riesco a trovare il modo per aggiungere una nuova unit in D5.
Dal menu [File|New|Unit], se ho ben capito la domanda. :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 --
grazie, ma un pulsantino vicino a new form potevano pure mettercelo. :-)


 grazie, ma un pulsantino vicino a new form potevano pure mettercelo. :-)
Per i miei gusti è sufficientemente accessibile anche così (d'altronde, 
basta premere solo un paio di tasti)...tuttavia, visto che la Toolbar è 
configurabile, puoi aggiungere tu il tasto che manca, dove ti fa più 
comodo. ;-)


 --
grazie ancora, tra l'altro mi trovo anche abbastanza male nel dover premetr
ctrl f2 per stoppare il progetto, io sono abituato col tastino, c'č pure
quello da qualche parte?


 quello da qualche parte?
Il comando a cui ti riferisci è probabilmente "Program Reset"...bastava 
cercare un attimino, suvvia. :-)


Newsgroup: it.comp.lang.delphi
Titolo: Interfacciamento con Outlook Express

Salve!!
Sapreste come generare dei messaggi di posta elettronica e passarli poi ad 
outlook express per l'invio?
Utilizzo delphi2 e avrei necessita' di mandare delle e-mail a dei nominativi 
presenti in un mio programma di indirizzi.
I messaggi vanno bene anche plain/text, ma, molto probabilmente, il cliente 
vorra' mandare anche allegati.
Ho scaricato un client SMTP per delphi (funziona bene), ma preferirei lasciar 
fare ad outlook il suo lavoro..
Grazie in anticipo per qualunque suggerimento.
Luca Del Mestre

Trovi la risposta sulle FAQ.
Bye..


Scusa ma quali FAQ intendi?

Scusa ma quali FAQ intendi?
http://gpi.infomedia.it/abc/delphi/FaqDelphi.txt
-- 
Lawrence "Rhymes" Oluyede (
rhy...@myself.com
)
"Per cambiare, per diventare un'altra
cosa dobbiamo prima sapere cosa siamo"
(Bruce Lee)

Grazie!!!!
Indirizzo molto interessante!!!!

Newsgroup: it.comp.lang.delphi
Titolo: Componente Tedit speciale

Esiste un componente tipo TEDIT perň
che abbia delle funzioni i filtri....
es.
Mysetchar: set of  '0'..'9'  'A'..'H'  'b'..'z' ecc...
a me interessa filtrare alcuni ALFA min, ALFA magg
e NUM
oppure devo crearmelo !?


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

 ha scritto nel messaggio
news:Hbkza.228277$K35.5...@news2.tin.it...

mi sono dimenticato io uso D6 cmq ci provo....
devo farne uno ad hoc, a me servono ad es.
filtrati dei set di numeri e lettere, così:
'4'..'6'   'A'..'F'  'T'..'Z'
è solo un esempio !!
grazie, MAX
Newsgroup: it.comp.lang.delphi
Titolo: Interbase

Se non mi sbaglio è free... mi servirebbe la versione SERVER dove la trovo?
Grazie
Paolo

Scusate... se dovessi instrallarlo sul mio server Linx RH 7.1 potrei avere
dei problemi?


wrote:
www.interbase2000.org


dei problemi?
non ho provato, ma direi di no, anzi se hai probelmi di sicurezza è
molto meglio che nstallarlo su win95 ;)
considera anche FireBird
http://firebird.sourceforge.net/
è praticamente identico, ma si è staccato dal progetto originale di
interbase ed ha una filosofia che si puo' chiamare Open Source,
InterBase è di proprietà di Borland e non sembra molto aperta a questa
filosofia...
Ciao,
Alan Solo

Newsgroup: it.comp.lang.delphi
Titolo: Array di Tstringlist

Ciao,
ho il seguente pezzo di codice (piu' o meno):
var   s: array[0..255] of tstringlist;
......
for i:=0 to 255 do  s[i]:=TStringList.create;
s[x].Add(stringa);
con qualsiasi x che metto la stringa non viene aggiunta alla stringlist.
come mai ???
Ciao by Vime!

s[x].Add(stringa);
Penso che il problema stia nel non mettere il parametro Self :
TStringList.create(self);
Ciao :)
--
- Carlo -
BSSoftware Tips Mailing-List Support

con qualsiasi x che metto la stringa non viene aggiunta alla stringlist.
Vedi un po' se ti è di aiuto ... l'unico errore che mi viene in mente è che
tu possa aver sbagliato
a VERIFICARE (cioè in realtà ti funziona ma non te ne accorgi) perchè magari
accedi ad un elemento
sbagliato ... del tipo :
s[x][x] ... che verrebbe soddisfatta solo per x=0
Mah ... sono stato un po' incasinato a spiegare ... mah perdonami ... sono 8
ore che studio fisica 2 ...
e venerdì dovrò andare al patibolo ... sigh! :((
Ciao!! Davide DG

TStringList.create(self);
veramente cosi' non funziona; non vuole il parametro,  e quindi non si
compila...
Ciao by Vime!


Ti posso confermare che il tuo codice funziona!!!
procedure TForm1.Button1Click(Sender: TObject);
var
   i: integer;
   stringa: string;
begin
   stringa := 'ciao';
   for i:=0 to 255 do
      s[i]:= TStringList.create;
      s[1].Add(stringa);
   edit1.Text := s[1][0];
end;

tu possa aver sbagliato >a VERIFICARE 
bravo....... in effetti c'era un'altro problema collegato che mi faceva
pensare che l'array non fosse pieno.......... poi il debugger mi ha
portato del tutto fuori strada:  passando il puntatore sulla variabile
durante l'esecuzione (e anche con il watch), mi indicava qualcosa tipo
s=( (),(),() ....... x255)......... Cosi' ho pensato fosse vuoto
Grazie e Ciao by Vime!
Newsgroup: it.comp.lang.delphi
Titolo: Delphi e Access?

Ho collegao una tabella (componente TTable) ad una tabella di Access tramite
un Alias che mi creo run-time con l'istruzione
Session.AddAlias(Temp, 'MSACCESS', Lista);
e fin qui tutto bene, ma solo se ho installato MS-Access sulla mia macchina.
Come posso fare a lavorare con tabelle Access su altri PC senza dover
installare MS-Access?
Grazie a coloro che vorranno rispondermi.
Pippo


Se non usi il bde di Delphi 5 non basta creare l'alias, ma occorre che sia
installato l'odbc e per di piů lo devi configurare.
--
saluti
FDA

 FDA
Io ho installato per l'appunto Delphi 5 ma non funziona comunque. Il
collegamento che ho fatto con "Session.AddAlias(Temp, 'MSACCESS', Lista);" č
con i driver nativi (quindi dovrebbe esser teoricamente sufficiente il BDE)
e non tramite ODBC.
Comunque, Grazie!

e non tramite ODBC.
Access sfrutta un motore database totalmente diverso da BDE ed e' il
Microsoft Jet. 
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
---------------------------------------------

Newsgroup: it.comp.lang.delphi
Titolo: stop screensaver

Ciao a tutti,
mi trovo di fronte a un grande dilemma: devo far cessare l'esecuzione dello
screensaver da programma... ma proprio non so dove sbattere la testa!! :(
Finora sono riuscito a trovare codice per abilitare e disabilitare lo
screensaver ma niente per fermarlo durante la sua esecuzione.
grazie a tutti
***Gio***

 screensaver ma niente per fermarlo durante la sua esecuzione.
dove hai cercato?
Non esiste solo il codice.
Esiste una documentazione delle api di windows fornita con delphi e
disponivbile on line su msdn.
Gli hai dato una occhiata?
Bye
A

 screensaver ma niente per fermarlo durante la sua esecuzione.
A rigor di logica è sufficiente scatenare un evento di mouse o tastiera per
bloccarlo; credo quindi che una mouse_event() sia più che sufficiente ai
fini richiesti
--
- Carlo -

 screensaver da programma... ma proprio non so dove sbattere la testa!! :(
http://makeashorterlink.com/?T2BD12145
Cerca di usare di più google, io ho trovato questo semplcemente con "delphi
stop screensaver"
-- 
Lis
ICQ@Home #7317603sette     ICQ@Work #16285702tre
Mercatino: 
http://lis77.bravepages.com
 (aggiornato *con foto*: 16/06/03)