mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: filtrare record con diverse condizioni

sull'utilizzo di
OnFilterRecord, ad esempio per cercare una sottostringa, ho un paio di 
dubbi:
procedure Tdm1.cdsVociMasterFilterRecord(DataSet: TDataSet; var 
Accept:Boolean);
begin
   Accept := Pos(StringaDaCercare, DataSet['Descrizione']) > 0;
end;
1) StringaDaCercare deve essere una variabile globale
	(il data set e' su un data module)
	il che in genere non va bene
2) se ho piu' condizioni di filtro
e voglio attivarle a piacimento?
devo creare una variabile globale TipoFiltro
e scrivere ad es.
case TipoFiltro of
1:
   Accept := condizione 1;
2:
   Accept := condizione 2;
ecc.?
anche qui la variabile globale TipoFiltro
mi sembra un po' una vaccata...
qualche suggerimento?

 qualche suggerimento?
Hai trovato già la risposta ai tuoi dubbi :)
Anche io ho usato l'onfilter in questo modo.
Non ho piu' il codice ma ricordo bene che impostavo le variabili globali (e
questo potrebbe essere reso piu' elegante creandoti una classe TMioFiltro
con tutti gli attributi che vuoi inserire nel filtro, e usare la tua
classe). Quando volevo impostare il filtro, mettevo il filtered := false
sul dataset, impostavo le variabili globali dei filtri, poi riaccendevo la
proprieta' filetered.
Inoltre va bene che La logica del filtro sia gestita nell'onfiltered.
Ciao
-- 
Morde
Newsgroup: it.comp.lang.delphi
Titolo: Re: FuzzyReport - elenco modifiche.

 modifiche effettuate.
Beh, una piccola "fesseria" , la modifica a Frvers.ini per installare su 
D7..
Giulio 


Si Fabio hai ragione, allora cominciamo noi:
1. Abbiamo aggiunto un nuovo pulsante sulla form del preview di stampa "Save
All"
    che ti permette di salvare tutte le pagine del REPORT numerate da 1 fino a N
pagine.
   (Questo problema era sorto perchč una tipografia mi ha chiesto di salvare
tutte le 300 pagine del report in formato EMF e ci voleva troppo a salvarne
una alla volta.)
2. Abbiamo cercato di adattare il filtro di esportazione in PDF di
FreeReport in modo che anche Fuzzyreport puň salvare ed esportare in PDF
(usa PowerPdf)
Stiamo cercando anche di apportare altre modifiche (che sono in fase di
pre-alfa) come ad esempio Stampa della Griglia, Stringgrid in modo piů
semplice magari con delle funzioni a runtime)
Stiamo anche cercando di far funzionare fuzzyreport con ZeosLib i componenti
DataAware che permettono l'accesso a Informix, db2, oracle, ado, firebird in
modo da farlo diventare piů completo. Anche qui c'č una pre-alfa, perň ci
siamo fermati alla decisione sullo standard da seguire, se ricalcare un po
freereport o altro, mi piaceva anche parlarne insieme.
Questo č quanto abbiamo fatto, certo i sorgenti sono complessi perň con un
po' di studio si riesce a capire.
Abbiamo anche altri suggerimenti ma visto che si parla di modifiche per non
fare confusione per ora non le postiamo, dicci quando e dove e vedremo di
postare quello che avremmo intensione di implementare.
Per ora ti saluto.
Marco e Samuele.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Fabio Dell'Aria.
Ragazzi mille grazie per la vostra solerte risposta.
Vi terrň aggiornati sull'andamento dei lavori! :)



 


 freereport o altro, mi piaceva anche parlarne insieme.
Per Zeoslib, con D5 e Firebirdsql, posso dirvi che gia' funzia tutto
alla perfezione senza toccare sorgenti dato che lo sto usando in questa
configurazione
Ciao
Claudia

Newsgroup: it.comp.lang.delphi
Titolo: Restituire Array Interi

Salve a tutti.
Scusate la domanda stupida, ma ne ho estremo bisogno..
Qual'e' il metodo più semplice per ritornare in una function un array
(dinamico) di interi?
Oppure una procedura passandogli come var un array di interi ?
Ciao e grazie a tutti
G

Dichiari un tipo
Miotipo : Array of integer
e sulla funzione passi:
Function MiaFun(Var V : Miotipo) : MioTipo;
Se č solo come parametro var puoi non usare il tipo
Procedure pippo(V : Array of Integer)
ma per il ritorno dalle funzioni devi dichiarare un tipo
Ciao,
David
Newsgroup: it.comp.lang.delphi
Titolo: Delphi2006 e UML

Ciao a tutti.
Con d2006 si riesce a creare diagrammi uml (anche se non uml 2.0 va bene 
lo stesso)?
In passato ho usato Sybase PowerDesigner che č un buon prodotto ma con 
la grossa limitazione che il codice necessario alla gestione della 
persistenza sul db non viene autogenerato.
Ho intenzione di scaricare la trial di xde, ma intanto se qlc del ng usa 
gia l'ultima versione di delphi potesse darmi qualche info mi farebbe un 
grosso favore.
Quando parlo di UML intendo tutto:
uses cases
class diagram
component diagram
etc.
AS

 uses cases class diagram component diagram etc.
Sě, con Together č possibile realizzarli tutti (ma solo dalla 
"Enterprise" in su, nella Professional esclusivamente "Class Diagram").
Attraverso Together, č anche possibile generare il modello dal codice e 
produrre codice partendo dal modello (dove questo ha un senso, ad 
esempio con i Class Diagram).
I diagrammi possono anche essere introdotti separatamente in un progetto 
specifico di Design; non devi cioč creare un'applicazione per poter 
modellare con Together.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

   Marco.
Andrea

 Tu sei riuscito a farlo ragionare?
A volte... :-D


   Marco.
Andrea

 poterlo fare via modello, ma vabbeh...
"Te comprendo, Pedro, te comprendo..." (cit. spot Estathe) :-)
Si tratta di un'impostazione di massima che va bene sia per Delphi che 
per C# (per quest'ultimo, "getter" e "setter" sono obbligatori)... ma 
non si sa mai, se le richieste in tal senso sono molte, è possibile che 
in futuro sia possibile generare la proprietà in modi differenti (con 
campo o con metodi).
D'altronde, Together è alla sua prima comparsa, soprattutto come 
strumento di generazione bidirezionale del codice (nelle versioni 
precedenti, si poteva costruire solo il modello dal codice e non 
ottenere l'inverso).


Ok, Marco.
Ma together è una app esterna oppure è integrato in delphi, con una
cosa del tipo "file-new-other-uml diagram"?
Scusa le domande un po sceme ma non posso scaricare la trial in questi
giorni.
Tnx
AS

 cosa del tipo "file-new-other-uml diagram"?
E' pienamente integrato nell'ambiente di sviluppo.
Se vuoi vedere un demo significativo e interessante che offre una 
panoramica dello strumento, puoi sbirciare su BDNtv:
http://bdn.borland.com/article/0,1410,33373,00.html


tnx. stasera vedo.
AS
Newsgroup: it.comp.lang.delphi
Titolo: MySQL e Delphi

Ciao a tutti,
tempo fa ho creato un'applicazione che si collegava a MySQL 3.23
tramite i componenti DBExpress.
Vorrei ora creare una nuova applicazione scaricando l'ultima versione
di MySQL.
Ai tempi ci avevo provato con la versione 4.0 e non c'ero riuscito.
Qualcuno sa darmi qualche informazione su come collegarmi a MySQL ( le
ultime versioni )
Grazie 1000
Davide

 ultime versioni )
se ne è parlato molto ultimamente. cerca nei vecchi post.
A.

 Ai tempi ci avevo provato con la versione 4.0 e non c'ero riuscito.
Io ho usato tranquillamente MySQL 4.0 e 5.0 con i driver dbExpress della
CoreLab (
www.crlab.com
).  Sono a pagamento.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Grazie
Alberto, proverò a guardare nei post più vecchi ed in caso riproverò
sul forum.
Davide
Alberto Salvati ha scritto:

Newsgroup: it.comp.lang.delphi
Titolo: MainForm e Form al suo interno

Ho creato MainForm e vorrei creare al suo interno una seconda form.
La secondo Form deve essere creata alla pressione di un voce del menu e deve
essere distrutta alla sua chiusura.
Le due form le ho gia inserite nel mio miniprog ma non so come richiamare la
seconda al suo interno
Come posso fare?

Aggiungi la seconda form alle uses della prima (Alt + F11), e nell'event
handler del tuo menu inserisci il nome della form secondaria seguito dal
metodo Show:
Form2.Show;
Saluti

 ha scritto nel messaggio
news:ccbb7a$3oq$1...@grillo.cs.interbusiness.it...

Cosi non la creo ma la visualizzo soltanto e anche se la creo, non rimane
all'interno della mainform ma è come se fosse una cosa a parte
Grazie
  Ciro

Ciro ha scritto:

Forse non ho capito bene, ma quello che ti interessa
e forse fare un applicazione MDI, in cui c'è una
finestra madre, e poi altre finestre figlie, che
stanno chiuse all'interno dell'area client della
form principale.
Una volta che crei una applicazione MDI, puoi
decidere se una Form è figlia impostando la
proprietà FormStyle a fsMDIChild, mentre
per la mainForm la stessa proprietà deve
valere fsMDIForm.
In pratica, crei la tua nuova applicazione.
Alla Form principale imposti la proprietà
FormStyle a fsMDIForm, mentre per le
altre form imposti fsMDIChild.
Le applicazioni MDI gestisono di base anche
il menu per disporre le finestre (affianca,
sovrapponi, ecc.)
Ciao
Giorgio



forse sarebbe stato meglio usare un frame, o un panello
da rendere visibile/invisibile all'occorenza, o un pagecontrol con tabs 
invisibili, comunque, se vuoi dare l'impressione che due form siano sempre
la stessa, puoi provare a settare il borderstyle della mainform a bsnone e  
le dimensioni/posizione della form secondaria basandosi sul ClientRect 
della mainform, ovviamente, il tutto, prima dello showmodal della form
secondaria.
-- 
Ciao, Anto', [37, 143, AQ] 
MB C SC 220 CDI Magma Rot
"Di sempre cio' che senti e fai cio' che pensi."
    G.G. Màrquez

 sovrapponi, ecc.)
Perfetto era come dicevi tu!!!!
Solo una cosa non riesco a chiuderla se faccio il destroy poi non me la
ricrea come posso fare?
Cosi la creo:
if not Assigned(fmArt) then
  begin
    Application.CreateForm(TfmArt, fmArt);
  end;
 fmArt.Show;
cosi la distruggo:
 fmArt.Destroy; o con il free;
ma poi quando ripremo per farla riaprie non compare
in cosa Sbaglio????
Grazie di tutto
  Ciro

   Ciro


ok GRAZIE a tutti!!!
Adesso vedo di andare avanti da solo....
Newsgroup: it.comp.lang.delphi
Titolo: vecchi componenti

ciao a tutti
vorrei sapere è possibile e come installare dei componenti creati per una versione precedente di delphi
Grazie

 vorrei sapere è possibile e come installare dei componenti creati per una versione precedente di delphi
 
Se possiedi il sorgente della unit (file .pas), crea il progetto di un package di tipo "designtime", aggiungi il file al progetto, fai [Build] e [Install].
 
Verifica che nel file del componente sia presente una procedura "Register" contenente chiamate a "RegisterComponents": è necessario per poter registrare i componenti nell'IDE.
 
In caso di errori di compilazione, visto che parli di componenti vecchi, bisogna analizzare il problema specifico per vedere come risolverlo.
 
Ciao,
  Marco.
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
 #Home: 
http://www.marco.breveglieri.name
 
 #Blog: 
http://www.compilaquindiva.com
 
 #DelphiPodcast: 
http://www.delphipodcast.com
Newsgroup: it.comp.lang.delphi
Titolo: Sapere se il programma è già aperto

Ho un programma delphi che funziona in rete
(due computer posso utilizzarlo ed il database
e condiviso tra i due).
Visto che le 2 persone che utilizzeranno questo
prog sono inesperte, vorrei fare in modo che se
il programma è in esecuzione su un computer,
non possa essere aperto nell'altro,
Che codice devo usare? 

"Fulvio" nel precedente post ha scritto:

mi sa tanto che se apri in rete il programma viene
eseguito effettivamente su due macchine diverse ...
quindi addio Mutex e roba simile. Io direi che ti devi
appoggiare o ad un valore sul Db (che non mi piace
tanto) o ad un file sul server, che cerrà scritto dal
primo che apre l'applicazione, che in qualche maniera
indichi se e chi ha aperto l'applicativo, però questo
implica la necessità dei permessi di scrittura sul
server etc etc. Poi dipende anche dal db ... magari ha
delle funzioni che ti permettono di sapere se ci sono
altri utenti connessi.
Sono le prime idee che mi sono venute in mente.
	Ciao
	MassimoB
 
---------------------------------
http://www.massimobeschi.it/
---------------------------------
Se tu pagare come dici tu ...
Io lavorare come dico io ...
Se tu pagare come dico io ...
Io lavorare come dici tu ...
---------------------------------

Potrebbe fare uso delle mailslot
Bye,
Raktzo

 ha scritto nel messaggio news:1qxXe.9381$jG6.5...@news3.tin.it...

Apri i dataset in uso esclusivo: chi arriva secondo non li può aprire.
Catturi l'errore alla OnOpen del dataset.
Ciao
GP

buona idea!
ma si dovrebbe verificare se l'uso delle maislots è legato ai diritti
di amministratore...
Ai sistemisti gli viene un colpo se gli dici che per usare una tua app
l'utente deve avere tali diritti... :-))
AS
Newsgroup: it.comp.lang.delphi
Titolo: Easter Egg in Delphi 7.

Ho trovato un Easter Egg in Delphi 7.
C'è una foto con (credo) tutti i
programmatori. Da quanto ho capito dovrebbe
trattarsi di uno splash screen iniziale
alternativo a quello classico ma non sò
come attivarlo. L'ho trovato con un programma
esterno di analisi del file exe.
Nessuno sa come attivarlo?
Caino79.

 Nessuno sa come attivarlo?
Prova cosi' (non ho D7)
- Help/About;
- ALT+TEAM;
Mi sembra di ricordare che pero' ci fossero problemi in qualche
versione di Delphi (tipo AV o roba del genere).
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Guarda qui:
http://www.eeggs.com/items/42020.html

Questo serve per vedere i nomi del team... io parlo proprio della foto..
ACSH ha scritto:


>
Prova un po' questi, allora:
 ALT + TEAM
 ALT + DEVELOPERS
 ALT + QUALITY
 ALT + VERSION
 ALT + CHUCK
 ALT + JEDI
P.S. Quota sotto, non sopra, grazie.
Ciao.
--
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio

> Nessuno sa come attivarlo?
Come ha trovato Cecilia ...
Fai un collegamento a D7 sul desktop.
In proprietà metti i tasti di scelta rapida a CTRL SHIFT 7
Applica
CHIUDI DELPHI 7
Dal desktop di windows fai CTRL + SHIFT + 7
Appare la foto e poi carica delphi .
Provato con Xp e D7 Pro.
Giulio

 ha scritto nel messaggio
news:rqjhp0ppabdb1jvl6...@4ax.com...

Newsgroup: it.comp.lang.delphi
Titolo: Nome file

Ciao a tutti,
   ho la necessita' di creare un file di testo il cui nome e' formato da 
nome+cogmone di una persona.
Tutto file liscio finche' il cognome presenta l'accento finale.
Riesco ad assegnare il file, lo legge ma quando cerco di salvere le 
modifiche fatte la funzione FileExists ritona sempre false e anziche' fare 
un append si passa al rewrite.
Senza l'accento funziona tutto, il problema e' che il cognome serve completo 
(quindi non posso eliminarlo).
Qualche suggerimento ????
Grazie
Ciao
Daniele 

Puoi postare la parte di codice che si occupa di salvare e rileggere il 
file?

 ha scritto nel messaggio 
news:47c41e65$0$17954$4faf...@reader1.news.tin.it...

Potresti sostituire l'accento con un carattere ASCII standard e 
convertire/riconvertire
ogni volta con una piccola funzione.
Ad esempio la   à   diventa  @, la è diventa $, ecc..
C. 


Ciao, se riesci a postare il codice è meglio, puoi farlo anche qui
http://rafb.net/paste/

 ha scritto nel messaggio 
news:47c41e65$0$17954$4faf...@reader1.news.tin.it...

Sostituisci l'accento con un carattere inusato ma permesso nei nomi di file 
come _
Giorgio 

 file?
Certo, eccolo qui ...
Procedure LeggiPreferenze;
Var S : String;
      F : TextFile;
Begin
    UserLogged:=T.FieldByName('Nome').AsString+#32+T.FieldByName('Cognome').AsString;
    S:=PrgDrive+PrgPath+UserLogged+'.CFG';
    AssignFile(F,S);
   If FileExist(S) Then
   Begin
       Reset(F);
      // Leggo il file riga per riga
   End
   Else
   Begin
       Rewrite(F);
      // Carico i valori di default
   End;
End;
Inoltre uso un file .INI per altri settaggi e si comporta allo stesso modo 
!!!
Credo che cambiero' l'ultimo carattere come mi e' stato suggerito nel 
gruppo.
Grazie a tutti
Daniele 

Domanda scema.. su che sistema operativo lavori (e che fat usi) e con 
che versione di delphi?
Il sistema operativo e la fat servono in quanto vi sono alcune 
limitazioni per i nomi dei file.
Comunque a me funziona correttamente con delphi 2006 e Windows XP pro
Come ti hanno detto (anche per compatibilità con tutti i SO) è meglio 
non usare caratteri "strani" per i nomi dei file
Ciao,
David
Newsgroup: it.comp.lang.delphi
Titolo: Delphi XE - Android - Listbox scorre lentamente

Salve!
Problemino con listbox su android...
Con già 100 elementi scorre lentissimo in verticale...ho solo un detail, 
quindi...bho!
Il device è topgamma...
 
Idee?

 quindi...bho!
 
Ne abbiamo parlato anche di recente su questo gruppo: devi usare il controllo *TListView*:
http://docwiki.embarcadero.com/Libraries/XE8/en/FMX.ListView.TListView
 
 
Ciao,
  Marco.
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
 #Home: 
http://www.marco.breveglieri.name
 
 #Blog: 
http://www.compilaquindiva.com
 
 #DelphiPodcast: 
http://www.delphipodcast.com
 


 
Grazie Marco,
stavo dando giusto un'occhiata....
La cosa che mi lascia molto perplesso è che SEMBRA che dello stile della 
form se ne sbatta...
Io nell stylebook uso il tema dark, ma il TListView rimane bianco 
schifoso...
Anche cambiando tema non cambia niente...
E' normale la cosa?
 
Grazie tante del tuo aiuto!
 
PS: Il Listview VOLA letteralmente! (dovrò riadattare un bel pò di 
codice...ma ne vale la pena!)

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

Qualcuno potrebbe indicarmi dove trovare delle semplici routine per
criptare una parola o una frase. Classico delle pasword.
Grazie mille alla buon'anima che mi votrrà rispondere.

...
http://www.crypto-central.com/
Naturalmente non sono i soli
Ciao ZioPino
.


Se ho capito bene, non ti serve nessuna routine. Se vuoi criptare una parola
in una casella TEdit per esempio basta che imposti la sua proprietą
PasswordChar al carattere che desideri usare per criptare (la x per esempio)
e ogni lettera che scriverai sara sostituita automaticamente. Spero di
esserti stato utile. Ciao!

Newsgroup: it.comp.lang.delphi
Titolo: problemi di stampa con epson 760 e 660

Qualcuno mi sa dire come far stampare i programmi scritti in delphi con le
stampanti epson (ho provato una 760 ed un 660)... i report funzionano bene a
video ma appena vengono inviati alla stampante non succede nulla....
qualcuno è riuscito a stampare???
Uso delphi 4

 video ma appena vengono inviati alla stampante non succede nulla....
E' un problema dei driver Epson, e del loro status monitor. Disinstallali e
installa, al loro posto, il driver generico di Windows per Epson Stylus
Color, e vedrai che tutto torna per magia a funzionare. :)
Ciao, Sandro
Newsgroup: it.comp.lang.delphi
Titolo: Pix_Expert download


Spero che vi sia utile...
La cosa che ritengo piů "nice" č l'Order Form che con un solo click ordina
la sequenza di tabulazione di TUTTI i controlli presenti allinterno di una
form con relativo preview...
Un'altra cosa...
Esiste anche il comando Code Editor  -->> Bring To Front: questo l'ho dovuto
aggiungere perchč in certi casi, quando sei in debug, nonostante si stia
lavorando col code editor, una form del progetto potrebbe comunque rimanere
"On Top" e quindi copre l'"area di debug", con questo comando forzo la form
del code editor a spostarsi in cima allo Z-Order. Basta ricordarsi di
disattivarlo quando non serve piů.
Se avete consigli, critiche,..... io son qui...
Faccio presente che l'header dei metodi č ancora Under Construction e, per
chi volesse usare il package ... non metterti paura quando apri l'abuot
form, non ho ancora trovato una immagine carina.
Per le altre implementazioni che troverete..... parlano da sč.
Ciao a tutti,
  Alessandro


[cut]
ho provato a scaricarlo 
sia da windows che da programmi di download
ma mi dice che l'archivio e danneggiato o vuoto
mi sa tanto che scarico un pagina di errore ...
qualcun'altro a questo problema?
	Ciao
	MassimoB
 

 ha scritto nel messaggio
news:b97t59$p8u$1...@rex.ip-plus.net...


 tu?
mma, non ho preso uno specifico punto di riferimento, anche perchè tutti i
libri che conosco non ne parlano assolutamente e siti dedicati non ne ho
trovato. :(
Quello che ho fatto è stato di girare e rigirare per tutto il mondo trovando
un pò quì e un pò là.
quei pochi siti sui quali ho trovato qualcosa di interessante sono:
http://delphi.about.com/
http://codecentral.borland.com/codecentral/ccweb.exe/home
http://home.quicknet.nl/qn/prive/rapp/delphi/delphi.html
poi mi sono dovuto andare a smazzare i source di Delphi riguardanti le
OpenToolsAPI... Per capire come lavora il "nostro amico".
E da lì piano piano sono arrivato a questo...
Ripeto, di specifico non ho trovato un bel niente, però, guardando un pò
dappertutto, mettendo i vari pezzi insieme.....
Anzi, se qualcono è a conoscenza di qualche sito più specifico, gli sarei
grato se me lo facesse sapere....
Ciao,
  Alessandro Storniolo

 tu?


 mi sa tanto che scarico un pagina di errore ...
Non so perchè ma ho appena verificato che il link al file è case
sensitive... ????
e se non lo rispetti.... il file scaricato sarà vuoto.
Ma come mai?
prova questo link:   
http://www.salexander.supereva.it/Pix_Exp.zip
Newsgroup: it.comp.lang.delphi
Titolo: Interbase 5.6 - Corruzione GDB

Salve a tutti,
avrei bisogno di qualche consiglio e magari di qualche aiuto...
La situazione è questa:
un insieme di processi lavora su un database Interbase (v5.6) ed uno si
essi, il processo gestore, permmette qualora lo si voglia chiudere di
terminare tutto il gruppo di processi.
Come posso implementare la chiusura di questi processi senza rischiare
di corrompere il database? 
Ho fatto qualche prova terminando un processo che stava lavorando
intensamente sun db di prova ma non sono mai riuscito ad operare nessuna
corruzione... fortuna??
E' vero che la causa principale x la corruzione è lo shutdown brutale
del server e non dei processi che stanno lavorando?
Infine come implementereste la funzionalità di buttare giù un insieme di
processi che stanno lavorando su un database?
molte grazie per l'attenzione!
ciao
Lorenzo.
PS:
il mio ambiente di sviluppo è Delphi 7 & RDBMS Interbase 5.6 e ambedue
non possono essere cambiati in nessun modo.
-- 
* Chi non ha testa abbia gambe *

 ha scritto nel messaggio
news:1g8hal0.194pqrm13rhtu8N%lawfu...@despammed.com...


 alla corruzione dei database Interbase/Firebird.
molte grazie lo leggerň domani a lavoro! 
ciao!


 processi che stanno lavorando su un database?
Un messaggio in tcpip?
Potrebbe tornarti utile una tabella nella quale ogni processo si 
registra in entrata e deregistra in uscita.
Ciao
Massimiliano
Newsgroup: it.comp.lang.delphi
Titolo: errori DB e altro..

salve a tutti..
un problema anomoalo..
DB Access, Delphi7, ADO..
all'operazione..
ADOquery1.refresh;
Il programma mi da questo messaggio..
"Le informazioni presenti nella colonna chiave non sono sufficienti per
effettuare l'aggiornamento"..
nn riesco a capire perchč!!?!?!?!?
grazie a tutti
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

cosa hai fatto PRIMA di chiamare il refresh?
A.

 effettuare l'aggiornamento"..
Ho la tua stessa configurzione, con tutti gli update Borland.
Io sto riscontrando un'enormità di problemi con ADO che non si verificavano 
con Paradox (tra i quali anche quello che lamenti tu)...inizialmente, 
ascoltando validi suggerimenti, mi sono illuso che il problema fosse 
nell'eliminazione dei record e quindi ho corretto il programma lasciando 
solo degli appendrecord e sovrascrivendo all'occasione dei record già 
esistenti ma mi è comparso il tuo stesso errore.
Posso dirti che se sostituisco la DBGrid con una TStringGrid (caricandola 
manualmente) ed elimino così i riferimenti al TDataSource i problemi non si 
verificano.
Ho provato tutto quello che mi è venuto in mente ma mi viene voglia di 
cambiare db.
Comunque probabilmente sbagliamo noi.
V.

 A.
nulla ho impostato una query..
la carico.. e se clicco sul punsante refresh.. ho quell'errore..
quindi ho provato a farlo manualemente..
ma la stessa cosa!! :((


 effettuare l'aggiornamento"..
Come usi ADO?
via ODBC o via Microsoft Jet OLEDB (io dico ODBC :) )?
Le soluzioni sono:
1) usa jet
2) non usare jet e invece di refresh usa requery();

> 2) non usare jet e invece di refresh usa requery();
funziona..
grazie 10000
ciao


 effettuare l'aggiornamento"..
controlla anche le proprietà CursorLocation (a seconda del provider di 
dati, a volte va impostata a clUseServer) e CursorType (ctDynamic è 
diverso da ctKeyset) e potrai fare anche il Refresh..
-- 
Mauro Falzari
"Una rosa non è soltanto una rosa,
un lauro non è soltanto un lauro".
  (Alfredo Cattabiani, in "Florario", Milano 1996)
Newsgroup: it.comp.lang.delphi
Titolo: Metodi statici di classe.

E' possibile in Delphi dichiarare un metodo di classe di tipo Static come è
possibile fare in Java?
ex:    public static getValore()
Mi interesserebbe perchè vorrei utilizzare metodi o proprietà delle classi
senza dover istanziare la classe stessa.
Grazie.


Si certo che e' possibile, limitatamente ai metodi pero', ecco un esempio:
type
   TPippo = class
     class function creaPippo:TPippo;
     class function conferma:boolean;
   end;
   class function TPippo.creaPippo:TPippo;
   begin
     Result:=TPippo.Create;
   end;
   class function TPippo.conferma:boolean;
   begin
     Result:=MessageBox(0,'Confermi?','Domanda',MB_YESNO OR 
MB_ICONQUESTION)=ID_YES;
   end;
es. di uso:
var
   pippo:TPippo;
....
   pippo:TPippo.creaPippo;
   if TPippo.conferma then
     Caption:='Confermato';
....
			Ciao, Tony
- - - - - - - - - - - --------======####======-------- - - - - - - - -
Delphi & Java Developer, Graphics Artist, Web Author
Antonino Salvatore CUTRI'  ===---------
   ------=== e-mail:   
a...@asclabs.com
	Web site: 
http://www.asclabs.com
 ===------
                       --==###==--
Visit Java Italian Association site at: 
http://www.jia.it
Guida PHP su supereva: 
http://guide.supereva.it/php

var
   pippo:TPippo;
....
   pippo:TPippo.creaPippo;
   if TPippo.conferma then
     Caption:='Confermato';
....
Tu la istanzi sempre la classe TPippo per poter usufruire dei metodi.
Io mentre volevo fare una cosa del genere:
var val: boolean;
....
val = TPippo.conferma;
senza istanziare l'oggetto TPippo. In Java cosě si fa.
E' possibile farlo anche in Delphi?
Grazie.

> senza istanziare l'oggetto TPippo. In Java cosě si fa.
Domanda...
Come fa Java a d accedere ad un qualcosa che non č istanziato?
Lo so che č OT, ma sono curioso
Bye
AS

Eppure lo fa.
Tu ti crei la classe TPippo con i suoi metodi e proprità.
public class TPippo
{
    public String nome = ""
    public String cognome = ""
    // Costruttore principale
    public TPippo()
    {
        this()
    }
    // Metodo che restituisce una Stringa
    public static String getValore()
    {
        // .......
        return ....
     }
}
Dichiarando il metodo getValore() come Static, puoi utilizzarlo senza
istanziare la classe
String val = TPippo.getValore()
Io voglio fare la stessa cosa con Delphi.


Hai dato un occhio alle class functions?
class function TMiaclasse.GetValore: string;
GetValore lo puoi chiamare anche se l'oggetto nonč istanziato.

L'unica cosa simile in delphi credo siano le class function.
Bye
AS

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

Dove la posso trovare? Qualcuno sa aiutarmi?

sul sito di nevrona hai gia visto?
A


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

volevo sapere solo se cosi ho fatto bene se no accetto consigli e 
suggerimenti
vi metto prima il codice:
[code]procedure TForm1.SpedisciClick(Sender: TObject);
begin
SMTP.Host := Server.Text;
SMTP.Port := 25;
SMTP.MailAgent := Agent.Text;
   MailMessage.From.Address := Da.Text;
 
MailMessage.From.Name
 := Nome.Text;
   MailMessage.Recipients.EMailAddresses := A.Text;
   MailMessage.CCList.EMailAddresses := CC.Text;
   MailMessage.BccList.EMailAddresses := Ccn.Text;
   MailMessage.Subject := Oggetto.Text;
   MailMessage.Body.Text := Messaggio.Text;
   if FileExists(Allegato.Text) then
   TIdAttachment.Create(MailMessage.MessageParts,
                          Allegato.Text);
   try
   try
   SMTP.Connect(3000);
   SMTP.Send(MailMessage);
   except on E:Exception do
   Messaggio.Lines.Insert(0, 'ERROR: ' + E.Message);
   end;
   finally
   if SMTP.Connected then
      SMTP.Disconnect;
end;
end;
procedure TForm1.AllegaClick(Sender: TObject);
begin
if OpenDialog1.Execute then
if FileExists(OpenDialog1.FileName) then
Allegato.Text := OpenDialog1.FileName;
begin
end;
end;[/code]
dal programma sopra puoi notare che l'autoindentificazione è senza login 
ma funziona. però so già che quando lo userò su una chiavetta USB non 
funzionerà perchè il computer ospite non è detto che abbia il mio 
gestore internet, allora ho pensato di aggiungere una opzione per 
includere quando serve anche un login e ho fatto cosi:
[code]procedure TForm1.AutentificatoClick(Sender: TObject);
begin
Smtp.Username := Username.Text;
Smtp.Password := Password.Text;
Smtp.AuthenticationType := atLogin;
end;[/code]
il programma me lo compila senza errori ma volevo sapere se cosi puo 
funzionare se questa scelta di login non deve stare all'interno del 
primo programma che hai vito. Aspetto vostre notizie.

Camaleonte ha scritto:

funziona!
Newsgroup: it.comp.lang.delphi
Titolo: Velocizzare analisi file di testo

Buongiorno a tutti!
Vado subito al sodo...
Ho un file di testo csv MOLTO corposo (2 giga, circa 15 milioni di 
record) che devo "scremare" e tirar fuori circa (di media) 400/500 
record in base al fatto se trovo un campo uguale ad una certa costante 
(chiamiamola "firma").
Al momento procedo aprendo il fil,leggendo riga per riga,split del csv e 
cerco il campo interessato, se lo trovo accodo il record in un memo (che 
mi va benissimo!).
Ho già aumentato con settextbuf il buffer per la lettura del file...
Al momento 15 milioni li elabora in circa 1 ora e mezza...
 
Idee su come velocizzare il loop?
 
PS: è un'operazione che devo fare almeno 2 volte al mese...

senza reinventare la ruota hai provato ad usare da riga comando >findstr firma nomefile.csv > lista.txt
ciao Brunello


GRAZIE INFINITE!!!!!!!!!!
da 8 ore sono sceso a 6 minuti...scremo prima con findstr e poi do in 
pasto al mio sw il risultato...semplice ed efficace!
 
Le cose più banali mi sfuggono sempre di mano :)
 
 
Domandone...come mai è così veloce findstr?

> Domandone...come mai è così veloce findstr?
questo non lo so, comunque questo programma è corrispondente al grep di unix ed ha molte opzioni per affinare la ricerca, comunque se non reindirizzato su di un file di uscita e visualizza a video i risultati non è questo fulmine di guerra, forse il tuo programma aveva lo stesso problema
 

In ambito di full text search, questo prodotto pare sia eccellente:
 
http://lucene.apache.org/core/
 
 
Non l'ho mai usato, quindi prendi con le pinze sia per la velocità sia per capire se riesce a sputarti fuori i dati che ti servono.
 
 
A.


Grazie del link, controllo subito!
 

 
"Alberto Salvati"  ha scritto nel messaggio 
news:687d4e8a-966a-4578...@googlegroups.com...

---
Ma può essere usato in Delphi ? 
 

 Domandone...come mai è così veloce findstr?
 
Hai cambiato l'algoritmo. Findstr cerca la firma in un punto qualunqe,
mentre tu separi tutti i campi *prima* di cercarla. L'operazione è
probabilmente inutile nella maggior parte dei casi.
 
-- 
Virgilio Lattanzi, TSComm srl

> Ma può essere usato in Delphi ?
 
Pardon...Mi era sfuggita la tua domanda.
Magari nel frattempo ti sei informato.
 
http://edn.embarcadero.com/article/38723
Newsgroup: it.comp.lang.delphi
Titolo: Compilazione condizionata

Se inserisco dei {$DEFINE PROVA} i vari IF sono utilizzabili solo nella 
stessa unit, almeno cosi' mi pare dalle prove che ho fatto.
Certo che dover inserire o togliere il DEFINE in ogni unit e' una bella 
seccatura!
Che faccio uso una variabile public che setto all'interno di un IF nella 
unit1 o c'e' qualche altro modo per usare gli IF nelle altre unita'?
Giorgio

 unit1 o c'e' qualche altro modo per usare gli IF nelle altre unita'?
Puoi inserire PROVA nelle opzioni del progetto, in 
Directory/Conditionals nella voce Conditional Defines. In quel modo 
PROVA e' come se fosse definito in tutte le unit del progetto.
ciao
Giacomo

 unit1 o c'e' qualche altro modo per usare gli IF nelle altre unita'?
Oltre alla soluzione già proposta, ricorda che puoi fare uso di "file di 
inclusione" attraverso l'apposita direttiva, che magari contengono la 
definizione delle costanti necessarie al tuo codice.
E' sufficiente includere il file con la definizione delle costanti nelle 
unit in cui esse devono essere valide.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
     Non hai la possibilità di scaricare Turbo Delphi Explorer?
     Te lo spedisco io!! [
http://www.marco.breveglieri.name/?p=48
]

stessa unit, almeno cosi' mi pare dalle prove che ho fatto.
E' un vincolo ragionato e corretto.  Alle soluzioni già proposte
aggiungo solo una nota: avere la necessità di "spargere" compilazione
condizionale nel codice può essere sintomo di cattiva progettazione
del codice, ovvero di scarsa astrazione.
Dovresti usarla il meno possibile e far sì che sia ristretta solo a
porzioni di codice, possibilmente (appunto) nella stessa unit (per
esempio progettando una classe soggetta a compilazione condzionale e
non tutto il codice che ne usa le istanze...).

   Marco.
Buona idea, avendo piu' di un define da abilitare o no.
Grazie a tutti, Giorgio

Newsgroup: it.comp.lang.delphi
Titolo: Nascondere il form¿

Scusate,
Lo so che č sicuramente una cosa banale , ma non sono ancora riuscito a
trovare l'opzione che mi renda invisibile la form  dallo schermo e anche se
č possibile dall'elņenco dei task attivi!
Grazie

...

C'č la proprietą visible, che non devi impostare a Design-Time ma a
Run-Time.
Ciao
--
- Carlo -
BSSoftware Tips Mailing-List Support


Se devi nascondere form principale della tua applicazione e' sufficiente
settare la sua proprieta' "visible" a false e risettarla a true per
visualizzarlo di nuovo...
Se invece devi nascondere un'altra applicazione,
devi prima ricavare il suo handle con la funzione
"FindWindow(lpClassName,lpWindowName)"
e poi utilizzarlo per la funzione "ShowWindow()"
[ShowWindow(Handle,SW_HIDE)]
Le 2 funzioni puoi trovarle documentate nel file win32.hlp.
Newsgroup: it.comp.lang.delphi
Titolo: 2 problemi con DELPHI7

 
          Ciao a tutti...
Mi sono da poco scontrato con delphi 7 e ho bisogno di alcune informazioni:
1- dove posso trovare il componente HypeGrid per DELPHI7?
2- come posso creare i report se non ci sono più i componenti necessari?
Grazie a chi mi illuminerà!!
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 2- come posso creare i report se non ci sono piů i componenti necessari?
hai letto le what's new ed i readme forniti con d7?
AS

Newsgroup: it.comp.lang.delphi
Titolo: Colorare un ListView

Cia a tut,
come da oggetto, qualcuno si è mai cimentato? io non ci riesco (ho poca 
dimistichezza con il canvas), suggerimenti?
Ciao
Fabio 

 poca dimistichezza con il canvas), suggerimenti?
E' abbastanza semplice. Prova questo:
procedure TfrmMain.ListView1CustomDrawItem(Sender: TCustomListView;
 Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
 if Item = nil then Exit;
 if Item.SubItems[1] <> '' then
 begin
  Listview1.Canvas.Brush.Color := clMaroon;
  Listview1.Canvas.Font.Color := clWhite;
 end;
end;
-- 
Jax
====
Se gli uomini sapessero come passano il tempo le donne quando sono
sole, non si sposerebbero.

Newsgroup: it.comp.lang.delphi
Titolo: Campo Blob - Incorrect values within SQLDA structure

Delphi 2007 Win 32 , componenti DbExpress
DataBase Firebird 2.1
SQLConnection :
- libraryname: dbxint30.dll
- vendorlib: gds32.dll
quando confermo un valore valore inserito in un TDbMemo
al momento dell'ApplyUpdates solleva l'eccezione
"Incorrect values within SQLDA structure"
avvine con Dataset sia in dsEdit che dsInsert
Cercando in rete, ho trovato altre segnalazionoi relative allo
stesso problema:
http://qc.embarcadero.com/wc/qcmain.aspx?d=79859
- FireBird direi non abbia colpe, se memorizzo un Blob a mano tramite
l'editor da IBExpert, non segnala errori
- In lettura il campo TDbMemo inserito a mano viene valorizzato
- resta il dubbio sulla dbxint30.dll
nel Blob memorizzo solo testo, e posso sostituirlo con un TDbEdit, ma vorrei
capire da dove arriva il bug, nel caso non avessi scelta.
siete a conoscenza di questo inconveniente ?

Crea una piccola app che fa la insert tramite una query parametrica ed
evita di usareTdbedit TDbMemo etc...
Usi editor non dbaware e poi  al click di un pulsante assegni i
parametri alla query e fa una insert secca...
In questo modo potresti avere una conferma indiretta che sia un
problema legato a dbx..
Ancora una cosa...
Io non so se usi un driver dbx specifico per firebird o usi quello per
interbase...
Nel caso usi quello di interbase, non darei per scontato che sia
compatbile.
E' un po che non uso fb, ma mi sembra di ricordare che a partire da
una certa versione i driver dbx di interbase non siano piu compatibili
con le nuove versioni di firebird.
A.

"Alberto Salvati"  ha scritto nel messaggio

usando come dici una INSERT INTO con parametri, si aggira l'errore.
E' sicuramente un problema legato di Dbx versione 3, ed al driver Interbase
con Firebird 2.1.
Mentre gli stessi driver Dbx con Firebird 1.5 non sollevano eccezione con i
campi Blob.
grazie dei suggerimenti
Newsgroup: it.comp.lang.delphi
Titolo: [OT] Andrea Laforgia sparito ??

 Ciao a tutti ... Andrea Laforgia è veramente sparito ?
 E' vero che è passato a Java ?
 Si trovano su di lui alcuni post su it.comp.java
 Di certo non è una grande perdita per la comunità.
 
 PS qualcuno può postarmi documentazione su MOD1 ? Posso lasciare mail  
 privata o indirizzo IP.
 
 Ciao Troll & AntiTroll
--- posted by geoForum on 
http://www.delphiedintorni.it

 Ciao a tutti ... Andrea Laforgia č veramente sparito ?
No, testa di cazzo, sono ancora qui.


Pensavamo ti fossi dato alla macchia dopo la pubblicazione dei redditi...
Con google tutto ok ? ;-)


Newsgroup: it.comp.lang.delphi
Titolo: [OT] Delphi day 2010 : chi ci sarà di ICLD?

Si terrï¿œ il 10 giugno e verrï¿œ preceduto da una giornata di workshops.
Chi di voi pensa che ci sarï¿œ?
http://www.delphiedintorni.it/delphiday2010.html
Saluti
-- 
Morde

 Chi di voi pensa che ci sarï¿œ?
Idem come sopra... ;)
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Saluti
Io di sicuro...
il girono dopo nella stessa sala facciamo anche il GO Day ;)

 
http://www.delphiedintorni.it/delphiday2010.html
Io con ogni probabilità no.
Ciao
Paolo

 Si terrï¿œ il 10 giugno e verrï¿œ preceduto da una giornata di workshops.
Se qualcuno usa Facebook, ho creato un evento:
http://www.facebook.com/event.php?eid=125757374109982
:)
Ciao!
   Marco.

Newsgroup: it.comp.lang.delphi
Titolo: Porting da delphi7 a delphi2010 e unicode

Un saluto a tutti.
Volendo, anzi, DOVENDO fare il porting di una app da delphi7 a
delphi2010 si tozza su qualcosa per la storia di unicode? Piu'
precisamente:
1) DEVO modificare le dichiarazioni di cose tipo pchar, array of byte,
array of char o altri?
2) Ci sono impatti se uno usa Ansixx (ansipos, ad esempio)
2) Strumenti di terze parti per la localizzazione come multilizer si
potrebbero scontrare su questa cosa
Se servono altri dettagli chiedete, ok?
Pax vobiscum
A.

 precisamente:
le modifiche da fare sono tante, e cos� i test, sia che tu vada verso la 
strada dell'Unicode, sia che tu voglia restare ancorato all'Ansi. Magri 
comincia con il leggere:
http://www.embarcadero.com/images/dm/technical-papers/delphi-unicode-migration.pdf
Auguri :-)
Sandra 

 strada dell'Unicode, sia che tu voglia restare ancorato all'Ansi.
Intanto grazie per il link che guardo appena ho 2 millisecondi.
Ma quindi io DEVO cambiare qualcosa o posso lasciare il codice
sorgente cosi come e'?
A.

 sorgente cosi come e'?
dipende da cosa c'� nel codice, da che uso insomma fai delle stringhe. 
Potresti dover cambiare un p� tutto, oppure molto poco. Scegli innanzitutto 
se l'unicode ti serve oppure no, poi agisci di conseguenza. Se non dovesse 
servirti, vedi anche la unit ansistrings, che contiene molte funzioni 
specifiche per le stringhe ansi. Ah, e se per caso utilizzavi la vecchia 
unit ottimizzata FastStrings, devi rinunciarci., che tu vada verso l'ansi o 
meno.
Sandra 

delphi2010 si tozza su qualcosa per la storia di unicode?
Che tipo di applicazione �?

> Che tipo di applicazione ?
Alcune parti in delphi5 a altre in delphi7.
Ado e Bde per oracle 8i, 9i, 10g e 11g + ado per SqlServer (msde,
SqlServer2000, SqlServer2005).
Tante dll (pchar e widestring), socket (indy e tclientsocket +
TServerSocket), rs232 e forse 485, multithreading come se piovesse.
Una app usa una libreria di classi fatta con .net 2.0 vista come COM,
ma questa e' roba di poco.
Le cose in delphi5 usano InfoPower, mentre quelle in delphi7 usano
Developer Express.
Il tutto da tradurre in almeno 5 lingue: multilizer o sisulizer, mo
non so bene quale dei 2.
Stiamo pianificando un refactoring per varie cose, tipo sostituire bde
(da valutare se passare tutto su ado o saltare su dbx...), uniformare
le gui usando solo developer express e altro.
Non posso dire di piu' per i soliti motivi.
A.

 Se servono altri dettagli chiedete, ok?
Idem. :)
Comunque, penso che il documento suggerito da M.Sandra ti possa dare gi� 
una buona fetta di indicazioni utili per superare gli ostacoli iniziali; 
se ci sono casi specifici, illustraceli.
Ciao!
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Newsgroup: it.comp.lang.delphi
Titolo: Delphi 7 e stampanti Zebra

Quanlcuno non ha mai avuto a che fare con queste stampanti??Per
questioni tipo per stampare etichette barcode..ecc..
Grazie a tutti!!!!!!!!

 Quanlcuno non ha mai avuto a che fare con queste stampanti??
Le stampanti di quella marca servono essenzialmente a fare 'ste cose.
Ho usato dei modelli vecchi, collegati al pc via centronics come le
normali stampanti.
Esiste un driver per winzozz che (credo) permette di gestirle come
normali stampanti senza dover specificare le classiche sequenze escape
usate ai bei vecchi tepi dos, a patto ovviamente di dimensionare la
"pagina" nel formato corretto della etcihetta.
Imgo, se ora ci sono modelli usb, credo valga la stessa cosa.
Pax vobiscum
A.

 wrote:

Ciao Si, e di recente meno di un mese fa. ZEBRA su USB
Mi sono imparato il linguaggio macchina che hai con il cd a corredo
poi ho stampato con una procedura del genere:
tipo :
PrintLineToNamedPrinter(ListPrint.Items[Zebra], 'N'+#10);
PrintLineToNamedPrinter(ListPrint.Items[Zebra],
'A350,50,1,2,1,1,N,"PROVA!!!!!"'+#10)
PrintLineToNamedPrinter(ListPrint.Items[Zebra], 'P1'+#10);
ListPrint.Items[Zebra] = INDEX STAMPANTE WINDOWS DA PRT-SETUP
procedure PrintLineToNamedPrinter(Const PrinterName,PrtLine: string);
var
   BW: DWORD; //Bytes actually written to phe printer
   hPrinter: THandle;
   DocInfo: TDocInfo1;
begin
   if not WinSpool.OpenPrinter(PChar(PrinterName),hPrinter,nil) then
     raise exception.create(Format('Printer %s not found',
[PrinterName]));
   try
     DocInfo.pDocName := 'MyDocument';
     DocInfo.pOutputFile := Nil;
     DocInfo.pDatatype := 'RAW';
     if (StartDocPrinter(hPrinter,1,@DocInfo) = 0)
       then Abort;
     try
       if not StartPagePrinter(hPrinter)
         then Abort;
       try
         if not
WritePrinter(hPrinter,PChar(PrtLine),Length(PrtLine),BW)
           then Abort;
       finally
         EndPagePrinter(hPrinter);
       end;
     finally
       EndDocPrinter(hPrinter);
     end;
   finally
     WinSpool.ClosePrinter(hPrinter);
   end;
end;
Spero di esserti stato utile...
Ciao Ciao Marco.

> Mi sono imparato il linguaggio macchina che hai con il cd a corredo
HO IMPARATO il... :-))
A.

Grazie a tutti ragazzi!!!!!


Io ho un programma che mi crea i barcode che ho sviluppato con un
componente gratuito trovato in rete (qrbarcode) però
dovro avere a che fare con le stampanti zebra...tu con questa
procedura riesci ad impostare la stampa in modo da stampare giusto???
Hai altre informazioni da darmi per caso?grazie mille della tua
collaborazione!!!

 collaborazione!!!
Per stampare i barcode ho sempre utilizzato il linguaggio Zebra
Eccoti un esempio:
PrintLineToNamedPrinter(0, 'B130,50,1,3,2,5,80,B,"' + CodiceArticolo +
'+"'+#10);
così stampo il codice a barre CODE39 di un articolo.
Secondo me, lascia fare tutto alla stampante così non avrai problemi
ed è anche più
veloce rispetto alla stampa in "grafica" di windows.
Spero di esserti stato utile.
PS.Per Alberto Salvati...scusa hai ragione a volte per scrivere di
fretta....succede anche queste zozzerie grammaticali

 HO IMPARATO il... :-))
nissciuno nasce imparato... :-P
-- 
Morde
Newsgroup: it.comp.lang.delphi
Titolo: Nascondere il form main





Come posso fare per nascondere il form principale 
del mio prg 
nel momento in cui 


apro 
un'altra 
form?


 


Grazie a tutti!


 



 ha scritto nel messaggio
news:000801c09fc7$788738d0$7400000a@acs...


Newsgroup: it.comp.lang.delphi
Titolo: idFTP su Server Unix

Salva a tutti
ho sempre usato idFTP per il trasferimento file senza problemi, ma
questa volta devo scaricare dei file da un server Unix con la
particolarità che tutti i file hanno lo stesso nome !!
se chiedo la idFTP.List con i dettagli tutto ok, li trova tutti ma come
posso eseguire il GET se il SIZE mi riporta sempre -1 ?
e poi come specifico il file che mi interessa ??
dovrei provare a scaricarli per numero versione ma non vi è modo di
passarlo al GET
Data la completezza dei componenti Indy sono sicuro che abbiano pensato
anche a questo, ma come??
Sperando che qualcuno mi possa illuminare ....grazie..

Volevo aggiungere che ho settato
idFtp1.DirectoryListing.ListFormat := flfUninx
ma che
idFtp1.DirectoryListing.Count riporta sempre a zero! Nonostante la
TStrings destinataria di List sia popolata dell'elenco completo dei
file!
Ancora grazie

Newsgroup: it.comp.lang.delphi
Titolo: Evento FormKeyDown

Ciao,
ho impostato sul form il KeyPreview:=True per intecettare prima gli eventi
sul FormKeyDown.
Alla pressione del tasto "-" (key 109) dovrei impostare una certa variabile
e vorrei interrompere l'evento per questo ho impostato Key:=0.
Se però sono su un TEdit , questo riceve lo stesso il carattere "-":
come posso evitare di propagare l'evento anche sui componenti sul form ?
Grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 come posso evitare di propagare l'evento anche sui componenti sul form ?
non chiarisci se riesci comunque ad intercettarlo.
Giorgio

 Giorgio


 ha scritto nel messaggio 
news:dfrtln$vkf$1...@news.newsland.it...


Devi usare l'evento OnKeyPress
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  If Key = '-' Then Key := #0;
end;
Spiego....
Alla pressione di un tasto vengono richiamati i seguenti
OkKeyDown  - generato quando premo il tasto
OnKeyUp - generato quando rilascio il tasto (quest'ultimo richiama 
OnKeypress)
Quindi o esegui la disabilitazione del tasto sia in OnKeyDown ed in 
OnKeyUp oppure solamente su OnKeyPress
Ciao,
David

Newsgroup: it.comp.lang.delphi
Titolo: QuickReport e stampante

A qualcuno risulta che la stampante predefinita affinchè funzioni
QuickReport sia per forza una stampante locale? In Delphi4 upd3 non
riesco a fare funzionare una preview con stampante predefinita di rete.
Grazie.
Gregor


Io ho D4 upd 3 , Q.R. 3.0.5. e ho la stampante predefinita in rete e
funziona tutto.
magari devi aggiornare Q.R.