mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Intercettare Sender in evento OnCreate di un form

Ciao a tutti,
forse è una domanda stupida però io non capisco come funzioni la cosa...
Per creare un form normalmente eseguo l'operazione
begin
  Form1 := TForm1.Create(nil);
  Form1.Show;
end;
passando "nil" come default. Se però io volessi passare anzichè "nil" un
valore che mi distingua il chiamante come faccio?
Un saluto,
Dario
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Form1 := TForm1.Create(SELF)
AS

 valore che mi distingua il chiamante come faccio?
Puoi passare /Self/ come identificatore dell'istanza della classe dalla 
quale viene eseguita la creazione del form secondario, anche se occorre 
tenere conto che il suo passaggio al metodo costruttore Create ha un 
preciso significato: il tuo oggetto diviene "owner" del componente (un 
form, in questo caso) che crei.
Se il tuo solo scopo è quello di definire un "chiamante", puoi sempre 
introdurre nel form secondario un metodo che accetti un riferimento al 
chiamante, appunto, e lo memorizzi in un campo privato per un utilizzo 
successivo.
Eventualmente, invece di utilizzare l'evento /OnCreate/, potresti 
pensare di spostare in quel metodo tutte le istruzioni che fanno uso del 
"chiamante" passato come parametro.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Newsgroup: it.comp.lang.delphi
Titolo: drop TDBLookupComboBox da 1 posizione

salve a tutto il NG
ho il seguente problema:
in una mia applicazione uso un componente
TDBLookupComboBox
dove i dati per il  menu a tendina vengono forniti da una  tabella
tipo ID,NOME
L'ID fa da campo chiave per
referenziare in un'altra tabella.
Il problema è che la tendina è di 1a sola posizione
qunado la proprieta  DROPDOWNROWS  è settata a 7
?????????????
ringrazio anticipatamente per l'attenzione prestatami


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

x caso usi gli ibx?
A.

yes!


Newsgroup: it.comp.lang.delphi
Titolo: Aiuto Autocad ( dwg )

Salve a Tutta loa ML, ho il seguente problema devo creare un piccolo
eseguibile che tracciate delle linee o cerchi mi permetta di salvare tale
file in formato dwg o dxf .
Ho anche la necessità di caricarlo il file dwg o dxf ( non devo creare cose
complicatissime,per ora ); io ho già fatto una ricerca sun NG e mi sono
scaricato le librerie di 
opendwg.org
 ma non riesco molto ad integrarmi
 nonb ci capisco molto ) .
Allora chiedevo cortesemente se altri si erano inbattuti in casi come questo
e se possibile potermi aiutare facendomi qualche piccolo esempio o dandomi
qualche dritta in più per creare questa piccola applicazione.
Grazie per aiuto dato !
                                                              Ciao Damiano !

due o tre anni fa avevo lo stesso problema e ho trovato una demo completa di
sorgenti su Super Page o su Torry non ricordo bene
www.torry.net
http://sunsite.icm.edu.pl/delphi/
Ciao
Mik

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 2006 e FuzzyReport

Scusate se è OT.
Ho scaricato la versione demo di delphi 2006.
a non riesco ad installare il Fuzzy report.
Voi avete gia fatto le prove ?
Ciao

 Voi avete gia fatto le prove ?
In che senso "non riesci"?
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 ha scritto nel messaggio
news:43d4a...@newsgate.x-privat.org...


 mi da errore nella compilazione [...]
Quale errore ti dà? Cavolo, scrivi tutto! :-)
Molto probabilmente, si tratta di definire la costante di compilazione 
condizionale adatta all'uso con Delphi2006, rappresentato da un diverso 
numero di versione.
Prova a modificare il file FR_VERS.INC aggiungendo questa definizione:
{$IFDEF VER180} 	     // Delphi 2006
{$DEFINE Delphi4}
{$DEFINE Delphi5}
{$DEFINE Delphi6}
{$DEFINE BDS2005}
{$DEFINE BDS2006}
{$DEFINE NO_QR}
{$DEFINE OK_JPEG}
{$ENDIF}
nel punto in cui sono elencate tutte le definizioni di costanti per le 
varie versioni di Delphi.
Ciao,
   Marco.

Newsgroup: it.comp.lang.delphi
Titolo: TreeView con colonne

Qualcuno sa consigliarmi un componente FREE o un "trick" che mi aiuti a
realizzare un TreeView MultiColumn?
Grazie mille, 
Dario
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 realizzare un TreeView MultiColumn?
http://www.soft-gems.net/VirtualTreeview/VT.php
-- 
Lis
Il mio sito: 
http://lis.altervista.org
FAQ di it.comp.lang.delphi: 
http://snipurl.com/faq_icld
Non permettete alla lingua di oltrepassare il pensiero (A.Checov)

 wrote in message
news:43xewvirfwub$.dlg@lis.lis.lis
Mmm... qualcos'altro di meno incasinato no, eh? ;)
Grazie Lis, provo a vedere se riesco ad utilizzarlo.
Ciao


 Mmm... qualcos'altro di meno incasinato no, eh? ;)
Capisco che, ad una prima occhiata, può sembrare "incasinato", ma è un
componente ottimo.  E poi io sono dell'idea che bisogna impegnarsi a
studiare e capire come funzionano le cose ;)
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Guarda sinceramente dopo aver letto il tutorial l'ho trovato molto 
semplice.
--- posted by geoForum on 
http://www.delphiedintorni.it

 componente ottimo.  
Confermo...a prima vista può spaventare, però è molto molto comodo e potente
-- 
Lis
Il mio sito: 
http://lis.altervista.org
FAQ di it.comp.lang.delphi: 
http://snipurl.com/faq_icld
Capisco perchè i Dieci Comandamenti sono tanto chiari e privi di ambiguità:
non furono redatti da un'assemblea (Konrad Adenauer)

Newsgroup: it.comp.lang.delphi
Titolo: Problemozzo con TDBGrid!!!

Ciao a tutti!!
Ecco il problema:
Ho una TDBGrid, fin qui niente di strano... :)
Pero' se mentre ha il focus premo il tasto ESC mi cancella il record 
corrente!!!! ORRORE!!!!!!
Qualcuno gentilmente sa dirmi come evitarlo???
Grazie 1000!!
Leo
-- 
Posted from 212.177.1.159 by way of 
smtp1.libero.it
 [193.70.192.51] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 evitarlo??? Grazie 1000!! Leo
soluzione schifosa:
nell'evento OnKeyDown
if key=VK_ESCAPE then Abort;
bleah :PP... cmq dovrebbe andare ;)
soluzione fighetta:
erediti da TDBGrid e fai l'override del... KeyDown (penso)
Ciao,
Alan Solo

Mmmhh... preferisco la soluzione che tu chiami "bleah"... magari è molto
meno accademica, ma sicuramente + immediata! (e adesso mi odierete tutti!)
Cmq la provo domani, adesso non riesco + a connettere.
Ciao e grazie ancora!
Leo
-- 
Posted from 
smtp1.libero.it
 [193.70.192.51] 


 ha scritto nel messaggio
news:G6LBQS$Ier6pKfyW13_2sGRLcOyNQ...@libero.it...


Scusa, rileggendo il tuo quesito credo di non aver capito bene il tuo
problema. Se premi esc mentre DBGrid ha il focus cancella *qualsiasi* record
su cui sei posizionato o solo l'ultimo?
Nel primo caso non saprei (segui il consiglio di Alan...) nel secondo
dovrebbe funzionare quanto detto da me prima...
Ariciao  :-)
Silvio Pietrosanti
Newsgroup: it.comp.lang.delphi
Titolo: [d5][win seven] info su delphi 5 + seven

ciao a tutti, ho provato a installare delphi 5 + tutte le varie librerie 
(devexpress,ecc.) confermo che su seven funziona tutto come si vista, per� 
bisogna lanciare setup in modalit� compatibile xp e usare come cartella una 
cosa tipo c:\applicazioni\bla bla bla
Simone 

Grazie, Simone.
Queste info sono utili.
Ma a parte delphi in se, le applicazioni come si comportano?
Hai notato anomalie?
E, dulcis in fundo, win7 e' stabile o scoppia appena pensi di muovere
il mouse?
A.

 ha scritto nel messaggio 
news:a1096113-cb9e-47c2...@d5g2000yqm.googlegroups.com...


beh per quel che mi riguarda:
- ho un notebook con vista e sopra da qualche anno suo d3,d5,d6 senza 
problemi e le applicazioni lavorano correttamente (ovvio che quelle "vecchio 
stampo" dove fanno riferimento a parti di registro o a cartelle tipo c:\ 
bisogna lanciarle in modalit� amministratore)
-ho anche un netbook di lg (quelli che la 3 dava facendo abbonamento dati) 
era nato con vista e gli ho montato seven in versione beta ultimate (non lho 
ancora comprato)...
direi che � molto pi� veloce rispetto a quando c'era vista installato... ci 
sono molti click in meno rispetto a vista su cose usate comunemente, ci sono 
pure features per il posizionamento di finestre (se "sbatti" la finestra sul 
lato destro o sinistro automaticamente si allinea automaticamente)
inoltre le applicazioni delphi funzionano velocemente e normalmente...
io lanciando da cd originale di d5 mi ha dato un errore su registrazione dll 
e non mi compilava, rifatto installazione come winxp compatibile ha 
funzionato senza problemi
ho notato che su windows seven � presente anche un sistema che ti verifica 
compatibilit� eseguibile e automaticamente si imposta i permessi
Simo
Newsgroup: it.comp.lang.delphi
Titolo: Come cancellare in un textfile ?

Ho creato un textfile e lo voglio gestire come con il Pascal Classico,
usando write, read e funzioni varie. Come posso fare per editare una stringa
all'interno di questo file ?
Il file č fatto in questo modo:
1  234 324  545 765 25    54   564 765
2 475  5      12    254 124 245 456 678
 ...
...
...
e cosě via...io devo fare in modo che un evento mi aggiorni solo gli ultimi
4 numeri di una riga....c'č un modo per cancellarli ? a quel punto potrei
riscriverli...altrimenti se non li cancellassi e ci andassi a riscrivere
sopra (se fosse possibile, non lo so) potrebbe capitare che uno spazio
capiti sopra ad un numero vecchio facendo un casino (nel senso che i numeri
hanno lunghezza varibile...);

 hanno lunghezza varibile...);
beh... potresti leggerti una riga in una string... e lavorare con quella...
quando hai finito la riscrivi nel file!
anzi... se il file non č troppo lungo puoi anche caricarlo in un tstringlist
e usare i metodi
insert add delete eccc....
Ciao!! Davide DG

non ho ben capito quello che vuoi fare, ma il comando 
Delete(var AString:string;From,To:integer)
sembra quello che cerchi.
Ciao
Duilio

ho fatto due funzioni per fare "circa" quello che chiedi con delphi :))
(comunque non funzionerebbero perché rilevano il formato dato = valore)
dovresti caricare ogni singola riga in memoria (in una variabile)
cercare il valore da modificare e sostituirlo, c'è la funzione copy (non
ricordo le atre)
x modificare la stringa ecc...
in bocca al lupo !!
--
Callegaro Luca
EMail        : Luca_D...@Libero.It
ICQ          : 15825215
Active List : 72728232   UT ITALY

 x modificare la stringa ecc...
premesso che ne so poco di Delphi, queste me le ricordo (le funzioni per le
stringhe) dato che le ho studiate a scuola. :-)))
varsottostringa : = Copy (<stringa da cui copiare>,<pos di partenza>,<n° di
caratteri da copiare>);
Delete (<strdacuicancellare>,<posdipartenza>,<N°dicaratteridacancellare>);
insert (<strdainserire>,<strincuiinserire>,<posdipartenza>);
posizione : = pos(<sottostringadacercare>,<stringaincuicercare>);
CIAO spero di esserti stato di aiuto
-----------------------------------------------------------------
I'm Mr. Bad Guy,
Yes I'm everybody's Mr. Bad Guy.
Can't you see I'm Mr. Mercury
Oh, spread your wings and fly away with me....
(Freddie Mercury: 5/9/1946 - 24/11/1991)

Newsgroup: it.comp.lang.delphi
Titolo: Chi conosce...

Qualcuno conosce qualche sito dove si possono scaricare delle buone
guide di delphi6 in italiano e gratuite !Rispondetemi ciauz!!
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 guide di delphi6 in italiano e gratuite !Rispondetemi ciauz!!
Se non ricordo male c'è una guida in italiano su
http://programmazione.html.it
Ciao,
Luca.

"grazie!!

Newsgroup: it.comp.lang.delphi
Titolo: motion detection

Ciao a tutti avrei bisongo se esiste di qualche componente(Delphi 6,4)
che sia in grado di stabilire il grado di similitudine di due immagini
attraverso il motion detection? Ho provato a guardrmi intorno ma
niente; inoltre ho capito che è una cosa molto complicata e
sinceramente non riesco a venirne a capo. Sarò grato a chi di voi guru
riuscirà a darmi qualche dritta a riguardo anche con dispense
informative o quantaltro.
Ciao e grazie in anticipo

 ha scritto nel messaggio
news:eae5f7a6.02042...@posting.google.com...

Io non posso aiutarti, ma credo che potresti chiedere al mitico Uberto Barbini sul ng di
Marco Cantù (non chiedermi altro perché non mi ricordo più neanche l'indirizzo).
--
Jax

 wrote in message
news:eae5f7a6.02042...@posting.google.com...

-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

...


Se ti puņ essere di aiuto, la Intel ha realizzato delle librerie che si
occupano proprio di questo. Possono essere scaricate gratuitamente. Per
quanto ricguarda il motion detection e comunque la manipolazione in tempo
reale di flussi video su uno o due numeri di una rivista informatica tipo
IoProgrammo, Dev o Computer Programming (non ricordo) ne hanno parlato.
Non le ho ancora utilizzate ma da quello che la documentazione riporta,
hanno molte funzioni implementate e lavorano in collaborazione con le
librerie per la manipolazione di immagini sempre della Intel.
Trovi tutto sul sito.
Ciao.
Carlo
Newsgroup: it.comp.lang.delphi
Titolo: Qreport

Sto realizzando una applicazione che ha come finalità la stampa di alcuni
dati su dei fogli prestampati, così ho creato un Db con interbase e l'ho
collegato con dei DBedit, alla tabella ho collegato i QRDBtext che ho
posizionato su un Qreport, ho posizionato anche un pulsante per la previw
del qreport
Il programma viene compilato senza problemi, nessun problema
nell'inserimento dati nel Db, ma nella preview di stampa non appare niente
!!!!
Non so più dove sbattere la testa perchè tutti i componenti sono collegati
bene fra loro e quindi sono giunto alla conclusione che:
1- sono rimbambito
2- non è possibile creare un applicazione
3- ho fatto qualche piccolo errore
4- il programma funziona correttamente, ma per tutte le parolacce che ho
detto nel capire il problema, adesso devo pagare !!!ù
Vi prego aiutatemi numerosi
[Dr]Frag

 ha scritto nel messaggio
news:MHwoa.53422$DT4.1...@twister1.libero.it...

Credo che la risposta sia il punto 3.....
hai aggiunto le famose bande in cui viene composto un QuickReport?
Hai aperto la tabella quando fai in preview?
vedi un po' gli esempi di QR sotto la cartella di delphi...ce ne sono di
interessanti...
ciao
AleZ


Allora la Tabella è sempre aperta quindi escludo la pima ipotesi, poi se non
sbaglio se non metto nessuna delle famose bande delphi mi dovrebbe
visualizzare solo il 1° Record... o sbaglio

 
Premesso che uso il QR1.1 e magari non tutto è uguale nelle versioni 
successive, due cose:
Nel'oggetto quickreport hai impostato il datasource
Nelle bande hai selezionato il tipo (esempio: detail)
ciao
-- 
---------------------------------------
Per rispondere in privato togliere 1975

 immessi nella tabella invece a me servirebbero solo il 1° record
Manda la table associata già filtrata o meglio una query
Ciao

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

Possibile che un ambiente di sviluppo come Delphi 6/7 non da la possibilità
di impostare ai componenti visuali(TEdit, TButton...) la proprietà in
oggetto per la libreria CLX?
Qualcuno ne sa qualcosa?
Grazie

Grazie
	Ciao
	MassimoB
 
---------------------------
http:\\
www.massimobeschi.it

Newsgroup: it.comp.lang.delphi
Titolo: fsUnderline[parola]

Ciao a tutti
Ho fatto qualche prova ma non ho un'idea precisa di come poter fare.
In un componente simile al RichEdit,avente la proprietà"SelAttributes",
all'evento onChange dovrei verificare la presenza i questo simbolo '#' e
rendere "UnderLine" tutta la parola iniziando dal simbolo '#' fino al primo
spazio
e questo naturalmente per tutte le parole che ci sono nel testo.
qualcuno sà aiutarmi?
grazie
erik

 ha scritto nel messaggio
news:Aowya.211384$K35.5...@news2.tin.it...


 Simo
Si in effetti avevo provato qualcosa del genere cmq il mio principale
problema č:
come faccio a trovare tutte le parole che contengono il sibolo '#' e
selezionarle da '#' fino al primo spazio che incontro?
bye
erik

 ha scritto nel messaggio
news:xmIya.214121$K35.5...@news2.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: treeview item e subitem sclero

Scusate non ho tanto chiaro l'uso della treeview e quindi:
o un file di testo dove ho un elenco di prodotti
alcuni sono categorie di altri
e cosě via fino ad un massimo di 9 sottocategorie (da 0 a 9)
Es.:
1 Ortaggi (macrocategoria di:
		2 legumi idmacro 1 (macrocategoria di:
				3 fagioli idmacro 2
				4 piselli idmacro 2
		5 patate idmacro 1
6 frutta  (macrocategoria di:
		7 lamponi idmacro 6
8 scatolame						
tutti i prodotti indistintamente hanno un codice progressivo che va da 1 
a 8 e per legare le sottocategorie alle giuste macrocategorie (anche a 
sua volta alcune macrocategorie sono sottocategorie di macrocategorie) 
attraverso  idmacro.
Problema come rappresento il tutto in una treeview considerato che:
1. non posso usare null'altro che un file di testo
2. necessariamente il modello di configurazione deve rimanere questo
Io sono arrivato ad associare correttamente ortaggi -> legumi
							patate
					    frutta  ->  lamponi
ma legumi -> fagioli
	     piselli
non sono riuscito a legarli.
Qualche idea ??????
Dani				

 Dani               
Ho risolto ciclando nuovamente gli item a cui ho assegnato il codice 
della sottocategoria da ricercare al nome stesso, poi estraggo il codice 
con le funzioni stringa e cerco la corrispondente sottocategoria. Non è 
molto elegante ma funziona !
Dani
Newsgroup: it.comp.lang.delphi
Titolo: Creazione file PDF da programma

Scusate... vi pongo nuovamente il mio problema...
devo inviare all'incirca 1000 fatture mensilmente tramite posta elettronica;
posso inviare solo dei documenti in formato PDF. Come faccio a crearmi 1000
documenti in questo formato? La conversione sono in grado di farla... ma
solo per un documento alla volta (e non mi passa niente!). Non esiste
qualche componente di Delphi che mi fa questa conversione? Avete qualche
idea da darmi?
Grazie
PAolo

 ha scritto nel messaggio
news:LIHR6.13103$vt.1...@news1.tin.it...

Forse e' una cavolata ma non ho capito bene il problema.
Se, come mi sembra di aver capito, e' il tuo programma che "genera" il
documento di fattura perche' non "stampi" direttamente su un file PDF? ...
non c'e' nessuna conversione e dunque gia' pronto per essere allegato
all'email da inviare....
Installando Acrobat viene installata una "stampante" che appunto genera file
PDF e che puoi utilizzare come una normale stampante in Delphi... o da
qualsiasi applicazione....
In alternativa (assenza di Acrobat) so che esiste anche un componente (per
ora in beta) italiano per stampare direttamente in PDF....
HTH
 Marco

> qualche componente di Delphi che mi fa questa conversione?
usando come sistema di reporting ReportBuilder c'e' un set di componenti a
poco prezzo che esporta i risultati dei report in qualunque formato, PDF
incluso.
Ciao, Sandro

Forse mi sono spiegato male...
devo crearmi circa 1000 file (che corrispondono al numero di fatture) in
formato pdf che poi mi allegherò all'email (in un altro programmino). Il mio
problema non è crearmi un file PDF qualunque... il mio file deve avere come
nome DATAFATTURA+CODICECLIENTE.PDF cioè 20010515_130002550.pdf!
CIAO


wrote:

ti sei spiegato bene, e Marco ti ha risposto altrettanto bene (anche
se non ho provato in pratica)...
tu installi Acrobat o altri programmini (che ti installa una stampante
virtuale) e poi tu basti che indirizzi la stampa del report su quella
"stampante".. per il nome del file penso basti settare il nome/titolo
del report...
Ciao,
Alan Solo

> ...Il mio problema non č crearmi un file PDF qualunque... il mio file
deve avere come nome DATAFATTURA+CODICECLIENTE.PDF cioč
20010515_130002550.pdf! <<
Personalmente per stampare su Distiller (stampante PDF) con un nome
particolare uso:
Printer.Title := FormatDateTime('"TipoDoc"hhnnss', Now);
prima del BeginDoc. Poi pero' stampo _a mano_ (Canvas.TextOut...)
--
Saluti
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: Come richiamare funzioni da un'altra DLL

Dovrei richiamare la funzione SQLConfigDataSource, che č dentro la DLL
ODBCCP32.DLL.
Se richiamo la funzione senza includere niente all'inizio, giustamente il
compilatore mi dice che tale funzione č sconosciuta. Come devo fare per
fargli capire che deve ricercarla in un'altra DLL? Grazie anticipatamente
per l'aiuto!!!

per l'aiuto!!!
Procedure NomeProc (parametri); External 'ODBCCP32.DLL';
Questo è il metodo statico (e il + semplice) se vuoi imbatterti in quello
dinamico dai un'occhiata a LoadLibrary(ex) e GetProcAddress!
Ciao
--
- Carlo -
BSSoftware Tips Mailing-List Support
Newsgroup: it.comp.lang.delphi
Titolo: glscene e file 3ds

salve, qualcuno mi saprebbe far un esempio di come si visualizza un file 3ds
con glscene per delphi?
mi servirebbe visualizzare il file 3d e dare la possibilità all'utente di
routare intorno il pezzo e zoomare
Simo

Sono certo che č negli esempi!

Newsgroup: it.comp.lang.delphi
Titolo: Ricavare data scatto foto

ho necessita' di recuperare l'effettiva data di scatto di una foto, ho
provato con il seguente codice
  try
    SysUtils.FindFirst(FileName, faAnyFile, SearchRec);
    try
      FileTimeToLocalFileTime(SearchRec.FindData.ftLastWriteTime,DT);
      FileTimeToSystemTime(DT, ST);
      Result := SystemTimeToDateTime(ST);
    finally
      SysUtils.FindClose(SearchRec);
solo che ho il problema che la data e' corretta mentre l'orario e'
diverso, qualche suggerimento, grazie Brunello

 diverso, qualche suggerimento, grazie Brunello
Potresti provare a ricavare le informazioni Exif dalla foto (sempre che 
la data e l'ora sulla fotocamera al momento dello scatto erano corrette).
Adesso sono impossibilitato (ho il certificato) e non posso darti 
dettagli; comunque ho trovato un componente facile da usare che estrae 
tutte le informazioni... io ci rinomino i file.
Domani ti faccio avere il componente e il codice.
-- 
Jax

 Domani ti faccio avere il componente e il codice.
Come promesso, ecco qua.
Il componente lo trovi qui:
http://www.torry.net/vcl/graphics/jpg/TExif13texif.zip
Per leggere le Exif basta che fai
ex := TEXIF.Create;
ex.ReadFromFile(sNomeFile);
sDataOra := ex.DateTimeOriginal;
ex.Free;
La data/ora ricavata, se non ricordo male, è nel formato yyyy-mm-dd 
hh:mm:ss .
-- 
Jax

grazie mille e' proprio cio' che  cercavo, Brunello
Newsgroup: it.comp.lang.delphi
Titolo: Componenti per connessione ad AS/400

Qualcuno di voi mi saprebbe indicare una suite di componenti VCL con cui
effettuare il collegamento con un AS/400?
Ho Delphi 6 versione Enterprise.
Grazie a chiunque sappia indirizzarmi.
PS: Ho già visto su Torry ma i componenti presenti non funzionano, anche se
sono "certificati" per Delphi 6. Mi fanno crashare addiritura l'IDE di
Delphi.

 effettuare il collegamento con un AS/400?
Dipende che cosa vuoi fare con il collegamento e che software di base
utilizzi per il collegamento.
Se hai disponibilità del Client Access ed installando il Toolkit di sviluppo
dovresti trovare sia dei driver ADO per la connessione al database, dei
componenti OCX ed alcune API per interagire con code, lanciare applicazioni
remote, ecc.
Non sono VCL ma funzionano abbastanza bene.
Gianluca.

 ha scritto nel messaggio
news:t_JD9.44411$744.1...@news1.tin.it...


 Dove li potrei trovare?  Hai qualche URL da indicarmi?
Io ho sempre usato solo quelli messi a disposizione del Client Access. Se
hai un AS/400 sicuramente hai anche un cd con Client Access da cui
installarli e da lì poi la documentazione è molto esplicativa ed oltretutto
in italiano. Ci sono anche un gran numero di esempi in C e Visual Basic.
Potresti anche vedere Delphi 400, che so contenere un vasto set di
componenti specifici per l'accesso ad AS/400, anche se a dire la verità
dalla versione 5.0 non ne ho piu avuto notizia.
Gianluca.
Newsgroup: it.comp.lang.delphi
Titolo: ftp e delphi 7

salve a tutti, a voi funzionano i componenti "internet" in delphi 7???
a me viene fuori un errore quando tento di metterne uno nella form:
"INTERFACCIA NON REGISTRATA"
non capisco cosa sia, voi sapete aiutarmi?? grazie infinite
Lord Zyx

 "INTERFACCIA NON REGISTRATA"
Benvenuto anche tu nel mondo degli sfigati... io ho lo stesso problema
con i componenti ADO, e ne ho provate veramente tante... ma zero!
Mi sono rassegnato e sto aspettando il momento buono per formattare...
Se trovi la soluzione, ti prego, dimmela!
--
Jax

con ADO??
accidenti, a me ado funziona benissimo...
quindi non è sicuramente un problema di componenti, ma di qualche
impostazione....
"interfaccia non registrata............" non mi viene in mente nulla.......
se ci riesco ti faccio sapere....
ciao
Lord Zyx
"Jax" <rispo...@newsgroup.grazie> ha scritto nel messaggio
news:Mt%L9.630$Q%4.1...@news1.tin.it...


 nulla.......
*Dovrebbe* essere un problema OLE, ma non ci metterei la mano sul fuoco
:)
Cmq a me non da' proprio quell'errore, ma "Interface not supported".
--
Jax

Cmq a me non da' proprio quell'errore, ma "Interface not supported".
potrebbe trattarsi dello stesso errore, localizzato in italiano malamente...
--
Buon      .-""",
 Natale    /____, \
          {_____}`{} 
Buone    (/ . . \)
 Feste   {`-=^=-`}
         {   `   }
          {     }jgs
Morde.     `-,-`
Newsgroup: it.comp.lang.delphi
Titolo: Componenti non visuali... me fanno 'mpazzì! :-)

Sto cercando di costruire un componente non visuale che ne "possiede" altri
due (scritti da altri: TComPortDriver & TTrayIcon) altrettanto non visuali.
Vi allego due righe di sorgente... quelle che causano il problema :-(
type
  TInterfaceDriver = class(TComponent)
  private
    { Private declarations }
    FSeriale:TCommPortDriver;
    FTray:TTrayIcon;
  protected
    { Protected declarations }
  public
    { Public declarations }
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
  published
    { Published declarations }
  end;
nella sezione IMPLEMENTATION ho un semplice costruttore...
constructor TInterfaceDriver.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
   FTray:=TTrayIcon.Create(Self);
   FSeriale:=TComPortDriver(Self); // per ora non usato
   FTray.Active :=True; //visualizza l'icona nella tray area
end;
...che mi dà problemi, ovvero, appena cerco di chiamare un metodo qualsiasi
di FTray o accedo a qualche sua variabile, mi parte un "Access Violation" e
si ferma tutto! Non è un problema di TTrayIcon, perché l'errore salta fuori
con qualsiasi tipo di classe TComponent inclusa nella mia
"TComponent-derivata".
TTrayIcon infatti è a sua volta una TComponent; se tuttavia la trasformo in
un TGraphicComponent e gli aggiungo la riga:
FTray.Parent:=Self;
tutto funziona (sembra) correttamente. Dove sbaglio? Non posso lasciare
TTrayIcon come TComponent?
Qualcuno ne sa qualcosa? :-)
ciao
Paolo
PS: mi rispondereste anche in mailbox? (
paolo...@onde.net
) :-)

 end;
Provato a mettere AOwner invece di self ? Forse i componenti si aspettano
che l'owner sia un Form e non un TInterfaceDriver..
Ciao!                    {MSX}

 Ciao!                    {MSX}
oops! È vero... :-)
il problema anche un altro... TTrayIcon ha il costruttore e il distruttore
"Protected"... spostandolo in "Public" e usando AOwner, è andato tutto a
posto! :-)
Ho però un altro dubbio... come mai appena carico un progetto col mio nuovo
componente mi appare anche un TTrayIcon <unnamed<4>>? Se lo lascio, funziona
tutto, se lo cancello, pure... mi sembra un po' inutile! Non si può evitare
che si "autogeneri"?
ciao
Paolo
Newsgroup: it.comp.lang.delphi
Titolo: Memory Table

Ho un problema con memory table di kbm.... delphi 7 e griglia infopower.
Ogni tanto un enablecontrols di queste memorytable mi scatena un access
violation senza alcuna causa apparente... come ripeto il fatto succede in
modo random, io uso la versione 5 ma succedeva già con la versione 3.07
E' già successo anche a voi?
Alberto

E' già successo anche a voi?
Si. Ho risolto delegando l'enable control ad una funzione privata della unit.
Ma oggi non uso piu' la memory table se non per query e viste di dati diverse
(indici al volo), quindi non ti saprei dire dove si annida il problema.
So solo che quando gli AV si moltiplicano, bisogna cambiare strada, e in
fretta. ;-)
Ciao!
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

> Ho un problema con memory table di kbm.... delphi 7 e griglia infopower.
Le tabelle sono i master/detail?
-- 
Ciao!
Marco Kregar
marco....@FirebirdSQL.it
www.FirebirdSQL.it
"over the bench the goat sings, under the bench the goat dies"

Newsgroup: it.comp.lang.delphi
Titolo: TMemo e modifica font.color ad ogni riga

Ciao a tutti,
avrei l'esigenza di modificare del testo a runtime in un campo TMemo in
modo da poter visualizzare parti del testo contenute con colori
differenti. Mi spiego, nel TMemo devo visualizzare alcuni dati inviati
da seriale e devo poter evidenziare i dati errati (colore rosso) con
quelli corretti (colore verde). Ho usato il comando:
Memo.Font.Color := clRed;
Ma così mi cambia il colore di tutto il campo TMemo e non solo la
parte di testo che mi interessa.
Come potrei fare per avere l'effetto desiderato?
Grazie

 ha scritto nel messaggio 
news:1161850738.4...@i3g2000cwc.googlegroups.com...
Ciao a tutti,
avrei l'esigenza di modificare del testo a runtime in un campo TMemo in
modo da poter visualizzare parti del testo contenute con colori
differenti. [...]
C'č un thread di pochi giorni fa con oggetto RICHEDIT
Vedi se puoi trarne uno spunto
V.

Se non sbaglio, SelAttributes non è presente per il TMemo.
Altri suggerimenti?
Grazie

il memo non permette di cambiare il font ad ogni riga ma solo il font di
tutto il testo, quindi devi usare xforza un richedit
Newsgroup: it.comp.lang.delphi
Titolo: Oggetto Ttreeview

Ebbene SI. Anche la vigilia di natale c'è un qualche disperato attaccato a
un pc a scrivere del codice :)))
Ho un oggetto ttreeview che mi contiene una lista di categorie che mi vado a
creare e a eliminare ogni volta che se ne ha necessità. Succede questo. Per
ogni categoria ho associato un database che viene aperto quando clicco sul
nome appunto della categoria di interesse tramite la procedura
Treeview1click. Il fatto è che anche se clicco sulla parte bianca del mio
albero di navigazione (quella vuota per intenderci) lui lo intende come un
click su una categoria.
Veniamo alla domanda....
è possibile riuscire a discriminare se un click viene fatto su una categoria
presente sull'albero (in modo da aprire il relativo database) oppure se
viene fatto sulla parte vuota (bianca) di questo (in questo caso devo
semplicemente ignorare il click)? C'è un qualche metodo che mi viene in
aiuto?
Grazie a tutti e Buone Feste
Davide
PS: mi aggiungo al messaggio postato diversi gg fa a proposito di questo NG.
Ne ho frequentati tanti ma qui c'è veramente gente in gamba e che aiuta
appena può. Complimenti ragazzi

 gamba e che aiuta appena può. Complimenti ragazzi
Anche leggere l'help non fa male.
Andrea
Newsgroup: it.comp.lang.delphi
Titolo: Eventi

Ciao a tutti,
come potrei fare a creare un evento personalizzato all'interno di un
mio componente?
Vorrei fare un evento che si scaturisca quando cambia il valore di una
property
del mio componente.
Grazie a tutti in anticipo.
Rino
--------------------------------
Inviato via 
http://usenet.libero.it


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

Rino,
oltre quello che ti ha detto Marco puoi anche creare un tipo
procedurale con i parametri che vuoi. Di seguito una unit che crea un
componente che alla modifica della proprietà indicata.
Se devi scendere su questo terreno, tuttavia, ti consiglio uno sguardo
alla Component writers guide e (soprattutto) ai sorgenti della VCL.
Ciao
Antonio
unit MyComponent;
interface
uses
  SysUtils, Classes;
type
  TMyEvent = procedure(PrimoParametro: string) of object;
type
  TMyComponent = class(TComponent)
  private
    { Private declarations }
    fMyEvent: TMyEvent;
    fTuaProprietaDaModificare: string;
    procedure SetTuaProprietaDaModificare(const Value: string);
  protected
    { Protected declarations }
    procedure DoMyEvent; virtual;
  public
    { Public declarations }
  published
    { Published declarations }
    property OnMyEvent: TMyEvent read fMyEvent write fMyEvent;
    property TuaProprietaDaModificare: string read
fTuaProprietaDaModificare write SetTuaProprietaDaModificare;
  end;
procedure Register;
implementation
uses Dialogs;
procedure Register;
begin
  RegisterComponents('Samples', [TMyComponent]);
end;
procedure TMyComponent.SetTuaProprietaDaModificare(const Value: string);
begin
  //inserisci la chiamata al metodo DoMyEvent prima o dopo la modifica
effettiva
  //della proprietà.
  fTuaProprietaDaModificare := Value;
  if not (csLoading in ComponentState) then
    DoMyEvent;
end;
procedure TMyComponent.DoMyEvent;
begin
  if Assigned(OnMyEvent) then
    Self.onMyEvent(fTuaProprietaDaModificare);
end;
end.
Newsgroup: it.comp.lang.delphi
Titolo: Colore di una riga del DBGrid

Lo so che è stato detto e ridetto ma non riesco a colorare una riga della
DBGrid come voglio
Il problema è che voglio colorare solo la ricùga corrente  (quella con la
freccetta a fianco) e non so quale condizione usare nell'if per dire 'la
riga corrente'
Come fò?

ma la dbgrid lo fa gia da se, o sbaglio?
A.

> ma la dbgrid lo fa gia da se, o sbaglio?
Ni!
In realtŕ evidenzia solo la cella della riga mentre io voglio evidenziare
tutta la riga
Lo si potrebbe fare settando Option come dgRowSelect a true e cosě si
evidenzia tutta la riga ma mi devo tenere l'evidenziatura di windows mentre
io me la voglio fare a mio piacere (tra l'altro il metodo che ho appena
citato non so neanche se sia molto corretto)

With Tbgrid(Sender) do begin
    if SelectedRows.IndexOf(Dataset.Bookmark) <> -1 then
       // usa colori per evidenziare
   else
       // usa colori standard
end;
Bye
A.


Penso che sia proprio quello che mi serve
 mo provo e faccio sapere come è andata
Grasssie

Mi correggo, non va
SelectedRows.IndexOf(Dataset.Bookmark)  mi restituisce sempre -1
Che faccio?
Sono io che sbaglio?
Io sto provando:
procedure TfrmPrincipale.gTotaleDrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  aState: TGridDrawState);
begin
with TDBGrid(sender), DM.DSTotale do //with con due parametri. l'ultimo è
prevalente
 begin
  if gTotale.SelectedRows.IndexOf(DM.DSTotale.Bookmark)<>-1 then
   Canvas.Brush.Color:=clLime
  else
   Canvas.Brush.Color:=clGreen;
  DefaultDrawColumnCell(Rect, DataCol, Column, aState);
 end; //fine with
end;
--
_________________________________
Edmondo Di Tucci 
snar...@tin.it
www.powernetsi.it
 
edm...@powernetsi.it

Ho provato meglio e... "funzionicchia"
Il codice va bene solo che devo abilitare l' Option dgMultiSelect
L'inghippo perň resta lo stesso
Innanzitutto l'aspetto della freccina a fianco della Griglia cambia ma
questo č il male minore nel senso che potrei anche non farla visualizzare e
mi toglierei dai guai
La chosa che non va č che se mi sposto col mouse funziona (sto selezionando
qualcosa) se invece mi sposto con le freccette non "funge" piů (non sto
selezionando niente, mi sto solo spostando e quindi non creo BookMark e la
funzione che dicevo nel mex precedente restituisce sempre -1)
Il dubbio resta
Su, fate i bravi che qualcuno certamente c'e passato prima, indicatemi la
via!


 qualcosa) se invece mi sposto con le freccette non "funge" più (non sto

Newsgroup: it.comp.lang.delphi
Titolo: Se la data è vuota...

prime esperienze in delphi...primi problemi in cui ho bisogno un
aiuto.
Problema:nella myApplicazione se l'utente non mi inserisce una Data
tramite Datetimepicker .. vado sul DB a mettere un valore di default
deciso da me e cioč : 01/01/1900.
Poi il record inserito viene visualizzato in una semplice DBgrid.
Fin qui tutto ok.
Perň il mio cliente non vuole vedere la data 01/01/1900 se nn č stata
inserita  ma vorrebbe vedere un Trattino -    .
Io a colpo sicuro sono andato sull'evento calcField e ho scritto :
if Datamodulo.Mytable.FieldByName('data_regis').Asstring =
'01/01/1900' then
          Datamodulo.Tabrate.FieldByName('data_regis').asstring:= '-';
ma mi da errore poichč (penso)che sulla dBgrid si aspetti una Data e
nn una stringa.
Se č tutto chiaro come faccio a risolvere questa cosa??
Ringrazio anticipatamente tutti coloro che mi daranno una mano!!!

Fatti un campo calcolato di tipo stringa e comportati come ti stai
comportando adesso, vedrai che te lo lascia fare.
Ciao

Mantieni il tipo data. Nel componente che utilizzi, ad esempio una TTable,
seleziona il campo data.
Nell'evento Get scrivi:
if Sender.IsNull then
  Text:='-'
else Text:=Sender.Value;
Saluti



> if Sender.IsNull then
il campo non è null: lui ci scrive un valore del 1900....
A

 inserita  ma vorrebbe vedere un Trattino -    .
La data probabilmente è 30/12/1899 che corrisponde al valore 0, nel
conteggio dei giorni di Delphi.
Se utilizzi i campi persistenti puoi agire sull'evento OnGetText del singolo
campo, scrivendo qualcosa del tipo:
procedure TTuaForm.TuoDataSetDataGetText(Sender: TField; var Text: String;
  DisplayText: Boolean);
begin
  if Sender.AsDateTime = 0 then
    Text := '-'
  else
    Text := Sender.AsString;
end;

Preziosi Consigli... ho risolto grazie al Vs aiuto!!!!!!
THKS !!
riccardo

Newsgroup: it.comp.lang.delphi
Titolo: Aiuto, sto cercando un componente !!!!!!

Ciao a tutti !!!!
Mi serve una mano: sono alla ricerca di un componente FREEWARE per poter
fare esportazioni da Delphi a Excel. Se qualcuno di voi č in possesso di
tale componente o dell'URL dal quale scaricarlo, me lo faccia sapere al piů
presto, si tratta di una cosa urgente.
Grazie ancora,
                        Mr.BadGuy

cosa intendi con "esportare da Delphi"? (da un DB utilizzato in delphi?)
...comunque, dai un'occhiata in Delphi4HelpExamplesBatchmv
trovi un esempio per trasportare dati da alias a alias in BDE,
quindi anche in excel...
ciao
Alan
---
Questo servizio e' realizzato con Wappi della Virtex
Connetti ad internet il tuo telefonino: 
http://www.wappi.com/
--
Posted from [194.243.91.36] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.delphi
Titolo: IA gioco del tris

Salve a tutti, è la prima volta che posto in questo newsgroup. Volevo sapere
se qualcuno voleva aiutarmi a migliorare un nuovo gioco che avevo scritto.
Il gioco è abbastanza semplice, il solito tris.
Sembra funzionare abbastanza bene, dopo circa 5 minuti di apprendimento su
certe combinazioni il computer diventa imbattibile.
Qualcuno è interessato ?

 ha scritto

Perche' proprio il tris (tic-tac-toe per gli americofili)?
E' notoriamente un gioco in cui non si puo' perdere ne' vincere (a meno
di non commettere errori piuttosto grossolani), "War games" insegna
(ciao Joshua! :-)
E' normale che un algoritmo mediamente ben fatto riesca a non perdere
mai. A meno che l'algoritmo non includa degli errorini random tanto per
far contento il giocatore umano :-)
Anni fa ne avevo fatto uno anch'io (il solito algoritmo min-max, non
credo ci voglia molto di piu'), ma personalmente riterrei piu'
interessante qualcosa di piu' complesso (gli algoritmi utilizzati nei
giochi mi hanno sempre affascinato, ma non ho mai avuto molto tempo per
approfondirli)... magari un Risiko giocato dal computer ?!?
--
Roal Zanazzi

Ciao, io ho scritto un componente in Delphi 6 che è appunto il gioco del
TRIS....se ti va possiamo parlarne meglio...oops scriverci....
--
Alberto Kalb
S.I.A. Srl
Viale Umbria, 2
26900 - LODI  - LO - ITALY
Tel.: 
+39 0371/432703
Fax: 
+39 0371/35392

 Qualcuno è interessato ?
Ma il computer cerca di capire come te lo batti e poi ti imita?
Bye.
Daniel.
--------------------------------
Inviato via 
http://usenet.libero.it

si potrebbe aprire un progetto su sourceforge ..
--
Davide Consonni
(
davidec...@virgilio.it
)


L'idea non č niente male, magari potremmo realizzare il gioco della dama con
il PC che
affina le tecniche giocando e imparando dalle mosse del giocatore
avversario!
C'č nessuno interessato?
Daniel.
(programmat...@NOSPAMlibero.it)


si potrebbe aprire un progetto su sourceforge ..
--
Davide Consonni
(
davidec...@virgilio.it
)
Newsgroup: it.comp.lang.delphi
Titolo: DBGrid e formattazione dati

Vengo subito al punto...
ho un database mantenuto in memoria (RAM) attraverso un ClientDataSet.
A questo Dataset ci ho collegato un DBGrid per visualizzarne il contenuto.
Il problema ce l'ho in due delle colonne che rappresentano numeri, in
particolare tali campi sono di tipo Currency.
Il problema č questo, in una colonna voglio visualizzare 5 cifre decimali
(e possibilmente impedire all'utente di battere piů di 5 cifre decimali
[non č comunque vitale]) ma, essendo di tipo Currency, il DBGrid mi
visualizza il numero contenuto con due sole cifre decimali (pur
memorizzandolo nel database con 5).
Come fare?
Grazie,
   Luca
-- 
Linux registered user #291568 (
http://counter.li.org/
)
Electronic Frontier Foundation Member (
http://www.eff.org/
)
Mandrake Club Member (
http://www.mandrakeclub.com/
)

 memorizzandolo nel database con 5).
con gli eventi OnGetText e OnSetText del Field in questione ci puoi fare 
tutto quello che vuoi
procedure aaa.bbbGetText(Sender: TField;
  var Text: String; DisplayText: Boolean);
begin
  Text:= Format('...', Sender.AsInteger)
end;
procedure TForm1.ClientDataSet1TextSetText(Sender: TField;
  const Text: String);
begin
  Sender.AsCurrency:= ... qui bisogna ripulire Text da eventuali separatori 
decimali 
end;
attenzione che mi pare che OnGetText e OnSetText lavorano in coppia, credo 
che debbano essere assegnati tutti e due.
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

 tutto quello che vuoi
Grazie, la tua soluzione funziona perfettamente.
Ciao,


 
Il displayFormat del Persistent Field non ti basta?
Daniele
Newsgroup: it.comp.lang.delphi
Titolo: Problemi con InstallShield

Salve ragazzi!
Avrei un problema con InstallShield per Delphi 4.
Io penso di seguire per bene le impostazioni per creare una installazione
"funzionante", ma purtroppo tutto va bene fino a quando non eseguo il
programma installato: ricevo un errore del tipo <<BDE Error: Impossibile
inizializzare il DB Engine>> oppure <<Impossibile inizializzare IDAPI
iddao3532.dll>>.
Utilizzo un DB Access 97, naturalmente il driver utilizzato č quello or ora
specificato: ho controllato se viene copiato durante l'installazione, ho
controllato che fossero state installate tutte le DLL necessarie, etc etc...
Dimenticavo un'altra anomalia: installando il file .cpl del BDE
Administrator, compare nel pannello di controllo ma, cliccandovi, non apre
nessun ambiente di configurazione!
Qualcuno saprebbe aiutarmi?
Grazie!
--------------------------------------------------
"Non importa che tu sia un leone o una gazzella.
             Comincia a correre"
                    Modesto
                ICQ# 4879858
        E-Mail: 
dell...@freemail.it
--------------------------------------------------
Per favore, per risposte dirette
rimuovete -NOSPAM-
Please remove -NOSPAM-
for private response

C'e'una delle opzioni di IS che permette di indicare se il tuo software
necessita del supporto BDE o meno.
Se spunti questa checkbox, ti chiede poi quali driver desideri installare al
seguito del tuo prg.
Io, per semplicità, monto tutto: non si sa mai!
Il fatto che ti trovi l'icona del Bde nel pannello di controllo è dovuto
probabilmente alla mancanza di alcuni files.
Consigli:
L'installazione di D4 ha l'opzione che si limita a riscrivere le voci nel
registro di configurazione di Windows. Prova, riavvia e vedi se succede
ancora.
Se hai un altro pc su cui provare, verificare se succede lo stesso
Provare a disinstallare Is, riavviare il sistema, reinstallare, riavviare
ancora e provare.
Saluti
AS

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

Devo fare una qry su una tabella inma un problema:
devo selezionare tutti campi di una tabella (tabella = prova), in piu'
creare un alias di un campo (qta)  della stessa tabella se un altro campo
(tipo ) ha valore = 1
Come posso fare ?
Grazie
--- posted by geoForum on 
http://www.delphiedintorni.it


 
Ho risolto!

Newsgroup: it.comp.lang.delphi
Titolo: DBEdit e l' euro

Salve e tutti. 
Vi sarà sicuramente capitato di avere dei DBEdit nelle vostre form e
usarli per lavorare su cifre decimali in lire..
Ora che voglio poter gestire anche l'euro se faccio la conversione poi
il componente fa le bizze.
Avete idee in questione o se tale argomento è stato discusso in
precedenza mi dareste un aggancio temporale come aiuto ?
Grazie mille
James Villani

 wrote

non ho capito perchè fa le bizze !! Che bizze fa ?
Se hai usato i campi monetari ( currency ) non dovresti avere problemi con
le cifre decimali.
Ti saluto....ciao !!
Antonio Tarolla



Bhè... scusate la mia mancanza di precisione sulla descrizione del
problema. Ora ve lo sttopongo in maniera più esaustiva.
Lavorando con i DBEdit e l'EURO sono arrivato alla conclusione di
dovermi creare un componente un po' più avanzato del DBEdit puro.
Infatti questo ha sì l'interfacciamento con tabelle e via dicendo,
però volevo potervi scrivere come se fosse una calcolatrice con tutti
benefici che questo implica.  Ho trovato un componente in rete
derivato dalla TCustomEdit che ha le features di una calcolatrice
(scrive da Dx a SX, separazione a tempo reale delle migliaia e dei
decimali ecc ecc)
Quindi mi sono posto questi problemi.
[1] Creare un componente che abbia l'accesso ai dati
...quindi sono partito dal TDBEdit derivandone uno mio (TMioDBEdit)
[2] aggiugnere funzionalità grafiche un po' più avanzate (tratte
dall'altro componente "calcolatrice")
...quindi..
[2a] quando vado in edit-mode su un DBEdit la cifra contenuta viene
allineata a SX, io voglio che rimanga a dx e questo sono riuscito ad
averlo lavorando sulla CreateParams
il meno è fatto.
Problema più grosso.
Ho una fom con una TTable, TDataSource, DBGrid, e due DBEdit che
visualizzano il contenuto dei due unici due campi di una tabella dbf
(il primo o intero, le lire; il secondo è float, gli euro).
Se setto giustamente il DisplayFormat dei due Filed nella Table questi
vengono visualizzati giustamente nei DbEdit.. però se provo ad
aggiungere anche un solo zero mi viene una eccezione perchè la tabella
non gestisce anche i separatori.
In alternativa non setto la display format e voglio che il mio
componente derivato gestisca la "veste" grafica del valore
visualizzato. Però ho errori comunque perchè non riesco a "fargli
vedere al motore database" il valore vero (ho una variabile apposita
che memorizza il valore numerico senza separatori) ma si prende quello
che viene visualizzato e questo ha i separatori.
Sto annegando in un mare di perversioni da cui posso uscirne
elegantemente, oppure sono senza speranza ??
James Villani

 che viene visualizzato e questo ha i separatori.
Sul repository di MrCoke nel ng di Marco Cantù in data 4/5/00 trovi
un componente che ho postato e che si comporta, credo, proprio come
vuoi tu (allineamento a dx, usabile collegato o scollegato da dataset,
decimali fissi, separatore migliaia etc.). Trovi anche la descrizione.
Se hai voglia dagli un'occhiata, anche come spunto.
Ciao
Mirko
ps. se ti arriva una mail in privato scusami, è partita per sbaglio.