mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Creare una scheda con i saldi

Devo creare una semplice scheda con data, dare, avere e saldo, ho provato
con SQL e non ci sono riuscito, ho provato con gli eventi del DataSet
(Query), ma il risultato è stato ancora negativo. Non posso calcolare ad
ogni operazione il saldo perchè le operazioni possono essere modificate sia
come data di registrazione che come importo. Qualcuno ha qualche
suggerimento o componente (rigorosamente free) da suggerire? Grazie per
l'aiuto che vorrete darmi.
--------------------------------
Inviato via 
http://usenet.libero.it

 (Query), ma il risultato è stato ancora negativo.
Come hai provato? Posta un po di codice.
Bye
A.

Ho utilizzato OnCalcFields, impostando a Zero il saldo al momento
dell'apertura del DataSet, ma la somma/sottrazione si ripete piu' volte, se
imposti a Zero direttamente nell'evento non effettua somma o sottrazione...


componente di accesso dai dati? TTable?TQuery?
A.

Imposta una variabile globale (es. FSaldo: extended) nella sezione PRIVATE
della form. Quindi, nell' evento onCreate della Form la inizializzi (es.
FSaldo:= 0).
A questo punto, nell' evento OnCalcFields incrementi o decrementi questa
variabile globale sommando o sottraendo i valori del campo da calcolare (es.
FSaldo:= FSaldo + ValoreCampo.AsFloat).
La variabile è di tipo private, quindi accessibile e modificabile solo dalla
classe che l' ha istanziata (TFormXXXXX) ed è globale, ossia visibile in
tutti i metodi o eventi della classe stessa.
Marco Soravia.

 ha scritto nel messaggio
news:vhfu9.76040$RO.19...@twister1.libero.it...


ma hai letto nella guida la parte relativa a OnCalcFields?
A.

Potresti usare due metodi alternativi:
cicli tramite while not Eof tutti i record che ti interessano (creando una
funzione ad hoc tipo CalcolaSaldi) ogni volta ke ne hai bisogno.... Se la
tabella č grande potrebbe volerci un po' di tempo... [non č una soluzione
ottimale]
Crei una istruzione SQL ad hoc (tipo SELECT sum(valore) form Tabella) ke ti
restituisca il dato voluto instanziando a runtime [ricorda di distruggere l'
oggetto] un componente Query il tutto inglobato in una funzione...
[consigliato e piů veloce]....
Marco Soravia.

Utilizzata la prima soluzione con tabella di modifica ad hoc e
disabilitazione dei controlli collegati per velocizzare la visualizzazione e
non visualizzare le modifiche. Tutto ok.

--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.lang.delphi
Titolo: DB ACCESS REMOTO

Ho appena scoperto questo forum e sono convinto che qualcuno di voi mi puo'
aiutare!!!
Programmo in delphi da poco, ed ho un problemino: Ho un *.mdb pubblicato su
internet funzionante tramite richieste da parte di pagine fatte in asp (con
sql). Avrei la necessità di leggere e scrivere in questo db cn
un'applicazione sviluppata in delphi. Qualcuno mi sa dire che oggetti devo
inserire nel prog per la connessione al db nel server? Qualche idea ce
l'avrei, ma nn riesco a trovare materiale didattico. Vi ringrazio
anticipatamente e aspetto qualche risposta... 
ton...@libero.it
--------------------------------
Inviato via 
http://usenet.libero.it

 wrote in message
news:80Z116Z200Z163Y...@usenet.libero.it...


Ho fatto anch'io qualche tempo fa un programma esattamente uguale al tuo.
Vista l'impossibilità di aggiornare in qualsiasi modo access, che non è un
database client server, l'unica possibilità che rimane
è quella di aggiornare "in blocco" il file, ovvero di trasferirlo sulla
macchina remota tramite FTP, anche se questa soluzione può causarti qualche
problema nel caso in cui il database sia stato utilizzato di recente e
pertanto sia bloccato.
Puoi pertanto utilizzare i componenti Indy, che sono open source, per la
gestione dei trasferimenti tramite FTP ( 
http://www.nevrona.com/indy
 ).
Ciao,
JD

Newsgroup: it.comp.lang.delphi
Titolo: Icone programmi office

Salve a tutti,
 
  domanda banale, dove posso trovare delle icone che mi rappresentino il programmi di office (excel, word etc)?
  Mi servano da mettere a bottoni che richiamano cio che rappresentano.
Grazie,
    Marco Olivieri
-- 
Posted from 212.177.57.193 by way of [212.141.54.112] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

  Mi servano da mettere a bottoni che richiamano cio che rappresentano.
Puoi sempre catturare lo schermo schiacciando il tasto "stamp" ed incollando
in un prog di grafica.
ciao
Gungo

 in un prog di grafica.
In un NG di programmazione mi aspettavo quantomeno di sentire "Usa la
funzione ExtractIcon" :-)
--
- Carlo -
c.b...@libero.it

 funzione ExtractIcon" :-)
Heheehe
E' vero perň che spesso la via piů breve non č sempre la piů virtuosa!
Dato che ci siamo ho una domandina.
Ho fatto un prog che prende le icone da Exe e Dll ma in Office non ne
trova!!!
La ExtractIcon in casa M$ non deve essere molto usata! ;-)
ciao
Gungo

 trova!!! La ExtractIcon in casa M$ non deve essere molto usata! ;-)
Io ho fatto un semplice programmino in cui puoi "dragghendroppare" :) i file
.exe/.dll e lui ti estrae le icone ... lo ho appena fatto con Winword.exe ed
ha funzionato benone! Tra l'altro uso ExtractIconEx in maniera pressochč
scabrosa ... se vuoi ti posso inviare i sorgenti o magari scriverli qui!
Ciao


 Ciao
Il mio era ricorsivo,  prendeva tutti i file a partire da una dir.
Spronato dal tuo risultato positivo sono andato a rivederlo !!!!
Mannaggia ! Hai ragione!
Il mio prog non processava nemmeno i file di Office, ovvio che non vi
trovasse icone!
E sai che cosa mi fa rabbia ?
Che non li processava perchč l'estensione del file era '.EXE' ed io la
confrontavo con '.exe'!!!!!
Ho corretto ed ora funge!
L'avevo scritto un annetto fa! Ma mi dispiaceva lasciarlo bacato!
ciao
Gungo

 L'avevo scritto un annetto fa! Ma mi dispiaceva lasciarlo bacato!
Ben fatto! :-)


>  domanda banale, dove posso trovare delle icone che >mi rappresentino il
programmi di office (excel, word >etc)?
  Esiste un programmino ben fatto che si chiama IconSnatcher. Estrae le
icone da exe e dll. Molto comodo. Volevo darti il link ma quello che appare
nella finestra di about sembra non essere + valido. Fai una ricerca con il
nome...
ciao

Newsgroup: it.comp.lang.delphi
Titolo: Riduzione qualità jpeg

Salve a tutti,
                    vorrei ridurre la qualitą di immagini jpeg.
Usando questo codice
Jpg := TJPEGImage.Create;
Jpg.LoadFromFile(nomefile);
jpg.PixelFormat:=jf8Bit;
jpg.CompressionQuality:=1;
jpg.SaveToFile('c:\prova.jpg');
non ottengo alcun risultato sembra che non lo sfiori nemmeno.
Qualcuno riesce ad aiutarmi.
Grazie Giņ

 non ottengo alcun risultato sembra che non lo sfiori nemmeno.
Credo che per ragioni di ottimizzazione, la classe mantenga in memoria anche
uno stream dei dati originali (come fa ad esempio TBitmap). probabilmente la
modifica della proprietà compressionQuality non va a pulire quello stream e
quindi il savetofile non invoca la ricompressione della bitmap interna...
Controlla il metodo compress, credo che faccia al caso tuo:
procedure Compress;
Description
Call Compress to compress for optimization, such as before streaming out
when assigning a bitmap to a JPEG. Changing properties like
CompressionQuality does not force a compression. To force a compression,
call Compress.
Ciao
Matteo


Il metodo compress serve per salvare una bitmap convertendola in jpeg.
Non è quello che interessa a me perchè facendo la conversione jpg to bitmap
(tramite Assign) ho un decadimento delle prestazioni da paura, io vorrei
aprire una jpg, ridurla di qualità e salvarla senza passare per oggetti
bitmap.
Ciao Giò

 ha scritto nel messaggio
news:b4kfed$jpm$1...@le.cs.unibo.it...

Non credo sia possibile senza creare direttamente o indirettamente un bitmap
temporanea e il calo di prestazioni è giustificato dall'alta elaborazione
richiesta...
Il suggerimento che ti posso dare, assieme all'altro, è di giocare
eventualmente con il parametro TJPEGPerformance che può farti guadagnare
performance di decompressione nella bitmap temporanea...
Se l'oggetto in sè non permette una conversione al volo di qualità (cosa che
non credo), l'unica risposta è una bitmap temporanea.
Ciao
Matteo
Newsgroup: it.comp.lang.delphi
Titolo: DBGrid, riga corrente

Scusate se posto subito un'altra domanda (mea culpa)
Nella mia form ho una dbgrid collegata ad un db access e alla dbgrid ho
associato un popup menu.
Vorrei individuare il numero del record selezionato, ma non sò come si fà.
Mi spiego meglio...
Quando faccio click con il tasto destro del mouse su una riga, devo prendere
tutti i valori dei campi del record selezionato ed associarli a delle
variabili, in seguito eliminare il record in questione. Fino a prendere i
valori dei campi ci riesco, il problema stà nell'individuare il record
selezionato per cancellarlo!. (O meglio come cancello il record
selezionato?).
Grazie



Per individuare il record corrente usa :
tADOTAble1.RecNo ti ritorna il numero del record corrente.
Per trasferire i campi nelle variabili :
...
var1 := tADOTable1.FieldByName('Campo1').AsString ;
var2 := tADOTable1.FieldByName('Campo2').AsInteger ;
var3 := tADOTable1.FieldByName('Campo3').AsBoolean ;
var4 := tADOTable1.FieldByName('Campo3').AsDate ;
...
tADOTable1.Delete ;
Ti cancella il record selezionato.
Le cose sono più sempilici se usi un dbNavigator.
Per eseguire il delete ( simbolo '-' ) il Modify ( triangolo ) e l'Append (
simbolo'+' )
Ciao
Mario (
mari...@inwind.it
)
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/
Newsgroup: it.comp.lang.delphi
Titolo: Convertitore numero-parole

Ho bisogno di creare un programma in grado di trasformare il numero inserito
dall'utente in parole... L'esempio sottostante vi farà capire meglio......
1645  {numero inserito dall'utente}
{al all'evento click del bottone...}
milleseicentoquarantacinque
All'apparenza è sembrato molto facile anche a me, ma in effetti non lo è....
Qualcuno sa darmi un'idea su come fare questo prog? Ringrazio
Anticipatamente bulmax Andrea 
spi...@inwind.it

 milleseicentoquarantacinque
Cerca su google con la chiave:
| download "Delphi Tips&Tricks" |
vai sul primo link e scarica tutto, è un insieme di tips tra cui c'è 
anche quello che chiedi.
Non l'ho mai provato.
Diego
--- posted by geoForum on 
http://www.delphiedintorni.it

[...]All'apparenza è sembrato molto facile anche a me, ma in effetti non lo è....
Lo è, lo è.  L'algoritmo è veramente banale.
Dato l'array: 
const
   DigitAsString: array [1..9] of String =
('uno','due','tre','quattro','cinque','sei','sette','otto','nove');
   TensAsDigit: array [10..90] of String =
('dieci', 'venti', 'trenta', 'quaranta', 'cinquanta', 'sessanta',
'settanta', 'ottanta', 'novanta');
Supponendo di avere:
1717172390
Dividi a gruppi di 3 a partire da destra:
390
172
717
001 (due zeri iniziali di "padding").
A questo punto, applichi a ciascun gruppo lo stesso meccanismo di
traduzione: 
1. estrai le centinaia, le decine e le unità;
2. applichi DigitAsString alle centinaia (se <> 0) e vi aggiungi
'cento'; 
3. applichi TensAsString (se <> 0) alle decine;
4. applichi DigitAsString (se <> 0) alle unità;
5. Risolvi casi del tipo "ventiuno" o "ventiotto" o "dieciuno",
"diecidue",... traducendoli rispettivamente in "ventuno", "ventotto",
"undici", "dodici", ecc...
6. aggiungi i suffissi in ragione del gruppo considerato (migliaia ->
+"mila", milioni -> +"milioni", miliardi -> +"miliardi" ecc...)
Poi, sommati i risultati di ciascun gruppo, risolvi casi del tipo
"unomiliardi", "unomilioni", "unomila", ... traducendoli
rispettivamente in "unmilione", "mille", ecc...

 Qualcuno sa darmi un'idea su come fare questo prog?
http://groups.google.it/group/it.comp.lang.delphi/msg/c62b566652dc17d8?hl=it&
Questo post del mai dimenticato Zortek (ma dove sei finito Sandro??!!) e'
perfetto!
Ciao
-- 
Morde. 
ICLDweb: 
http://www2.samatel.com/icld/

Newsgroup: it.comp.lang.delphi
Titolo: Esportare archivi paradox AIUTOOOOOO





Salve a tutti. Vorrei inserire in una mia 
applicazione, esportartazione delle tabelle (queste sono in formato paradox ed 
indicizzate), qualcuno potrebbe darmi un suggerimento di come di 
fa?


Inoltre, una volta esportato la 
tabella contenente per esempio 10 record,  dopo aver inserito altri record 
nell'applicazione ed essere arrivato a 15 record posso fare una append ed 
inserire solo gli ultimi 5 record nella tabella esportata????


 


Graziee



 wrote 
  in message 000801c0b2aa$041f52c0$25a02dd5@gczogs7...

Newsgroup: it.comp.lang.delphi
Titolo: ColorDialog

Come trasformo un colore di un ColorDialog in
codice per l'html tipo #FFFFFF ?
ciao
erik

 codice per l'html tipo #FFFFFF ?
var
  HTMLColor: string;
begin
  ColorDialog1.Execute;
  FmtStr(HTMLColor, '%s%.6x', ['#', ColorDialog1.Color]);
  ShowMessage(HTMLColor);
end;
-- 
I'am what I'am, I do what I can

Newsgroup: it.comp.lang.delphi
Titolo: Come Ottengo l'elenco delle stampanti IN RETE ?

Come Ottengo l'elenco delle stampanti IN RETE ?
tipo :
NOMECOMPUTER1\\NOMESTAMPANTE1
NOMECOMPUTER2\\NOMESTAMPANTE2
NOMECOMPUTER3\\NOMESTAMPANTE3
deve funzionare sia sotto WIN 9x che sotto NT / 2000 /XP.
Saluti.

>Come Ottengo l'elenco delle stampanti IN RETE ?
il codice che segue inserisce tutte le stampanti di rete nella lista
di selezione di una combo box.
Inoltre inserisce nella property Text della stessa combo box il nome
della stampante di default.
Attenzione: l'oggetto Printer (di tipo TPrinter) e' definito in
printers. Non va creato. 
Ciao
Duilio
uses ... printers, ...
...
implementation
...
procedure TForm1.FormCreate(Sender: TObject);
begin
   ...
   PrtBox.Items.Assign(Printer.Printers);
   PrtBox.ItemIndex:=Printer.PrinterIndex;
   ...
end;

Newsgroup: it.comp.lang.delphi
Titolo: chiamare da un altro form un TQuery

Salve, 
devo fare in modo che da un form di inserimento dati quando si chiude
gli stessi siano visualizzati su un form principale, dove uso un
componente TQuery. Io ho scritto queste due righe ma qualcuno,
gentilmente, mi potrebbe confermare o correggere?
nell'evento FormCloseQuery del Form di inserimento:
frmmain.Query1.Close;
frmmain.Query1.Open;
sembra funzionare, ma non vorrei effetti collaterali... :-)
Grazie in anticipo.
Robin

Questa potrebbe andare, ma se la uqry restituisce molti records avrai dei
rallentamenti.
Hai gia provato il refresh?
Saluti
AS
"Se è Microsoft non funziona"

Hai gia provato il refresh?
Già il refresh....non ci avevo pensato.
Grazie comunque.

Newsgroup: it.comp.lang.delphi
Titolo: Tedit e Trasparenza

Salve Ns,
ho il seguente problema:
ho bisogno di un obj per poter scrivere come Tedit o TMemo,
ma dovrei poter impostare il backcolor come trasparente come ad esempio una
TLabel.
Qualcuno puň darmi una mano?
Grazie Tante a Tutti......
Ciao

 TLabel.
prova questo:
http://www.torry.net/vcl/edits/enh/trancomp.zip
o magari questo:
http://www.torry.net/vcl/edits/other/bfadvedit.zip
oppure:
http://www.torry.net/vcl/packs/interfacelite/fusion.zip
o anche:
http://www.torry.net/vcl/edits/enh/advluedt.zip
In definitiva: cerca su torry!
--
{MSX}  -  
http://msx.rules.it
Mantenitore delle FAQ di it.comp.lang.delphi,
reperibili qui: 
http://gpi.infomedia.it/abc/delphi/FaqDelphi.txt

 Qualcuno può darmi una mano?


Newsgroup: it.comp.lang.delphi
Titolo: Circuiti elettrici

Salve a tutti dovrei realizzare un circuito eletrico per accendere e
spegnere degli interruttori gestito da delphi.
Dove posso trovare qualcosa in merito?
Grazie
--------------------------------
Inviato via 
http://usenet.libero.it

perchè non usi delle schede I/O pci che sono interfacciabili pure via
activex e delphi
Simo

 Dove posso trovare qualcosa in merito?
Su IoProgrammo c'e' una serie di articoli su come interfacciare il PC
tramite seriale e parallela con Delphi.
-- 
Slaine Mc Roth
Linux User# 312607
Linux Machine# 198324

tramite seriale e parallela con Delphi.
Di questo mese ?
-- 
Morde. 
(morde at programmer dot net)

> Di questo mese ?
E' già qualche mese che portano avanti una serie di articoli riguardanti
l'interazione del PC con il mondo elettrico esterno, utilizzando Delphi per
la realizzazione delle interfacce. Articoli direi moooolto interessanti.
Cià
Fra. :-)

| Salve a tutti dovrei realizzare un circuito eletrico per accendere e
| spegnere degli interruttori gestito da delphi.
| Dove posso trovare qualcosa in merito?
|
| Grazie
Se sai un po' di elettronica non dovrebbe esserti difficile realizzare
qualcosa conoscendo i segnali in out-put dalle porte COM (dovrai utilizzare
un apposito integrato per la trasformazione in/da RS232) oppure utilizzando
la porta parallela. Poi da Delphi invierai i dati alla porta che avrai
scelto.
Spero di esserti stata d'aiuto. Ciao.
..::[ Panz ]::..
-----------------------
per rispondere riscrivi in numeri la mia eMail!

Prima di tutto volevo ringrazieare a tutti quelli che mi hanno risposto.
Secondo nella mia zona ho cercato "IO PROGRAMMO" ma è finito.
E volevo sapere se inviata una Jpg degli articoli per vedere da dove
incominciare.
Terzo qaulche annetto fa trovai un sito francese dove c'era tutto su delphi
e i cicuiti qualcuno l'ha trovato?
Grazie
Jojoba

Newsgroup: it.comp.lang.delphi
Titolo: valuta e db

salve ragazzi, sto lavorando ad un gestionale ovviamente collegato a un db 
(access x il momento) (delphi 7, BDE, Access 2003)
faccio uso di controlli data-aware e vorrei che le cifre decimali di un 
prezzo venissero visualizzate e nn arrotondate, oh meglio:
se ho nel db in un campo "Prezzo" di tipo "Valuta-Euro" il valore 56, nel 
database viene visualizzato correttamente ossìa "56,00" nei controlli 
(data-aware) viene visualizzato 56, come posso costringere il programma alla 
corretta visualizzazione?

gia visto le property della classe tfield?
-- 
Alberto Salvati
A NEAPOLITAN Delphi Developer who is studying c# and .net
"Dicette 'o pappece 'nfaccia 'a noce dammi 'o tiempo che pure te spertoso"

 ha scritto nel messaggio 
news:d4g5n4$1re9$1...@newsreader1.mclink.it...


Newsgroup: it.comp.lang.delphi
Titolo: errore con NT 4

Aiuto avrei bisogno di qualche consiglio per un errore che si verifica con
NT.
Il mio programma compilato in Delphi 4 funziona corretamente in Win 95 / Win
98 ma in Windows NT 4 all'avvio del
programma da un errore al modulo NTDLL.DLL confermando l'errore poi il
programma continua. Come
posso evitare un errore del genere. Grazie per l' aiuto.
Diego

Ti capita solo da IDE o dall'eseguibile?
Hai x caso le opzioni di debug attive?
Prova a disattivarle.
Inoltre, quale service pack è installato su Nt?
Bye
AS
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.delphi
Titolo: Delphi e Windows 2000

Volevo chiedere.. per lavorare con Delphi sotto Windows 2000 bisogna passare
per forza a Delphi 5, o va bene anche Delphi 4? Fatemi sapere!
Grazie!
Max

 ha scritto nel messaggio
news:8tfi41$qdp$1...@serv1.albacom.net...


Newsgroup: it.comp.lang.delphi
Titolo: Newbie: copiare files e directories

ciao a tutti...
una domanda probabilmente banale.
Volevo scrivere un programmino che deve semplicemente fare questo:
- ho una directory di cui conosco a priori il contenuto (files e subdir)
- voglio copirne il contenuto intero su un altro disco specificato
dall'utente
ho risolto il problema della copia di un file (file non directory) ma non so
bene come fare per dire all'applicativo (alla pressione di un pulsante):
- copia tutto quello che trovi nella dir (quindi file e subdir) sul disco
specificato dall'utente.
magari per il sistema è la stessa cosa e basta reiterare il ciclo...
sarebbe bello poter avere una funzione che accetti un carattere jolly (*.*)
in modo da riciclarla sempre.
spero il problema sia chiaro...
grazie 1000 per l'aiuto
Paolo

 ha scritto nel messaggio
news:ail8ej$14q4a9$1...@ID-83500.news.dfncis.de...

Ciao, prova ad usare la SHFileOperation:
procedure TForm1.Button1Click(Sender: TObject);
var
  H: _SHFILEOPSTRUCT;
begin
  H.Wnd:= Application.Handle;
  H.wFunc:= FO_COPY;
  H.pFrom:= pchar (<dir da copiare>);
  H.pTo:= pchar (<dove vuoi copiare la dir>);
  H.fFlags:= FOF_RENAMEONCOLLISION;
  SHFileOperation (h)
end;
ciao ciao

 wrote in message
news:oQp39.37754$lu5.1...@twister1.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: [BDE]: Lentezza query verso MsSQL Server

Ciao a tutti,
scrivo al NG perche' ho un problema abbastanza inconsueto relativo ad un
programma su cui lavoro.
Il programma e' gia' consolidato e lavora su db MsSQLServer tramite BDE.
Recentemente ho implementato delle modifiche introducendo nuove query e
controlli data-aware.
Di questi ultimi, una query e' particolarmente lenta in apertura.
Per il recupero dei dati ho utilizzato un oggetto TQuery impostando a
run-time lo statement SQL.
Tipicamente comunque la query che viene eseguita e' nella forma classica
seguente:
    SELECT * FROM <tabella>
e impiega diversi secondi (nell'ordine delle decine) per il recupero dei
dati.
Il numero dei record recuperati (nell'ordine delle decine di migliaia) non
giustifica tali tempi (anche se comunque ho notato che la dimensione del
recordeset rappresenta un fattore determinante) in quanto la stessa query,
eseguita tramite il programma SQL Explorer (lanciato dall'IDE di Delphi),
viene eseguita con dei tempi molto minori.
Monitorando l'interazione del programma in fase di debug con il DB tramite
l'utility SQL Profiler di Microsoft ho inoltre notato che, diversamente a
quanto accade di solito, l'istruzione in Delphi:
    qry.Open;
non corrisponde all'esecuzione della query.
Al contrario, questa sembra essere rimandata fino alla successiva (quale che
sia) istruzione
    .Open
relativa ad un'altra query.
Ho cercato un po' in Internet ma senza esito.
Qualsiasi suggerimento e' ben accetto.
Grazie,
baba

     .Open
Su questo perň non so che dirti...
Saluti
	Marco Bortolani
	info @ 
marcobortolani.it

Newsgroup: it.comp.lang.delphi
Titolo: Jpeg e MySql

Sto utilizzando un controllo TDbImage per salvare/visualizzare delle
immagini all'interno di un database di MySql.
Per Caricare le immagini, facendo doppio clic sul controllo, appare una
dialog per la selezione del file immagine da inserire:
procedure TfrmGestioneOpere.imgImmagineDblClick(Sender: TObject);
begin
  if mdiMain.dlgImage.Execute then
    begin
      dmMySql.cdsOpere.Edit;
      imgImmagine.Picture.LoadFromFile(mdiMain.dlgImage.FileName);
    end;
end;
Funziona perfettamente fino a quando uso BMP.
Se inserisco un immagine JPEG, la visualizza, ma quando vado a salvarla
(ApplyUpdates),
scompare, e se guardo nel campo di mysql, il record è NULL.
Ho provato (su mysql) a usare campi BLOB, MEDIUMBLOB, E LARGEBLOB, pensando
fosse un problema di dimensioni, ma niente.
Qualcuno sa dirmi perchè non riesco a salvare le immagini JPEG?
Grazie
Claudio

 ha scritto nel messaggio
news:E_Z3b.276710$Ny5.8...@twister2.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: Domanda sui form

Mi chiedevo se e come era possibile ottenere l'effettiva area visualizzata
da un form.... mi spiego meglio.
Ho un form ridimensionabile che contiene uno scrollbox sul quale ho
posizionato un oggetto Timage. Ora, quando apro un'immagine, questa viene
aperta in full-screen, e lo srollbox mi permette di scorrerla anche quando
l'immagine è maggiore della risoluzione usata sullo schermo. Se voglio però
fare il fit dell'immagine all'interno del form mi serve sapere l'esatta area
visualizzabile dal form visto che i campi form.height e form.width mi
indicano l'altezza COMPLETA, compresa la barra, del form.
Come posso fare??
-- 
Davide
------------------------------------------------------------
Il tempo è la cosa più preziosa che l'uomo possa spendere
------------------------------------------------------------


Form.ClientWidth e Form.ClientHeight
Ciao,
Stefano

Newsgroup: it.comp.lang.delphi
Titolo: random dove sbaglio?

ho scritto questa funzione x evitare di generare numeri a caso uguali 
fra loro:
randomize();
for i:=1 to 16 do
begin
repeat
trovato:=false;
 a:=random(15);
for j:=1 to 16 do
begin
 if a=v[j] then trovato:=true;
end;
until not (trovato);
v[i]:=a;
end;
sapete dirmi dove sbaglio? xke appena lo lancio il programma si blocca e 
devo fare solo "termina operazione". 
c'e un altro modo x generare numeri a caso diversi fra loro?
grazie
--- posted by geoForum on 
http://www.delphiedintorni.it

 ha scritto nel messaggio 
news:4inne.4632$is5....@tornado.fastwebnet.it...


1) la guida č la tua bibbia

grazie. scusa ma sono nuovo nel mondo di delphi e della programmazione 
in generale. e grazie anke per i due consigli ciao
---------
ora che ho perso la vista ci vedo di piů


 2) i breackpoints sono le tue dita nel costato
LOL
-- 
Jax
====
La sofferenza č l'elemento positivo di questo mondo, č anzi l'unico
legame fra questo mondo e il positivo. (Kafka)

 in generale. e grazie anke per i due consigli ciao
Per favore migliorati nel quoting, o saro' costretto a killarti.
Ciao
-- 
Morde. 
FAQ di icld (beta-version): 
http://icld.altervista.org
 
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 ha scritto nel messaggio
news:4inne.4632$is5....@tornado.fastwebnet.it...
: ho scritto questa funzione x evitare di generare numeri a caso uguali
: fra loro:
:
: randomize();
: for i:=1 to 16 do
: begin
: repeat
: trovato:=false;
:  a:=random(15);
: for j:=1 to 16 do
: begin
:  if a=v[j] then trovato:=true;
: end;
: until not (trovato);
: v[i]:=a;
: end;
Non è che il ciclo repeat until è infinito ?
Io farei:
[CODE]
Randomize();
for i:=1 to 16 do v[ i ] := 0;
i := 1;
while ( i < 17 ) do
 begin
  a := Random(15);
  trovato := false;
  j:=1;
  while ( j < ( i + 1)  ) and ( not trovato ) do
   begin
    trovato := ( a = v[ j ] );
    inc( j );
   end;
  if not trovato then
    begin
    v[ i ] := a;
    inc( i );
    end
  end;
[/CODE]
Okkio che sono ancora in piena "bruma" da ponte prolungato ....
Andrea
Newsgroup: it.comp.lang.delphi
Titolo: visualizzare jpeg.

dovrei visualizzare delle foto jpeg, il problema è quando le foto devono 
essere girate, in base ai dati exif.
 
qualcuno ha dei suggerimenti, escluso il "metti il messaggio di ruotare 
il monitor".
 
grazie.
 
-- 
-------------------------------
per scrivere in privato
togliere "1975nosp"
 
to reply remove "1975nosp"

 essere girate, in base ai dati exif.
 
Jax aveva fatto qualcosa riguardo l'exif, magari potrebbe esseri d'aiuto.
 
Intanto prova questa libreria: 
http://delphihaven.wordpress.com/ccr-exif/
 
 
-- 
morde
QT 4.7
Delphi (5,6,7.. expired)
Firebird Database
 

 
 
 
grazie per la risposta, appena ho tempo provo a dare un occhio, sono di 
corsa e spero di avere visto male ( sembra che sia per delphi superiore 
al mio, provo a cercare al limite per le versioni precedenti. )


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

Sto facendo un applicazione per potere caricare il coriere la notte
Ho trovato il modo di attivare il compiuter ma vorrie sapere come
posso fare per modificare il SETUP a partire di windows
vi sarei molto grato se qualquno potrebbe darmi delle indicazioni
dove posso trovare delle info ringrazzio tutti quelli che legeranno
questo messagio :-)
Grazie.

italiano spero :))
omerosx

Newsgroup: it.comp.lang.delphi
Titolo: TXMLDoc e file XML generato su un'unica riga

Lo so, dovrei smettere di farmi queste seghe mentali, ma...
ho bel un file XML tutto ben indentato, tipo
<x>
   <hosts>
     <group nome="\">
       <group nome="g1">
         <item nome="x"></item>
         <item nome="x2></item>
       </group>
     </group>
   </hosts>
</x>
Perché se lo apro con TXMLDoc e lo risalvo, in qualsiasi formato (MSXML, 
OpenXML...) e con qualsiasi opzione, me lo ritrovo tutto compattato su 
una riga sola?
<x><hosts><group nome="\"><group nome="g1"><item nome="x"></item>...
Sì, ai fini pratici non cambia niente, però... uffa!
-- 
Jax

 una riga sola?
Mmmmm nelle Options...
doNodeAutoIndent... 
ciao
S

 doNodeAutoIndent... 
Già provato e se ne sbatte.
Farò altre prove...
-- 
Jax

Newsgroup: it.comp.lang.delphi
Titolo: Screenshot remoto

Qualcuno conosce il metodo, o può consigliarmi da dove partire per
riuscire a fare screenshot in remoto...
Mi spiego meglio: vorrei creare un software che riesce a fare
screenshot, non del mio schermo, ma di quello di un'ipotetica macchina a
cui sono collegato.
Non ho trovato nessuna a difficolta nel fare screenshot del mio monitor,
ma non saprei da dove partire per riuscirlo a fare in remoto.
Qualcuno può dirmi da dove dovrei partire....

 
Grazie molte...
Era molto più semplice di quanto credevo.
Newsgroup: it.comp.lang.delphi
Titolo: QuickReport: Caricare a runtime un TQRMemo.

Salve a tutti,
in una tabella ho un campo di tipo memo, per caricare
questo campo in un normale TMemo faccio:
Memo1.text := Query1['TESTO'];
come faccio a fare lo stesso con un TQRMemo che non ha
la proprietą text?
Grazie
Mirko

 la proprietŕ text?
Noi abbiamo fatto cosě :
Sul report piazziamo un TMemo->Memo con visible=False (forse non serve) e un
TQRMemo->QRMemo, poi dopo avere
Memo.Text:=FieldByName('Testo').Value;
// trasferisce sul QRMemo
QRMemo.Lines:=Memo.Lines;
č tutto
Ciao
 --
Gianluigi Genasi
--------------------------
Minisystem Srl
Server di posta Kpnqwest - 
www.kpnqwest.it

Avevo pensato anche io a una cosa simile e mi
confermi che non ci sono altre vie piů dirette.
Grazie
Mirko

Newsgroup: it.comp.lang.delphi
Titolo: Connection Isolationlevel

Ciao a tutti!
Qualcuno mi sa dare consigli su come impostare l'Isolationlevel di una
Adoconnection ad un database access 2000 su cui debbano lavorare piu'
utenti?
Grazie, Chris

utenti?
Here's a great article you might be interested in:
A description of Microsoft ActiveX Data Objects (ADO) provider properties and
settings.
URL:
http://msdn.microsoft.com/library/en-us/dnacc2k/html/adoproperties.asp?frame=true&_r=1
Have a nice day :)
-- 
Morde. 
morde[at]programmer[.]net

Newsgroup: it.comp.lang.delphi
Titolo: Creare una nuova connessione remota

Ciao a tutti,
dovrei realizzare un cd autoinstallante che crea una nuova connessione
remota.
ho visto che nel file rasphone.pbk ci sono le varie connessioni (infatti
lanciando rasphone.exe ti chiede di scegliere quale connessione vuoi
utilizzare)  ma non so come creare l'incona nella cartella "connessioni
remote".
qualcuno che ha un'idea di come fare puo' aiutarmi??
grazie in anticipo
Leo :)

 ha scritto nel messaggio
news:fHQ09.10532$n04.3...@twister2.libero.it...


 ha scritto nel messaggio
news:4O719.13788$lu5.3...@twister1.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: la notizia e' vera ???

>From the Register
Hi Mark Shuttleworth the founder of Ubuntu is in talks
with Borland to buy Kylix from their ailing tools division
Codegear.

Codegear.
Vedo tanti problemi di diritti - Kylix contiene tanto codice di Delphi, 
se lo volessero rilasciare OS significherebbe rilasciare OS mezzo Delphi 
e non penso che questo piaccia a CodeGear.
A meno che i piani non siano altri. Però c'è già FreePascal sul quale 
averebbero meno problemi, chissà perché Kylix,
--- posted by geoForum on 
http://www.delphiedintorni.it

 averebbero meno problemi, chissà perché Kylix,
Kylix ha una ottima base su cui lavorare, la VCL(divenuta poi CLX) non è
male, anzi!! Lazarus molto lontana da questo punto di vista
Forse non sarebbe stato male investire su Lazarus per colmare il gap con
Delphi
Bye,
Raktzo

 male, anzi!! Lazarus molto lontana da questo punto di vista
Ammetto la mia ignoranza nel campo, ma Linux non è il paradiso del
software gratuito e open source? Perchè c'è bisogno di "acquistare" Kylix
o di "investire" su Lazarus? (P.S.: E' una domanda volutamente
provocatoria)
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Delphi
Bisognerebbe sapere cosa hanno in mente. Un conto è una partnership con 
CodeGear per rivitalizzare Kylix, un conto è acquistarlo. Per fare tutto 
da soli non vedo perché non partire dal FreePascal + Lazarus sul quale 
non ci sono problemi. Boh!


software gratuito e open source? Perchè c'è bisogno di "acquistare" 
Software gratuito o open source non significa che non costi produrlo - o 
che non valga la pena acquistare chi lo fa. BerkeleyDB mi sembra sia 
stato comprato da Oracle, e dietro tanti prodotti open source ci sono 
aziende grandi che pagano lo sviluppo.


 sempre stato scritto in Delphi, non in Java.
Vado a memoria, ma l'IDE di Delphi è sempre stato scritto in C, C++,
Delphi e ASM. Con le ultime versioni, credo che alcune funzionalità siano
implementate in C# e Java.
Quello che con le mie doti predittive intendevo dire e' questo: 
Kylix (o un clone di Delphi) prodotti da Codegear non esisteranno piu' in
Linux. Potrebbero però tentare di fare qualcosa con Eclipse (sul quale
sembrano puntare molto) ed un linguaggio tipo Pascal o Object Pascal
(spero che nessuno mi risponda: "ehi, esiste già Lazarus!". Lo so, si sta
solo cazzeggiando un po').


sembrano puntare molto) ed un linguaggio tipo Pascal o Object Pascal
Che senso avrebbe fare un altro Delphi che non è Delphi? Delphi è molto 
di più del solo Object Pascal. Penso che per Ubunto sia interessante uno 
strumento RAD, non certo il linguaggio Pascal. Pensa ad avere una form 
Kylix che deve parlare con un Object Inspector in Java...!


sembrano puntare molto) ed un linguaggio tipo Pascal o Object Pascal
Non vedo i vantaggi di avere un compilatore object pascal in Eclipse. 
Delphi non è solo l'object pascal, è la VCL e la sua integrazione con 
l'IDE per lo sviluppo. Posso solo immaginare i casini per fare 
comunicare un controllo VCL con un Object Inspector scritto in Java.

Newsgroup: it.comp.lang.delphi
Titolo: Assistenti di Microsoft

 
          Qualcuno conosce qualche sito dve posso travare gli assistenti di Microsoft
oltre al sito della Microsoft?
Fedele
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

>           Qualcuno conosce qualche sito dve posso travare gli assistenti
di Microsoft
http://www.ringsurf.com/netring?ring=agent;action=list
-- 
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: Problema MDIform

Salve a tutti!
Spero che qualcuno possa aiutarmi, sto impazzendo.
Il mio problema è abbastanza semplice,penso, ma io non riesco a
risolverlo.Ho una form MDI con una statusbar, apro una form showmodal e
vorrei, in chiusura di questa form, modificare il contenuto della statusbar
ma non ci riesco.
Come posso fare? Spero di essere riuscito a farmi capire, è la prima volta
che posto sul newsgroup!
Grazie
MaX

With TFormModale.Create(Self) do
begin
  SHowModal;
  Release;
  StatusBar1,Panels[0].Text := 'HO chiuso il form modale....p'
end;
Bye
AS
 
-- 
Posted from  [212.17.220.41] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:f209955ab586882d75...@mygate.mailgate.org...

Grazie!
MaX
Newsgroup: it.comp.lang.delphi
Titolo: Eliminare tutti i file e le sottodirectory presenti in una cartella

Ragazzi ho davvero un grosso bisogno di aiuto: sono riuscito a trovare 
attraverso una routine il modo per eliminare tutti i file presenti in una 
directory:
 procedure EraseFolder(sCartella: string);
  var
    SearchRec: TSearchRec;
    I: Integer;
  begin
    I := FindFirst(sCartella + '*.*', 0, SearchRec);
    while I = 0 do
    begin
      DeleteFile(sCartella + SearchRec.name);
      I := FindNext(SearchRec);
    end;
  end;
begin
EraseFolder (C:ProvaCartella')
end;
Questa funzione è molto efficiente se si vogliono eliminare tutti i file 
presenti in una directory, resta il fatto però ke le sottodirectory 
rimangono intatte.
Spreste dirmi kome opter eliminare tutte le sottodirectry presneti in una 
cartella? 
Ho davvero bisogno di aiuto.
Grazie
--
Questo articolo e` stato inviato da 
http://www.undergroundsecurity.net
Segnala gli abusi ad 
ab...@undergroundsecurity.net

 Questa funzione è molto efficiente [...]
Alla tua funzione manca una bella FindClose, che è necessaria per 
rilasciare le risorse allocate con FindFirst.
Il seguente codice è scritto al volo:
procedure DeleteFolderTree(const ARootFolder: String);
   procedure DelTree;
   var
     F: TSearchRec;
   begin
     ChDir(ARootFolder);
     if FindFirst('*.*', faAnyFile, F) = 0 then
     begin
       repeat
         if not ((F.Name='.') or (F.Name='..')) then
         begin
           if (F.Attr and faDirectory)<>0 then
             DeleteFolderTree(F.Name)
           else
             DeleteFile(F.Name);
         end;
       until FindNext(F) <> 0;
       FindClose(F);
     end;
     ChDir('..');
   end;
begin
    DelTree;
    RmDir(ARootFolder);
end;

 Ho davvero bisogno di aiuto.
Ekkoti kuesta rutìn
http://delphi.about.com/cs/adptips1999/a/bltip1199_2.htm
-- 
Lis        
www.alessandroghezzi.it
O'Telma:   
http://snipurl.com/otelma
L’esperienza è un modo per dare un nome agli errori (Oscar Wilde)

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

Salve, ho bisogno di farmi 1 piccola applicazione con il modulo TWebBrowser,
e fin qui tutto okkei, data una url me la visualizza, ora devo cambiare e
settare di volta in volta il server proxy tramite cui si deve connettere,
come faccio?
è urgente c'ho provato ma nn so proprio come fare :))
GRazie vale.

 ha scritto nel messaggio
news:2B_66.211832$DG3.5...@news2.giganews.com...

Newsgroup: it.comp.lang.delphi
Titolo: rave conoscere stato stampante

C'è un modo con rave report in d7 o attraverso un'altro oggetto 
conoscere lo stato di una stampante tipo se manca la carta se è spenta o 
se stà lavorando ?
Dan

se stà lavorando ?
Dan ha risposto
//rpdev è un oggetto della Unit RpDevice di Rave Report
//e che permette di verificare se la stampante è in fase di stampa
//aggiungo che non ho idea di quanto il ciclo seguente possa servire
penso sia utile scrivere anche (sopratutto) le risposte che le domande.
mario
--- posted by geoForum on 
http://www.delphiedintorni.it

 mario
Già vuoi dire che mi sono risposto da solo !? Putroppo non basta non ho 
trovato in rave una proprietà o una funzione che mi restituisca 
esattamente in che stato può essere una stampante cioè se manca la carta 
o se è fuori linea se è inceppata o che altro.
Daniele
Newsgroup: it.comp.lang.delphi
Titolo: Sendkeys del VB in Delphi?

Salve a tutti.
Sono passato al Delphi da poco e vorrei sapere quale e' l'equivalente della
Senkeys di VB in Delphi.
Grazie molte
Ciao
Sandro.

Senkeys di VB in Delphi.
Non conosco (per fortuna) il VB, quindi ti proporrei "SendInput" o
"keybd_event", due API Windows.
www.msdn.microsoft.com
Sul Platform SDK trovi la loro documentazione

 Senkeys di VB in Delphi.
Ciao, esiste una unit "sndkey32.pas" sul cd di installazione di delphi 3 (o
forse il 4... ?)
Se vuoi te la spedisco...
ciao, Davide DG

 "keybd_event", due API Windows.
ho letto la risposta di Davide.
per fortuna che il Delphi invece lo conosci...
;P




> "keybd_event", due API Windows.
Beh, keybd_event, essendo una API di windows una volta imparato
l'utilizzo la puoi usare con qualsiasi linguaggio di programmazione
(anche VB) ed è quindi disponibile anche con le versioni precedenti di
Delphi.
-- 
        Night  Ranger
------------------------------
 
night...@libero.it
 
        ICQ# 63076483         
http://nightranger.crontab.org
------------------------------

>
Sono passato al Delphi da poco e vorrei sapere quale e' l'equivalente della
Senkeys di VB in Delphi
<<
L' *equivalente* della sendkeys di VB si chiama sndkey32.pas
Che poi si possa fare quello che fa la sendkey con le api di windows
 (come peraltro ovviamente fa la sndkey32) è un altro discorso.
Ciao, Davide DG

 Se si, non l'ho trovato.
Mi sa che non c'č.  Ho controllato, era in \INFO\EXTRAS\SENDKEYS sul cd di
D4.
Cmq te la sto spedendo via email.
Ciao, Davide DG

 wrote in message
ypzI5.72426$Nz.20...@news.infostrada.it...


 piano, ma non mi funziona.
Ciao... se magari posti *ciò* che hai provato, magari si può fare qualcosa,
no?
Personalmente, quella unit l'ho usata diverse volte in passato, prima di
farmene una io,
ed è sempre "andata" ... magari hai sbagliato la sintassi dei tasti ?
Davide DG

 piano, ma non mi funziona.
procedure TForm1.Button1Click(Sender: TObject);
begin
sleep(2000);
sendkeys ('ABC',true);
end;
Durante la pausa (sleep), porta in primo piano una finestra di notepad
già aperta in precedenza (sembra un ricetta... ;P )
Se non va allora è strano.
Ciao, Davide DG

 wrote in message
QsBI5.73254$Nz.21...@news.infostrada.it...


 SendKeys('abc123{left}{left}{left}def{end}456{left 6}ghi{end}789', True);
Ciao! Davide DG

per fortuna che il Delphi invece lo conosci...
Leggo un po' di ironia...
Come ringraziamento per averti risposto, non e' poi cosi' gentile...
Newsgroup: it.comp.lang.delphi
Titolo: Qualcuno di voi è riuscito ad installare il Compact Framework?

Salve,
Sto cercando di installare il compact framework, ma senza risultati
apprezzabili. Ho cercato in lungo e in largo sul sito MSFT, ma non
riesco a trovare gli assembly di base(System.dll ecc).
Qualcuno sa indicarmi dove accidenti stanno?
Grazie,
Andrea.

 riesco a trovare gli assembly di base(System.dll ecc).
Non è che sei un po' OT? :-D
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 apprezzabili.
Mi dispiace.  Prova a chiedere a un ng che tratta .NET.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Non è che sei un po' OT? :-D
No.
http://www.jed-software.com/cf.htm
Andrea

 No.
Invece sì.  Stai chiedendo come installare il CF che, a priori, non
c'entra una benemerita mazza con Delphi.  Per cortesia, attieniti al
topic, di troll ce ne stanno fin troppi negli ultimi tempi.  Non è che
perché Delphi consente di scrivere programmi che interfaccino via USB una
pentola sul fornello, io sono autorizzato a chiedere qual'è la ricetta del
risotto.


 risotto.
Non è proprio la stessa cosa :-)
Piuttosto è come chiedere dove trovare un fornello
compatibile e questo mi sembra legittimo :-)
Ah e per la cronaca... tutte le nostre applicazioni sono comparabili ai
risotti :-)
Andrea

 Dove trovarlo, non come installarlo.
Non cambia nulla, rivolgiti a un altro gruppo.
Avete rotto con gli OT.


Si scarica dal sito della Borland post iscrizione che credo tu abbia già 
fatto.
C'è tutto il pacchetto completo!
--- posted by geoForum on 
http://www.delphiedintorni.it

ENTRACI da CodeGear o è un casino !
http://www.codegear.com/Default.aspx?tabid=144


Newsgroup: it.comp.lang.delphi
Titolo: Aggiornare database in differita.

Salve,
sto usando un adotable e vorrei sapere come si fa a modificare i dati contenuti in  una dbgrid senza che questi si aggiornino in tempo reale. Altresì vorrei creare un bottone salva i cambiamenti. 
Adesso sto cercando di usare il adoconnection1.begintrans e adoconnection1.committrans dell'adoconnection ma sembra troppo rudimentale c'è un altro metodo inoltre quando chiamo il rollbacktrans mi va in errore.

 
Io avevo usato i dataset disconnessi: ma lo scopo era di fare merging
dei dati da un client offline.
Le transazioni servono a gestire l'accesso concorrente ai dati, NON a
rimandare l'aggiornamento dei dati sulla tabella stessa..
Se sei connesso al server e vuoi solo ritardare la scrittura documentati
sui batch updates
(
http://docwiki.embarcadero.com/RADStudio/XE3/en/Using_Batch_Updates
)
 
Se invece sei offline e vuoi gestire il writing a tempo differito, usa o
i dataset disconnessi o il mitico ClientDataset
 
 
 
-- 
morde
Android
QT 4.7
Delphi (5,6,7.. expired)
Firebird Database
Newsgroup: it.comp.lang.delphi
Titolo: Chi ha D2K5 installato e disponibile all'uso?

Salve Esimiiiii Colleghi :D
Avrei necessità di capire se un determinato pezzo di codice
funziona con Delphi 2005, poiché devo poi inviare
l'abstract che lo riguarda(tutto il resto è tendenzialmente
pronto) per DevCon 2005(ex BorCon). Lo farei da me, ma il mio
D2K5 arriva il 4 Aprile, quindi poi mi resterebbe poco
tempo per inizializzare gli altri 3 o 4 che intendo sottoporre :D
Quindi... se qualcuno ha voglia/tempo di essere
citato nei ringraziamenti e di premere F9, mi faccia sapere :)
F/up to poster set.
Grazie in anticipo,
Andrea

Piccola precisazione: mi interessa l'edizione PRO, non Ent o Arch.
Ri-Grazie :D
Andrea

Risolto.
Andrea

 Risolto.
Acc...battuto sul tempo: potevo aiutarti anche io poichč lavoro su 
Delphi2005 Professional, in questi ultimi tempi quasi 24 ore su 24. :-)
Beh, non mi rimane che augurarti...buona Pasqua! ;-)
-- 
Marco «Alka» Breveglieri
(marco [@] abls [.] it)
  ABLS Team S.n.c. - Software & Web
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 Beh, non mi rimane che augurarti...buona Pasqua! ;-)
Anche a te e tutti gli scalmanati del gruppo! :D
Andrea

Newsgroup: it.comp.lang.delphi
Titolo: File Open/Write

come diavolo si fa' per arire un file e srciverci delle stringhe (in append)
usando solo del codice ?
in pratica se lo scrivo in vb:
open "nome_file" for output as #numero_file (se lo devo creare o
sovrascivere)
open "nome_file" for append as #numero_file (se ci devo scrivere accodando)
   write #1, stringa
close #numero_file
se lo scrivo in delphi:
??
??....??
grazie

 wrote in message
lpcg6.17630$092.4...@twister1.tin.it...


   Writeln(tuofile,'stringa che vuoi aggiungere quě che č la fine del


 end;
il mio delphi non accetta questo codice,secondo lui i textfile non esistono
(e l'help li segnala come file usabili), dopo molti tentavivi di girare il
codice in altri modi mi sono rassegnato a caricare le stringhe che volevo in
un memo e fare savetofile

 wrote in message
Rhfg6.8839$GM6.3...@news.infostrada.it...


 >   Writeln(tuofile,'stringa che vuoi aggiungere quì che è la fine del


   Append(tuofile);
Occhio, non serve il Reset prima dell'Append. Append apre gia' il file,
Reset serve solo per leggere i dati.
Ciao =)
Daigo

Vero !
CYO,
--
RaSca
http://web.tiscalinet.it/rascasoft
Daigo <da...@NONVOGLIOSPAMedisons.it> wrote in message
5LRg6.23638$GM6.1...@news.infostrada.it...


> > Reset serve solo per leggere i dati.
per leggere o per scrivere sulle posizioni esistenti.
Newsgroup: it.comp.lang.delphi
Titolo: {$IFDEF DEBUG}

{$IFDEF DEBUG}
...
{$ENDIF}
Se includo questa direttiva nel mio codice,
non viene eseguito sia se mi trovo in debug
sia se no.
{$IFNDEF DEBUG}
...
{$ENDIF}
Se includo questa direttiva, viceversa il codice viene
eseguito sempre.
Cosa sbaglio?

 ha scritto nel messaggio
news:Stem9.195535$pX1.7...@news2.tin.it...


 ha scritto nel messaggio
news:3rxm9.200374$pX1.7...@news2.tin.it...


 ha scritto nel messaggio
news:KDxm9.169782$ub2.3...@news1.tin.it...


 l'eseguibile non le esegue.
Esatto, in realta' non le compila neanche, se non e' definito il simbolo
DEBUG.
E' la differenza che c'e' con l'uso di un flag esplicito.
Se il compilatore incontrasse il seguente codice:
if FlagDebug then
begin
  // esegue codice di debug...
end
else
begin
  // esegue codice normale...
end
genererebbe istruzioni anche per il primo blocco, cosa che non avviene con
la *compilazione* condizionale.
--------------------------------
Inviato via 
http://usenet.libero.it

..avevo sbagliato a testare..
non è quello che intendevo..
io devo fare in modo che se sono in debug
non vengono o vengono eseguite delle istruzioni
che se l'applicazione è eseguita regolarmente viceversa
vengono o non vengono eseguite.
In questo modo, da quanto ho capito e potuto
verificare se includo nella lista delle
compiler conditionals la voce DEBUG
questa sarà disponibile sia in debug che in
normale esecuzione...
"Andrea Laforgia" <x@x.x> ha scritto nel messaggio
news:80Z105Z34Z80Y1...@usenet.libero.it...


 vengono o non vengono eseguite.
leggiti il thread con subject 
"Come sapere se la propria applicazione è in fase di debug"
del 20/9/2002 aperto da Luca T.
Forse può esserti utile.
Ciao, Antò.

 Ciao, Antň.