mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: dbExpress - creazione dipendenze con Foreign

problema con DBExpress + D7 creo un Database con 2 tabelle
Tb_Codici, Tb_Spese , entrambe hanno un Campo Cod_Spesa
mi interssa creare dipendenza tra TB_Spese e TB_Codici sul campo
Cod_Spesa.
Non ricevo errori all'esecuzione si SQL.
1) se creo le Tabelle  (compresa TB_Codici) e per ultima TB_SPESE,
quando le controllo con IBExpert , tutto bene trovo cio' che volevo
2) se in fase di crezione Tabelle aggiungo la Creazione di Dipendenza
with SQLQuery1 do
begin
  SQL.Clear;
  SQL.Add('Create Table TB_SPESE (');
  ... campi precedenti
  SQL.Add('Saldo NUMERIC(15,4),');
  SQL.Add('FOREIGN KEY (COD_SPESA) REFERENCES TB_CODICI(COD_SPESA))');
  try
   ExecSQL;
  except
 end;
 if not SQLConnection1.Intransaction then 
SQLConnection1.StartTransaction(TD);
  try
   SQLConnection1.Commit(TD);
  except
  end;
end;
quando controllo con IBExpert o IBAdmin , non trovo la Tabella TB_Spese 
appena creata
3) provo allora a fare Alter Table
  Close;
  SQL.Clear;
  SQL.Add('Alter Table TB_SPESE ');
  SQL.Add('Add Constraint DIP_TB_SPESE ');
  SQL.Add('FOREIGN KEY (COD_SPESA) REFERENCES TB_CODICI(COD_SPESA)');
in questo caso trovo tutte le Tabelle , ma non la Foreign Key e quindi la 
Dipendenza
tra Tb_Spese e Tb_Codici.
Se creo manualmente la dipendenza da IBExpert fa cio' che mi aspetto.
Da D7 non ottento invece il risultato cercato.
grazie Maurizio 

 [..ommetto...]
Il DB e' Firebird sql dialect 3 , IBX 7.08
 in riferimento al mio post precedente , in cui dbExpress non
creava la Foreign Key in creazione Table.
ho rifatto la prova con i componenti Ibx (le istruzioni SQL sono
rimaste le stesse) , ed ora crea tutto correttamente.
francamente , non ho capito quale oscuro motivo, sia alla base
della mancata creazione delle dipendenze con dBExpress.
Maurizio 

 end;
stessa cosa.
magari una volta che ti salta fuori l'eccezione possiamo aiutarti.
ciao
   gabriele
Newsgroup: it.comp.lang.delphi
Titolo: domanda Initialization Finalization ... problemi ?

Salve a tutti,
Vorrei chiedervi qualche consiglio sulla scrittura di oggetti ...
Ultimamente ho scritto delle unit di questo tipo:
Unit _ABC;
Interface
Type TABC = Class (TObject)   // generalmente derivo sempre da TObject
   protected
   private
   public
       Constructor Create; Dynamic;
       Destructor   Destroy; Override;
   published
end;
Var  ABC : TABC;       //  ---> Questa è forse quella che mi crea
problemi... ?
Implementation
Constructor TABC.Create;
Begin
 .....
End;
Destructor Destroy;
Begin
...
Inherited Destroy;                 //  E' giusto / serve chiamarlo quando
derivo da TObject ??
End;
INITIALIZATION
   ABC := TABC.Create;
FINALIZATION
   ABC.Free;
End.
 Ho scoperto ultimamente che a questo punto, in particolari condizioni
 (ancora per me ambigue però !!), si pianta (Access Violation at address
...).
 Il brutto è che non ho capito perchè si pianta!!! Infatti non lo fa sempre.
 Sono sicuro che il componente di per sè funzioni bene perchè creandolo a
runtime
 su OnCreate non dà problemi.
 Qualcuno sa dirmi che c'è di sbagliato ? Ho provato (preso ormai dalla
disperazione) anche
 a reinstallare Delphi ... macchè!
 In teoria, ... dico in teoria..., non sono costruiti così anche TPrinter,
TMouse, TScreen ... tutti gli
 oggetti che hanno una var globale disponibile in run time senza doverla
creare ?
Poi vorrei sapere se quando derivo da TObject devo o meno chiamare inherited
destroy dal destructor (in teoria sì... visto che non è un metodo
astratto...?)
Grazie mille in anticipo a tutti ... :-)
Davide DG

 creare ?
da d3 Printer e' diventata una funzione per poter risparmiare 20k di codice
nel caso non usi la stampante, comunque molti oggetti  di libreria vengono
creati in initialization e distrutti in finalization, quindi non penso la
causa del problema sia l'uso di questo tipo di tecnica.
saluti
Carlo

Newsgroup: it.comp.lang.delphi
Titolo: [ot] spostare applicazione delphi su apple os X

ciao a tutti, sapete dirmi se con le nuove versioni di delphi č possibile
compilare un applicazione e farla girare su apple??? sapevo che kylix fa
girare su linux, visto che apple OS x č linux secondo voi funziona??
Simone

su linux, visto che apple OS x č linux secondo voi funziona??
Mac OS X non č affatto Linux.

 Mac OS X non è affatto Linux.
non lo escuderei a priori....MacOSX è basato su bsd, il quale puo far girare
esecuibili linux (elf).
Purtroppo non ho grossa esperienza in merito, penso che una googlata non
farebbe male...
Bye,
Raktzo

MacOSX è basato su bsd [...]
Come già detto: Mac OS X *NON E'* Linux (il verbo "essere" ha un
significato inequivocabile) e ci aggiungo anche che BSD *NON E'*
Linux.  Mac OS X deriva da Mach 3, probabilmente ha una compatibilità
spinta con Linux, ma più che Linux-based, si dovrebbe dire che è
UNIX-based.
In ogni caso, direi di chiudere qui, perché siamo OT.

ok grazie
Simo
Newsgroup: it.comp.lang.delphi
Titolo: LoadFromStrem

Potreste postarmi un esempio di
image1.Picture.Bitmap.LoadFromStream(.......);
Grazie Tante....
Ciao

 Grazie Tante....
non ce l'ho l'esempio.
Ma puoi caricare un file immagine con "TFileStream" e poi passare lo stream
al tuo "LoadFromStream".
Se non sono stato chiaro dimmelo pure.
Ti saluto
Antonio

Newsgroup: it.comp.lang.delphi
Titolo: selezione campi da grid

salve a tutti, 
č da poco che ho iniziato a guardare delphi ed ho una montagna di domande
sto creando un programmino di ricerca tramite una grid, sono riuscito ad esporla con i dati a me necessri, ma non riesco a riportare i dati  selezionati
ovvero all'evento dubleclick della grid dovrei assegnare a cmpi esterni  alcuni campi della grid
come devo fare????
visto che ci sono,come posso fare a saper su che colonna e riga ho eseguito il doppio click??
grazie a tutti
-- 
Ulpin 
------------------------------------------------------------------------
View this thread: 
http://www.itsistemi.net/viewtopic-711429.html
Inviato via 
http://www.itsistemi.net

 visto che ci sono,come posso fare a saper su che colonna e riga ho eseguito il doppio click??
Per la colonna e' <griglia>.SelectedField
Per la riga devi fare riferimento al record del DataSource collegato 
alla TDBGrid.
Tutto questo assunto che cio' che tu chiami "grid" sia una TDBGrid ossia 
una griglia associata ai dati.
Newsgroup: it.comp.lang.delphi
Titolo: Help post Shellexecute

Salve...
dovrei rilevare quando un programma lanciato con lo shellexecute termina o
viene terminato in modo da poter lanciare il programma successivo. (una
specie di file bat diciamo)
Mi potete aiutare?
Grazie mille

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

 gratuito.
Grazie ancora, ora che so che lo si fa con ShellExecutEx cercherň materiale
a riguardo :)
Byezz

 specie di file bat diciamo)
puoi usare la shellexecute in modalita' "attendi che termini il processo":
 procedure ExecuteAndWait(AppName, Params: String);
 var sei:TShellExecuteInfo;
 begin
  with sei do try
   cbSize:=SizeOf(TShellExecuteInfo);
   fMask:=SEE_MASK_NOCLOSEPROCESS;
   lpVerb:='open';
   lpFile:=PChar(AppName);
   lpParameters:=PChar(Params);
   nShow:=SW_SHOWNORMAL;
   ShellExecuteEx(@sei);
   WaitForSingleObject(hProcess, INFINITE);
  finally
   CloseHandle(hProcess);
  end;
 end;
Se vuoi che la tua applicazione non resti bloccata mentre la sequenza di
processi e' in corso, separa le varie shellexecute in un thread a parte.
Ciao, Sandro

 Ciao, Sandro
Grazie, ho cmq trovato in rete un "esempio" che rispecchiava in pieno cio'
che volevo fare e l'ho riadattato facilmente al mio scopo.
(in particolare il penultimo esempio che si trova qui:
http://delphi.about.com/library/weekly/aa082499.htm
Ho inglobato il tutto in una funzione e messo le variabili contenenti path e
parametri, come parametri della funzione stessa)
Ora però ho un altro problema da risolvere... Devo poter chiudere il
programma che apro con questa funzione... anche perchè chiudendo il mio
compilato l'altro rimane aperto e cio' non è bello :)
Qualche suggerimento?

 Qualche suggerimento?
sei sicuro di aver fatto tutto nel modo giusto?
Dopo il comando ShellExecuteEx(@SEI) nel campo hProcess della struttura SEI 
dovresti avere l' HANDLE del programma avviato e il comando 
CloseHandle(SEI.hProcess) dovrebbe chiuderlo.
Ma hai visto l'esempio che ti ho consigliato su delphi e dintorni?


 Ma hai visto l'esempio che ti ho consigliato su delphi e dintorni?
vorrei aggiungere che affinche sia restituito l'handle del programma 
avviato in SEI.hProcess il campo SEI.fMask deve essere valorizzato:
SEI.fMask := SEE_MASK_NOCLOSEPROCESS

Newsgroup: it.comp.lang.delphi
Titolo: dividere nome file

Ho spulciato un po' la documentazione, ma non riesco a trovare il modo di
dividere il nome di un file in path, nome e estensione. (mi pare che in
C/C++ si usi "csplit")
Mi e' anche passato il dubbio: ma esistera' una funzione del genere in
Delphi?
--
Ing. Gabriele Boccone, O.Si S.n.c., Genova.
"L'utente piu' medio" dal sondaggio di it.hobby.motociclismo.scooter
       ,.                                                            \
   {}=/o ) on the left: Fender Jazz Bass - Made in Japan    _       =q\
  {}=/o,(  on the rigt: Kymco Heroism 150 - Made in Taiwan (_),==,    \\_
 {}=/o 坑  on my PC: Debian GNU/Linux 3.0 - Made somewhere   7,-.\   /,\.\
{}=/o <\|                                                    :=o ;===: o':
  (_____)  Powered by 220V                                    `-'     `-'

 Ho spulciato un po' la documentazione
Hai provato nella categoria "file name utilities"?
Comunque,
  per l'estensione devi usare ExtractFileExt ();
  per il path, ExtractFilePath;
  per il nome, ExtractFileName.
Ciao ciao

 Ciao ciao
Hasta luego.
Newsgroup: it.comp.lang.delphi
Titolo: buone ferie a tutti

ciao a tutto il newsgroup e buone ferie!!!
Simo

gia fatte..
probabilmente lavoro anche il 15.. :-((
cmq, grazie, e goditele alla grande! :-)
A.

Ciao,
qui c'è proprio bisogno di ferie.
Tanto per finire in bellezza il lavoro prima di staccare la spina (al PC) 
per 2 settimane, mi sono messo a convertire i sorgenti da D5Pro D2007Pro.
Miiiiiiiiiii che sudata.
Essento che il SW che sto convertendo è molto legato a Word, Excel, invio 
email, e stampe fatte con QR, è davvero una fatica.
D2007 è un poco bastardo (nel senso buono), lui compila ed i casini con Word 
ed Excel escono solo a runtime.
E' più il tempo che ho passato ad inventare istruzioni per le oleobject (che 
prima non usavo) che altro.
Però alla fine è fatta. (spero, perchè oggi ha scaricato il s.p. 2 di Rad 
Studio e chi lo sa che qualche altra magagna non sia saltata fuori)
Ora mi rimangono solo le stampe con QR (ver. pro 4.0.7 con tanto di sorgenti 
al seguito).
Sto cercando di capire perchè mi fa modificare i .pas (sto traducendo in 
italiano le label e le caption varie), poi mi ricompila il tutto, crea
QR4DesignD2007.bpl e QR4runD2007.bpl, ma alla fine quando ricompilo il mio 
SW le anteprime di stampa sono sempre con le scritte in inglese.
Con D5 e QR ver. 362  ci ero riuscito ed avevo personalizzato tutto a 
piacimento.
Mahh !!!
Spero che al ritorno dalle ferie la mia mente sia più elastica e che 
qualcuno che è rimasto al lavoro legga il mio post e mi smadonni dietro per 
la mia incapacità . :-)
Per ora non creo un post nuovo e sfrutto questo, al rientro se prorpio non 
ci riesco da solo, riposto.
Va be !!!
Adesso è l'ora dei saluti, e quindi buone vacanze a tutti quelli che tolgono 
il c..o dalla poltrona e vanno a mettersi a piancia all'aria in spiaggia o 
gli scarponi in montagna.
Io da parte mia me ne vado a girare l'Austria, a strafogarmi di Wurstel e 
birra (moglie permettendo).
Saluti
Marco C.

heheh io me ne andrò in sicilia 2 settimane e al ritorno dovrò convertire 
pure un vecchio applicativo delphi3 hihihi
Simo 

Salve a tutti,
buon rientro per chi è già al lavoro come me.
Mi autorispondo.
Dopo le birre delle vacanze si vede che il mio cervello si è ritemprato.
Gestire un preview personalizzato con QR era più semplice del previsto.
Basta prendere il loro sorgente e leggerselo per bene e senza fretta.
Ok ora come ora mi sembra che D2007 Professional non sia male.
Fra pochi giorni il test beta con la distribuzione in azienda del nuovo 
eseguibile.
Saluti
Marco C.
Newsgroup: it.comp.lang.delphi
Titolo: Funzioni con ritorno di piu' valori

E' possibile far ritornare ad una funzione piu' di un valore ?
normalmente una funzione accetta piu' parametri in entrata,
ma restiruisce 1 valore in uscita.
function xyz (var : Input1,Input2:String):String;
begin
.....
 xyx:=<stringa>
end;
sarebbe comodo avere piu' valori in ritorno, ma chiaramente
una sintassi simile non va.
function xyz (var : Input1,Input2:String):var Val1,Val2:String;
begin
.....
end;
forse funzioni annidate ? , se non ricordo male in TurboPascal
si potevano avere piu' valori di ritorno. 

 si potevano avere piu' valori di ritorno.
No, non si poteva.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 si potevano avere piu' valori di ritorno. 
...eh, mi sa che ricordi male....
---
Amma

 si potevano avere piu' valori di ritorno.
Ricordi male.
Saluti
	Marco Bortolani
	info @ 
marcobortolani.it

Newsgroup: it.comp.lang.delphi
Titolo: Input tastiera

Ciao ragazzi,
come posso fare a impedire a qualcuno di digitare in una
edit tutti i caratteri tranne backspace e/o canc?
grazie a chi mi aiuta

li intercetti sull'eento OnKeyDown
A

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





Prova a Distruggere le precedenti 
5.



 wrote in 
  message 000601bfd46c$1aca8660$38a51497@n4e2e0...


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

Ciao a tutti!
Come faccio a gestire un'eccezione in modo che l'esecuzione del mio
programma da dentro l'IDE non si fermi, senza togliere l'opzione "stop on
delphi exception" ?
Thx :-)

 "stop on delphi exception" ?
Non puoi, in generale. Puoi pero' _ignorare_ eccezioni di classi
particolari (le inserisci nella lista del dialogo dove c'e' la checkbox
che citi); ovviamente se non le gestisci vanno a finire al default
handler che te le mostra.
Saluti
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: Leggere e scrivere un array di byte su db

Salve a tutti,
allora il mio problema è relativo alla scrittura e lettura di un'array
di byte su db.
Il db in questione è Oracle 9 e devo riempire un campo di tipo Raw e
poi leggerlo
Un metodo di un componente che genera hash restituisce un array di byte
(20 byte) e io vorrei inserire questi dati nel db per poterli poi (dopo
un tot di tempo) confrontarli byte per byte con il nuovo hash generato
dal file.
All'inizio avevo fatto tutto con stringhe (convertendo i byte in
caratteri) però c'è il problema che la stringa si interrompe se il
byte ha il valore del carattere di terminazione.
Quindi ho deciso di inserire nel db direttamente i byte (con il campo
RAW).
Uso il componente ODBCExpress per comunicare via ODBC (driver Microsoft
ODBC per Oracle versione 2.575.1117.00) con il db Oracle e per fare la
scrittura ho utilizzato il metodo  BindBinary dell'oggetto Thstmt
passandogli un MemoryStream in cui avevo inserito i dati dell'array di
byte:
"
HashMemoryStream.WriteBuffer(hashArray,20);
HstmtHash.BindBinary(1,HashMemoryStream);
"
il thstmt fa solo l'update del campo RAW scrivendo l'hash
Dopo questa operazione nel db vedo effettivamente i byte in esadecimale
Il problema si ha invece quando tento di recuperare questi dati:
provo a leggere il campo RAW in un memoryStream e poi a inserire i dati
nell'array di byte
"
HashMemoryStream:=HstmtHash.ColMemory[1];
HashMemoryStream.ReadBuffer(hashArray,20);
"
Il risultato del metodo ColMemory è però un nil.
Ho provato anche con un campo di tipo BLOB ma mi dà un eccezione ODBC
anche in scrittura :[Microsoft][ODBC driver for
Oracle][Oracle]ORA-01465: invalid hex number.
Quale può essere il metodo migliore per fare questa operazione di
scrittura e lettura di un array di byte su db per confrontarlo con un
altro array di byte senza usare stringhe? O come posso usare le
stringhe superando il problema del carattere di terminazione?
Grazie mille e scusate per la prolissità
ciao 
Matteo

Basta ciclare sui bytes del tuo hash, convertire ogni singolo byte in
hex e comporre una stringa che contiene tutti questi codici hex.
255 in hex è pari a FF.
Quindi ti servono 2 caratteri (digit) per goni byte e devi usare 2 come
parametro per la inttohex.
A quel punto sul tuo db avrai un campo char di 40 caratteri,
INDICIZZABILE, e quindi le query saranno velocissime.
Dulcis in fundo, una domanda...
xche proprio odbcexpress?
I doa per quel che ricordo funzionano alla grande...
AS

Grazie mille Alberto,
adesso provo con questa soluzione, devo dire che a qualcosa di simile
ci avevo anche pensato, però volevo capire perchè mai non mi torna
corretto il MemoryStream, è colpa del tipo Raw del campo di Oracle?
La tua domanda è invece + che legittima ma la risposta non facile,
diciamo che OdbcExpress me lo sono trovato già utilizzato e allora ho
proseguito senza stravolgere tutto. 
grazie ancora
ciao ciao

 diciamo che OdbcExpress me lo sono trovato già utilizzato
ok!
AS
Newsgroup: it.comp.lang.delphi
Titolo: campi text e controlli memo

Ho una tabella con un campo text che contiene una lista di nomi che devo
leggere riga per riga. Non posso usare un DBmemo (per un motivo troppo
lungo da stare a spiegare).....cosa mi consigliate? Avevo pensato di
usare un Tstrings, ci ho provato ma il programma mi va errore. Il codice
che ho usato è il seguente (forse, anzi, sicuramente sto sbagliando
qualcosa...):
private
lista:Tstrings;
.
.
Tformricerche.SpeedButton7Click(Sender: TObject);
begin
lista:=Tstrings.create;
.
.
lista[1]:=dati.dbtablelistanomi.text; 
//in questo punto si ferma :-(
Ciao
Gianni Giusti
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

il tipo tstrings è un array di stringhe dinamico. Devi usare la setlength
altrimenti accedi ad elementi dell'arrai che non esistono, se vuoi
aggiungere le righe una ad una.
Se vuoi che la tua strings contenga tutto il contenuto del campo in una
botta sola
dall'help di Delphi
Adds a group of strings to the list.
procedure AddStrings(Strings: TStrings); virtual;

 usare un Tstrings, ci ho provato ma il programma mi va errore. 
Come altri non indichi l'errore.
Xche non usare una TStringList?
Bye
AS
"Se è Microsoft non funziona"


 Xche non usare una TStringList?
Concordo.

Xche non usare una TStringList?
L'errore e' ovvio, sta utilizzando TStrings che non e' una
classe istanziabile, contenendo dei metodi astratti.
DEVE usare una TStringList.
-- 
Andrea Laforgia (
walkie...@libero.it
)
"Usenet is a strange place" [Dennis Ritchie]

Ok, risolto con TStringList....tra l'altro è ottimamente documentata
nell'help di Delphi.
Grazie a tutti per le risposte e i consigli.
P.S.
Scusate se non avevo postato il codice d'errore, ma quando ho mandato il
post mi trovavo su una macchina priva di Delphi e l'errore che la Tstrings
mi dava non lo ricordavo
Ciao
Gianni Giusti

Newsgroup: it.comp.lang.delphi
Titolo: Connessione a DB Access

Microsoft Jet 4.0 OLE DB Provider
Questo, se il DB e' Access.

grazie č quello ceh cercavo
"Andrea Laforgia" <xx...@xxxxx.xxx> ha scritto nel messaggio
news:npk9htg0s1u0tdevu...@4ax.com...


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

Nella libreria CLX di Delphi 6 e quindi Kilix, esiste un oggetto che
sostituisce la MessageBox o la MessageDlg della libreria VCL?
Grazie.

Guarda un po' l'help prima di scrivere
Comunque c'è la unit QDialogs specifica della CLX
--
_________________________________
Edmondo Di Tucci 
snar...@tin.it
www.powernetsi.it
 
edm...@powernetsi.it

Mi potresti consigliare quali sono le istruzioni visto che sull'help non ho
trovato nulla?
Grazie ancora!
Newsgroup: it.comp.lang.delphi
Titolo: buon manuale

Salve a tutti,
premetto che non ne so niente di programmazione, praticamente 0 assoluto, e
perciò vorrei affidarmi ad un manuale valido per poter imparare a
programmare in delphi borland 6.
Avete in mente qualcosa da consigliarmi?
Vi ricordo che è necessario che io parta dai primi rudimenti sulla
programmazione quindi non saprei che farmene di un manuale che parte subito
dando per scontate le basi che, ripeto, non ho.
In alternativa, esistono tutorial validi per iniziare a fare qualcosina di
semplice in borland delphi 6?
Grazie infinite per il vostro tempo e aiuto.

 Avete in mente qualcosa da consigliarmi?
"Delphi 6 Developer's Guide" di Teixeira-Pacheco.
--------------------------------
Inviato via 
http://usenet.libero.it

Newsgroup: it.comp.lang.delphi
Titolo: Grafica 3d in delphi

Ciao a tutti
dovrei visualizzare un cubo (reticolo) in 3 dimensioni
e poi falo ruotare, niente di complicato
esistono delle librerie
dei componenti adatti allo scopo?
parto con il TImage?
grazie

opengl?
A

 
http://www.glscene.org
Secondo me il meglio che puoi trovare per la grafica 3D (usa la libreria 
OpenGL) in Delphi.
-- 
Roal Zanazzi

Newsgroup: it.comp.lang.delphi
Titolo: [OT] Ng di Cantu' non va?

E' un mio problema o il ng di Cantu'
non funziona?

 non funziona?
Scusa avrei dovuto provare prima di scriverti .
Effettivamente non si riesce entrare.


è un tuo problema
comunque devi iscriverti prima

non funziona?
Tranquillo,
nella sezione Annunci MrCoke ha avvertito che ci sarebbero stati dei lavori
in questi giorni...
Ciao!
--
- Carlo -

"Carlo Bertuccini":
| >E' un mio problema o il ng di Cantu'
| >non funziona?
| Tranquillo,
| nella sezione Annunci MrCoke ha avvertito che ci sarebbero stati dei
lavori
| in questi giorni...
non lo sapevo, e' un'area che non frequento mai,
magari ci faro' un salto!
ciao, ci vediamo!
Alan

ho provato oggi e penso che l'abbiano riattivato.
a proposito perchč sull'NG di marco cantů rispondono quasi tutti da
incazzati ?
--
Gna...@Wappi.com
bmq...@tin.it
ICQ# 76488613
http://gnaffy.tripod.com/

incazzati ?
Chi? Non mi sembra...
--
- Carlo -

"Gna...@Wappi.com":
| a proposito perchè sull'NG di marco cantù rispondono quasi tutti da
| incazzati ?
Cosa???
Non dire str***ate!
stavo scherzando,;)
seriamente, perchè questa impressione?
(certo ci sarà sempre qualcuno che rompe,
ma questo non solo sui ng di Cantu'/ng in genere/internet)
Newsgroup: it.comp.lang.delphi
Titolo: incrementare la data di un anno

ciao,
ho in una DBEdit la data in formato gg/mm/aa. Ho bisogno di incrementarla di
un anno e visualizzarla in una DBEdit "Calcolata"....
ciao
Maurizio Manna
Webmaster 
www.f1grandprix.it

 un anno e visualizzarla in una DBEdit "Calcolata"....
Hai due strade: o aggiungi 365 al valore numerico corrispondente 
alla data, oppure decodifichi la data in giorno, mese, anno, aggiungi
1 all'anno e la ricodifichi.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

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


Occhio ai bisestili.

 ha scritto nel messaggio
news:ab5ifr$fgjgg$1...@ID-106993.news.dfncis.de...


 visto che il valore di default è un anno ma può anche essere di 2 o 3...
Se infatti si tratta di un errore, con durate uguali a 4 lo riscontrerai
sempre, propagando l'errore per ogni multiplo.
Ciao.
Gianluca

 è la data di un contratto quindi ha la durata di un anno solare...
Io comunque ho sempre visto prorogare contratti in base a date precise.
Quindi ti suggerisco di andare sul sicuro ed utilizzare qualcosa come:
procedure TForm1.Button1Click(Sender: TObject);
var
  D1, D2: TDate;
  Anno, Mese, Giorno: Word;
begin
  D1 := Date;
  DecodeDate(D1, Anno, Mese, Giorno);
  D2 := EncodeDate(Anno+1, Mese, Giorno);
  ShowMessageFmt('Da %s a %s', [DateToStr(D1), DateToStr(D2)]);
end;


 wrote in message
news:b81497c2cad84cd34d1...@mygate.mailgate.org...

Forse questa è + semplice da utilizzare:
function IncMonth(const Date: TDateTime; NumberOfMonths: Integer):
TDateTime;
Description
IncMonth returns the value of the Date parameter, incremented by
NumberOfMonths months.  NumberOfMonths can be negative, to return a date N
months previous.

 end;
Ciao, Sandro

 d2:=encodedate(anno+1,mese,giorno-1)+1 end;
Giustissimo, anche se, a questo punto, la soluzione di Gianandrea
mi sembra la migliore, usando un IncMonth si 12 mesi.

Newsgroup: it.comp.lang.delphi
Titolo: problema con tidmessage.savetofile

Ciao!
Ho qualche problema salvando un messaggio con indy.
Ecco la procedura legata ad un'azione di salvataggio:
procedure TForm1.salva_con_nomeAccept(Sender: TObject);
var tmsg:tidmessage;
begin
timer1.Enabled:=false;
setwait(true);
tmsg:=tidmessage.create(self);
try
if pop3.Retrieve(msglist.itemindex+1, tmsg) then
tmsg.SaveToFile(salva_con_nome.dialog.filename,false)
else showmessage('Impossibile scaricare il messaggio');
finally
tmsg.free;
Setwait(false);
timer1.Enabled:=true;
end;
end;
Questa procedura e' assegnata ad un'azione in una action-list.
Ho poi assegnato ad una voce di menu l'azione.
Quando seleziono la voce di menu il programma mi fa scegliere il file ma
poco dopo da' un errore, del tipo: error xxxx, read of address: xxx.
I numeri sono sempre diversi.
Ho provato anche su due computer diversi.
L'ultimo fatto strano e' che se nella form (quindi non a runtime) seleziono
la voce di menu' a cui dovrebbe essere legata l'azione mi apre l'evento
onclick invece di portarmi nell'action.
Grazie
Andrea

 onclick invece di portarmi nell'action.
controlla che all'onclick del menuitem non sia assegnato niente.
Puo darsi che tu inizialmente abbia assegnato qualcosa a quell'evento 
per poi associarvi la taction senza rimuovere il blocco associato 
all'onlick.
Bye
A

Newsgroup: it.comp.lang.delphi
Titolo: file esterno

Aiuto! come si lancia un file esterno con i parametri da dos?
Tostis
Vuoi entrare in Internet?
Compra un modem, non un Pentium 3!

Guarda ShellExecute o CreateProcess.
Ciao
Tostis <Tos...@Mike.com> wrote in message
84f6og$qjn$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.delphi
Titolo: help su DBLookupListBox

ciao
Ho appena icominciato ad usare i DB ed ho una domanda ..
var i:integer;
begin
for i:=0 to  ListBox1.Items.Count -1 do
ShowMessage(ListBox1.Items[i]);
ma se al posto di una ListBox ho un
DBLookupListBox come faccio?
ciao
erik

DBLookupListBox non č altro che una visualizzazione dei dati di un 
dataset ai fini di una selezione.
Per vedere i dati in una showmessage non ti serve.
Ergo:
   while not dataset.eof do
     begibn
     ShowMessage(Dataset.FieldByName('MyField').AsString);
     dataset.Next
     end;
bye
A
Newsgroup: it.comp.lang.delphi
Titolo: Aiuto !!!

Ciao a Tutti , io sono un principiancte ijn programmazione e sto cercando di
imparare il Delphi , ma ho gia molti problemi ...
Al momento sto cercando di fare un semplice Editor di testi , e ho utilizato
una Memo , sono ruscito a fare i botto ni per aprie un files per slavare e
per salvare con nome , ora volevo fare il Trova , ma non riesco a capire
come devo fare , come facccio a fare un afunzione o una procedura che mi
ricerchi una parola in un Memo e poi ci si fermi sopra evidenziandola ???
Cosa mi  devo studiare per bene ???
Avete consigli da darmi o eventuali esempi ???
Ringrazio Tutti .... bye bye Max.

> Al momento sto cercando di fare un semplice Editor di testi
Dai una guardatina ai programmi di esempio che ci sono nella cartella di
Delphi
se non ricordo male ci dovrebbe essere un editore di testi...
Ciao
Salvatore

Prima di tutto, benvenuto a bordo.
Rircorda che i titoli dei post devono essere descrittivi, in modo che
chi legge possa capire subito di cosa si parla senza
dover essere costretto ad aprire il messaggio.
Infine, se vedi nella guida in linea di delphi 
la proprieta lines del tmemo, puoi trovare qualcosa che
forse si avvicina alla soluzione del tuo problema.
Bye
AS
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.delphi
Titolo: Cerco Delphi 5 Pro Full

Cerc Delphi 5 Pro Full version a meno di 500.000 lire.
Sapete dove posso trovarlo ?
--
Cordialmente...
Fabio Dell'Aria.
E-mail: 
the...@inwind.it

 wrote in message
93ibnv$pnm$1...@nread1.inwind.it...

Forse dico una cacchiata, ma sulla rivista PCDirect di dicembre dicono che
ci sia Delphi 4 Full (non so se Sta,
Pro o C/S) a 30.0000, la consist vende la versione upgrade di D5 Pro a poco
piů di 500.000, piů o meno ci siamo....
Ciao
Simone

 Sapete dove posso trovarlo ?
non centra molto... ma sul sito della borland puoi scaricare la versione
Enterprise pienamente funzionante limitata solo nel tempo di utilizzo...
poi con un po' di ricerche sul web il limite si puo' anche togliere eheh
byeeez

 ha scritto nel messaggio
news:93kg36$a8...@news.edisons.net...

Newsgroup: it.comp.lang.delphi
Titolo: Aiuto file danneggiato !

Ciao ragazzi !
Con l'auto di un amico ...
ho scaricato da sito Borland Delphi 7
ho deciso di provare la versione Trial
... approfittando anche di quel link
dove c'è il "libro" in inglese su Delphi 6
(grazie ancora)
http://safariexamples.informit.com/0672321157/Ebooks
Durante l'installazione mi sono imbattuto
in un errore ... mi dice che il file :
--> delphipro70.bpl
e corrotto !! ... ho continuato con l'instal.
(ho selezionato "ignora") ...
Ho avviato Delphi 7 e mi son venuti fuori alcuni
msg riguardo questo file ...
dopo un pò ... non mi veniva notificato + niente !
(devo dire stranamente)
Dato che non ho la benchè minima intenzione di
ri-scaricare il pacchetto ...
Mi inviereste il file via e-mail ?
A cosa serve questo file ? ... è importante ?
(penso di SI ! :-( ... )
Grazie ancora per l'aiuto.
Luca
vin...@libero.it
--------------------------------
Inviato via 
http://usenet.libero.it

 
vin...@libero.it
sei sicuro che funziona questo indirizzo, ho provato a spedirti delle mails 
e mi sono tutte tornate indietro ;)
ciao


certo che funziona !
magari prova a spedirla dal mio sito ...
http://digilander.libero.it/vintage



Certo che funziona ! ...
anzi ... funziona fin troppo bene ! ...
Da quando sono ritornato a postare su un NG
sono stato re-invaso dallo Spam + assillante ! :-(
Ciao
Luca


 sono stato re-invaso dallo Spam + assillante ! :-(
si si ti ho spedito la mail, forse mi tornavano indietro xchè era piena la 
casella.
Se vuoi un consiglio non mettere l'indirizzo in chiaro, per la bpl come ti 
ho detto per mails se hai pazienza in serata vedo di mandartela.
Ciao

Newsgroup: it.comp.lang.delphi
Titolo: [D5Ent]Interbase + SQL Script: Problema nella creazione di un DB

Salve a tutti,
Ho la necessità di creare un database tramite script SQL.
Ho pensato quindi di utilizzare il componente IBScript a corredo con Delphi
5 Ent.
Lo script che ho costruito funziona in maniera corretta se lo lancio da
IBConsole, mentre se ci
provo con IBScript ottengo l'errore:
Access violation at address zzzxxxxyyyy in module "gds32.dll". Read of
address 000000A8
Qualche idea sul significato?
Ho visto, dai sorgenti, che i componenti tipo IBSecurityService, fanno una
serie di chiamate
alle API di Interbase per connettersi al "service_mgr".
E' necessario ricreare lo stesso comportamento per risolvere il problema di
cui sopra?
Devo riccorrere a "ISQL"?
Grazie per il Vs aiuto
Saluti,
Carmine

 ha scritto nel messaggio
news:kIrnb.366014$R32.12...@news2.tin.it...


 In ogni caso aggiorna IBX alla versione 5.04...
Dici che passando alla 5.04 risolvo?
Grazie per l'aiuto
Saluti

Ciao Marco,
Ho aggiornato alla 5.04 come consigliato da te.
Sono riuscito a far funzionare lo script, e da quello che ho capito, non
dipende dalla versione. :)
Eseguendo passo-passo, ho notato che il "carissimo" componente TIBScript,
non effettua
controlli sulle istanze del database e della transaction di default.
E, indovina, io non avevo assegnato un database ed una transaction al
"carissimo".
Risultato, si limitava a spararmi una Exception a runtime piuttosto
generica.
Mah...andiamo avanti....
Saluti
Newsgroup: it.comp.lang.delphi
Titolo: Controllo Range

Chi mi sa dire se c'è un modo di controllare il range per  Interi?
gli integer si suddividono  in
Shortint, Smallint, Longint, Int64, Byte, Word, and Longword.
devo controllare se il valore inserito non ecceda il range per il tipo di
dato.
Grazie Marco

 dato.
La funzione High, usata su un intero, ritorna il valore piů alto assegnabile
alla varaiabile, quindi il valore piů alto del tipo.
var A : byte;
    high(A)   --> ritorna 255
Ciao, Davide DG

Newsgroup: it.comp.lang.delphi
Titolo: Urgente: Grosso guaio con ADOQuery e ADOConnection





Salve Ragazzi .. sono disperato,


  ho fatto una semplice query (di tipo INSERT 
.. SELECT), l'ho messa dentro un ADOQuery ed ho eseguito.


 


Al primo tentativo con una tabella di 40.000 record 
tutto a posto


Al secondo tentativo con una tabella di 210.000 
record mi viene fuori un messaggio: Istruzione INSERT troppo grande provare 
con meno record.


 


Eseguo la stessa query in Access tutto a 
posto


 


Mi chiedo???


1) E' un problema di ADO;


2) E' un'opzione di ADOQuery


3) E' un problema di Delphi 5???


 


Ragazzi aiutatemi .. sono disperato


 


P.S: mi piacerebbe sapere se qualcuno sa se esiste 
una istruzione che attiva il wizard per la creazione della ConnectionString di 
Delphi. Cioè posso far comparire a runtime quella finestra per creare la 
ConnectionString o debbo crearla io da codice???



 runtime quella finestra per creare la ConnectionString o debbo crearla io
da codice???
EditConnectionString(ADOConnection1)
Ciao

 attiva il wizard per la creazione della ConnectionString di Delphi. Cioè



è in una delle unit
OLEDB, DBLogDlg, AdoConEd
ne trovi un esempio nei demo di delphi, per la precisione in ADOTest.dpr 

 
  ha scritto nel messaggio 
news:Xu34g.99337$PR2.1...@twister2.libero.it
...






A parte che la query viene creata automaticamente 
dal programma a seguito di alcune associazioni..


Comunque la query è sempre del tipo:


 


INSERT INTO <TableDest>


(<Field1>, <Field2>, ... 
<Fieldn>)


SELECT <Field1>, <Field2>... 
<Fieldn>


FROM <TableSource> IN 
"PercorsoFisico"


 


Un primo esempio ha funzionato alla grande, ma il 
secondo esempio mi ha detto query troppo grande, provare con meno 
record


 


ciao




La mia esperienza mi dice che il problema č quello che ti ho segnalato poi
vedi tu, certo che cercare campo per campo quelo che genera il problema e
perchč, č una gran rottura .....
Potresti anche provare a togliere nella tabella destinazione il fatto che i
campi siano necessari o meno e che possano assumere valore 0
Ciao

 ha scritto nel messaggio
news:e2sf8a$am$1...@nnrp-beta.newsland.it...


 ConnectionString o debbo crearla io da codice???
uses ADODB;
function TMyForm.BuildConnectionString : String;
begin
   Result := PromptADODDataSource( Handle );
end;
Aggiusta questo in un form e sei a posto.
Non sono ipercertissimo che si chiami PromptAdoDataSource, ma č
sicuramente su quella falsariga.
Ciao,
Andrea
Newsgroup: it.comp.lang.delphi
Titolo: fastidioso problema con Dll

Ciao a tutti,
arrivo al mio problema: ho creato una mia piccola applicazione
formata da un eseguibile ed un paio di Dll.
All'interno delle Dll sono contenuti alcuni Form con relativa
gestione (semplici gestioni di db).
All'interno del mio eseguibile richiamo una funzione esportata
dalle Dll che mi permette di visualizzare il Form a video
(il Form è visualizzato con il classico ShowModal).
Fin qui tutto bene, il problema arriva quando chiudo
la finestra modale. Nel momento il cui la chiudo
la finestra principale sottostante viene minimizzata.
Qualche idea riguardo il motivo di questo a mio
avviso strano comportamento??
Grazie del sempre generoso supporto.
Dimenticavo: buone feste a tutti.
Mi auguro che il 2004 porti molto lavoro
e molti soldi per tutti!!!!!!:-)
Stefano.

 e molti soldi per tutti!!!!!!:-)
e un Grazie grande come una casa a Parmalat :-(
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 1 Standard ==> Delphi 5 Professional

Salve ragazzi,
Quancuno di voi sa sia possibile acquistare delphi 5 professional
upgrade avendo delphi 1 standard (preso da ioprogrammo) ? Ho chiesto
alla Borland (Inprise) ma nessuna risposta.
Grazie.
--
Massimo
l.sky...@iname.com
------------------------
Che la forza sia con te!
------------------------

 alla Borland (Inprise) ma nessuna risposta.
Si, perché stanno ancora ridendo!


Si, perché stanno ancora ridendo!
E' il tuo modo simpatico per dire che non si puo' fare ?
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
---------------------------------------------
#exclude <windows.h>

Si', si puo' fare. Io l'ho chiesto alla Inprise Italia e ben lungi dal
ridere mi hanno cortesemente risposto che era possibilissimo. La versione
Upgrade (o Competitive Upgrade, non ricordo se si chiama ancora cosi' il
programma di offerta) non richiede alcun tool Borland installato, una
versione completa di Delphi X puo' essere richiesta dal rivenditore al
momento dell'ordine, e' una sorta di controllo, che chiaramente non viene
mai fatto.
Quindi vai pure tranquillo :) e goditi il notevole risparmio!


Quindi vai pure tranquillo :) e goditi il notevole risparmio!
Il prezzo dell'upgrade quant'e' ? 



ODDIO! L'ho comprato qualche mese fa ma proprio non me lo ricordo... aspetta,
deve essere introno alle 700.000 (intorno = forse di meno, probabilmente di
piu'). Comunque ricordo che il risparmio e' notevolissimo.
Newsgroup: it.comp.lang.delphi
Titolo: gestire uscite scheda audio

ho una scheda audio 5.1; devo riuscire a mandare su ogni satellite un 
segnale diverso,da un tmediaplayer diverso. c'è qualche modo 
x "scegliere" un uscita audio da delphi???
--- posted by geoForum on 
http://www.delphiedintorni.it

x "scegliere" un uscita audio da delphi???
Teoricamente dovresti prendere la typelibrary del driver che pilota la scheda
audio (dovrebbero fornirti un SDK per la scheda audio, se questa e'
sufficientemente professionale).
Fatto questo, dovresi poter vedere i metodi esportati dalle dll che pilotano
la scheda e agire su di essi. Senza un SDK la vedo molto molto dura, per
quanto ne so.
Ciao
-- 
Morde. 
Una radio seria da ascoltare al lavoro?
http://www.radiomontecarlo.net
 e clicca
su RMC Live !


grazie! ma credo di aver risolto il problema xke ho trovato una scheda 
audio professionale(mi dicono usata anke nelle sale di registrazione) 
che possiede 8 canali settabili in uscita o in ingresso o con tutto il 
software disponibile x farlo. 
grazie ancora!!


Newsgroup: it.comp.lang.delphi
Titolo: il quadratino presente nell'object inspector a sinistra della property Font

è un componente? non mi sembra di trovarlo nella palette.
 
come si chiama?
 
Grazie.
 
Ciao.

 è un componente? non mi sembra di trovarlo nella palette.
 
Che intendi, il +/- ?
 


 
Si, Grazie.

 Si, Grazie.
 
Non ho capito che cosa vuoi fare esattamente. Vuoi avere qualcosa nella tua applicazione come l'Object Inspector? O semplicemente replicare l'effetto expand/collapse della proprieta` Font?
 


 
Semplicemente una cosa simile al quadratino con dentro il + o il - che 
cambia al click del mouse.
 
Inutile riscriverlo se c'è già pronto.
 
Grazie.
 

 cambia al click del mouse.
 
Puoi partire da un TGraphicControl e fartene uno. E` banale. Dovrebbe possedere due eventi OnExpand e OnCollapse a cui agganciare il codice client.

 Inutile riscriverlo se c'è già pronto.
 
Giusto. :)
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
#Home: 
http://bit.ly/marcobreveglieri
 
#Blog: 
http://bit.ly/compilaquindiva

Newsgroup: it.comp.lang.delphi
Titolo: immagini in DB access

Ciao a tutti,
ho un database access con un campo Foto (oggettoOle) dove sono memorizzate
delle immagini prese da file BMP. Ho provato con delphi a collegarmi al
database ma mi dice che il tipo quelle immagini dentro il database non sono
valide BMP.
Sapreste aiutarmi
grazie in anticipo
Stefano


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

 informazioni memorizzate.
Ho trovato questo esempio, ha a che fare coi Jpeg ma credo sia calzante...
http://delphi.about.com/library/weekly/aa030601a.htm
ciao, Vittorio
Newsgroup: it.comp.lang.delphi
Titolo: Help

Salve,
credo già di aver postato un messaggio simile.
Cerco informazioni su https.
Mi spiego, devo realizzare una connessione da delphi lato client su un
server dove c'è una cgi. Il protocollo che devo usare è l'HTTPS. Alla CGI
devo mandare un valore stringa e devo attendere che questo mi torni dei
valori.
Non so da dove partire, che componenti devo usare (uso D6).
Grazie mille,
         Marco
-- 
Posted from  [212.177.57.193] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

         Marco
non conosco specificatamente componenti cosi a memoria ma magari dai
un'occhiata in rete, fai una ricerca, cmq ti consiglio di visionare
pure la/e RFC sull'https.
--
Rhymes
--------------------------
rhy...@myself.com
http://www.foxhound-games.it
http://embyte.mascanc.net
--------------------------
Linux User #219707

 wrote in message
news:b234adee0fb08906e30...@mygate.mailgate.org...


Newsgroup: it.comp.lang.delphi
Titolo: Utility per Delphi

Ciao a tutti.
Sto cercando, se esiste, una qualche utility per Delphi che mi permetta di 
"gestire" il codice spostando in maniera automatizzata le varie 
procedure/funzioni/metodi, ecc.... Idealmente, per chi conosce ad esempio il 
VbMaximizer, dovrebbe riuscire a mostrarmi un elenco di tutte le e 
permettermi di riordinarle, modificando in automatico il sorgente.
Attualmente uso sia i GExperts che Castalia ma, a meno che non mi sia 
sfuggito qualcosa, a parte la possibilità di vedere l'elenco delle procedure 
di una unit, non mi sembra permettano di fare altro.
Gianluca. 

di una unit, non mi sembra permettano di fare altro.
quello che chiedi mi sembra sia il refactoring, che e' stato implementato dal
Delphi 8 in su...
Ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 Delphi 8 in su...
Se ti riferisci alle funzionalità di "refactoring" incorporate in 
Delphi, credo siano disponibili solo in Delphi 2005, ma non c'è nulla 
che assomigli a quanto richiesto.
Potrebbe essere comunque una buona idea da proporre...pensandoci bene, 
mi capita spesso di dover spostare verso l'alto o verso il basso metodi 
all'interno della sezione *implementation* della unit.
Ciao! :-)
-- 
Marco «Alka» Breveglieri
  (marco [@] abls [.] it)
  ABLS Team S.n.c. - Software & Web
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

che assomigli a quanto richiesto.
Effettivamente avendo D6 non mi ricordavo la demo sul refactoring che postasti
proprio tu a quale versione si riferisse :-)
Si,effettivametme l'OP ha chiesto effettivamente come spostare i metodi su e
giu', non tanto come fare refactoring enucleando porzioni di codice in
funzioni atomiche.
P.S.
(azz... da come scrivo stamane oggi devo stare attento al codice... potrebbe
"esplodermi" nel compilatore!)
 :-D


 "esplodermi" nel compilatore!)
LOLLLLL!!!
	Marco
Newsgroup: it.comp.lang.delphi
Titolo: ordine di esecuzione delle condizione nell' IF

Ho cercato nella guida dell'Object Pascal ma ho trovato solo una lunga
digressione sugli annidamenti degli else con gli if...
Vorrei sapere se, a fronte di una if con piu' condizioni, il compilatore a
runtime eseguira' i confronti in modo "intelligente" interrompendosi alla
prima condizione necessaria per invalidare l'if (o viceversa)
E' piu' facile spiegandosi con un codice:
if (condizione1) AND (condizione2) AND (condizione3) then begin....
in questo caso, se condizione1 e' falsa, l'esecuzione del programma salta
direttamente il test di condizione2 e condizione3 ??
if (condizione1) OR (condizione2) OR (condizione3) then begin....
Se condizione1 e' vera, il programma entrera' subito nel begin oppure
eseguira' tutti i confronti ??
-- 
Morde. 
(
mo...@despammed.com
)

 prima condizione necessaria per invalidare l'if (o viceversa)
Dipende tutto da questa direttiva di compilazione:
Complete boolean eval
Evaluates every piece of an expression in Boolean terms, regardless of
whether the result of an operand evaluates as false. Corresponds to {$B}.
Se la spunti allora vengono eseguiti tutti i confronti altrimenti appena è
chiaro il risultato si salta subito al begin (o all'end).
Ciao
Giorgio

whether the result of an operand evaluates as false. Corresponds to {$B}.
Grazie sei un mito !
Domani controllo!
Ciao!
-- 
Morde. 
(
mo...@despammed.com
)

 if (condizione1) OR (condizione2) OR (condizione3) then begin....
si interrompe subito se condizione1 è True
Con la direttiva {$B+} viene forzata la valutazione di tutta l'espressione 
logica
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

 Domani controllo!
Se posso, in generale non è mai bello dipendere da queste cose: basta che ai
programmatori del compilatore un giorno giri male e puff! il tuo programma
non gira più :)
Almeno, questo è quello che mi è stato insegnato a Programmazione I, uno
degli unici due esami che ho passato ;)
--
Jax
====
Quando imparerai a fregartene della gente, solo allora sarai grande.
Newsgroup: it.comp.lang.delphi
Titolo: Creare runtime tabella in un file di access e, se possibile, anche lo stesso file MDB!!

Ho necessità di esportare dei dati in un file MDB.
Come posso creare il file MDB e anche le tabelle al suo interno??
Grazie
B.

Come posso creare il file MDB e anche le tabelle al suo interno??
Ho trovato 3 possibili vie:
******************************************************************************
(fonte su 
http://tinyurl.com/sja3
)
importa l'adox type library.
uses ADOX;
var
   ADOXCataolog:TCatalog;
begin
ADOXCataolog:=TCatalog(nil);
try
   ADOXCatalog.Create1('Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=new.mdb');
finally
  ADOXCataolog.free;
end;
*****************************************************************************
OPPURE (fonte su: 
http://tinyurl.com/sj9t
)
var access : Variant;
access := CreateOleObject('DAO.DBEngine.35');
access.CreateDatabase(FileName, ';LANGID=0x0409;CP=' + IntToStr(GetACP()) +
';COUNTRY=0', 0);
access := UnAssigned;
If you want to create a dtabase with MS Access 2000 format, just use 36
instead 35 in CreateOLEObject command.
*****************************************************************************
Questo e' un esempio completo di creazione db e tabelle al suo interno usando
l'adox.
http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=15292
****************************************************************************
Ricordati che na volta creato l'mdb, agire sulla sua struttura per creare le
tabelle e' abbastanza semplice. Cerca sui google groups "delphi create mdb
runtime" se vuoi approfondire.
Partecipa al ng attivamente, una mano in piu' fa sempre piacere.
;)
-- 
Morde. 
(morde at programmer dot net)


****************************************************************************
**
Grazie!!
Penso di usare le ADOX...
Ciao e grazie ancora