mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Stampare su una com da terminal server

Ciao,
da un'applicazione che gira in terminal server devo stampare su una 
stampante terminaca collegata al client sulla porta seriale...
ho sviluppato l'applicazione con il componente ApdComPort della TP e su un 
pc in locale funziona... ma su un client terminal server no.
Qualche suggerimento?
Gazie Antonio.

 ha scritto nel messaggio
news:Xns93A6723AA9E...@127.0.0.1...

Durante il runtime, il programma "crede" di girare sul server.
Quindi dovresti:
- sul client condividere la stampante in rete
- nella sessione TS collegare la stampante condivisa
- nel programma stampare sulla stampane collegata in rete
--
Carlo Muccini

 - nel programma stampare sulla stampane collegata in rete
Capito... però nell'appliazione in locale invio il file da stmapare sulla 
Com del pc... come posso dirgli di inviare la stampa su una com di un altro 
pc?
Mi sot perdendo qualcosa?
Ciao, Antonio.

 "Carlo"

La com del pc è irraggiungibile (normalmente) dal servizio TS.
(punto.)
Le soluzioni sono due (o forse solo una: la seconda)
1. (la più facile) da locale non stampi direttamente sulla com ma attraverso
un driver stampante; quindi condividi
   la stampante ecc. ecc. Il driver potrebbe essere anche la LinePrinter
(fittizia) collegata alla com sulla quale stampi
  i caratteri speciali che vuoi. Non lo so se è possibile.
2. (la seconda) sul pc locale crei un servizio socket client/server che
ascolta i msg in arrivo e li stampa sulla seriale locale
    secondo le modalità che hai già realizzato. Dal TS invii la stampa a
mezzo di socket via lan al pc locale.
   Sembra difficile..ma non lo è troppo.
   Sul manuale ci sono diversi esempi; sono sicuro c'era in D5 una cartella
con un esempio fatto, con due progetti
   uno per il client ed uno per il server. I due si scambiavano dei
caratteri che venivano visualizzati. Quasi quello
   che serve a te !
--
Carlo Muccini

 caratteri che venivano visualizzati. Quasi quello che serve a te !
... non che questa non mi piaccia, anzi... il problema è che con dei 
terminali stupidi non penso funzionerebbe ed io, purtroppo, dal cliente ho 
quelli.
Ciao, Antonio.
Newsgroup: it.comp.lang.delphi
Titolo: librerie in w2000

ciao a tutti!
c'è qualcuno che mi può aiutare?? per far funzionare su un w2000 un
programma sviluppato in Delphi 4 c'è bisogno di qualche dll o registrazione
particolare? su w98 funziona tranquillamente, ma sul 2000 mi da 'access
violation' appena lo eseguo...
grazie a tutti
Gianni.
--------------------------------
Inviato via 
http://usenet.libero.it

 violation' appena lo eseguo...
č capitato anche a me quando cercavo di collegare un database Access 2000
tramite il BDE...ho risolto utilizzando ADO.
ciao

 violation' appena lo eseguo...
E' difficile saperlo se non ci dici che tipo di applicazione č, oggetti
utilizzati... ci possono essere molti motivi.
Di base, non ho mai avuto problemi ad eseguire programmi in delphi su
diversi sistemi operativi. Se perň usi tecnologie particolari, allora il
discorso č: cosa e in che modo le usi?
Ciao
Matteo


I'm sorry....si tratta di un'applicazione client/server che va ad
interrogare tabelle paradox e sono stati utilizzati i componenti con
tecnologia CORBA. L'applicazione si compone di due eseguibili 1 server e 1
client, la parte server funziona correttamente nel senso che riesco ad
interrogare le tabelle, ma appena eseguo il client mi da il solito errore
'access violation'....che può essere??
grazie


se usi midas.dll, la devi registrare.
Se usi installshield express di delphi puoi impostare la autoregistrazione
all'atto della installazione su questa dll.
Bye
A.


...ho registrato la DLL ma mi da sempre lo stesso errore :(((
thks
Gianni


1) se non lo hai fatto, crea un kit di installazione
2) se usi ADO controlla che le ver siano allineate
3) aggiungi alla tua app la creazione di un file di log in formato ascii
nel quale vai a scrivere cose del tipo:
ho aperto il db
ho creato la form xxxx
sto facendo questo etc etc etc
Bye
A.

Newsgroup: it.comp.lang.delphi
Titolo: [forse ot]:quale modem?

Ragazzi scusate, sapete se c'č una Api o qualche altro modo in delphi, per
riconoscere il mnome del modem installato?
--
ciriciao
Casty

Prova ad usare API contenute nella DLL "RasApi32.DLL"
Contiene tutto quello che serve a conetersi ad internet fose anche il
nome del modem non so..
Il Razziatore,
The Only Good Windows in an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596
Newsgroup: it.comp.lang.delphi
Titolo: Estrarre testo ascii

Ciao. Ho la necessita' di indicizzare un gran numero di documenti 
cartacei che saranno acquisiti con lo scanner.
Supponendo di fornire all'utente uno scanner con software OCR in bundle, 
come faccio poi ad estrare il puro testo ascii per indicizzare le parole 
del documento?
Cercando nei posti "canonici" (goole, torry, ecc...) ho trovato dei 
componenti, ma sono parecchio costosi. Conoscete delle alternative free, 
o magari qualche tecnica che non richieda l'uso di componenti esterni?
Grazie a tutti.
MT

 del documento?
Se dai all'utente il software ocr, fallo fare a lui. Se non lo vuole fare,
fatti pagare perche' dovrai scrivere un programma che, interfacciandosi
alle API dell'OCR, faccia l'acquisizione e il riconoscimento automatico dei
caratteri.
Scegli bene il software OCR, perche' poi dovrai lavorarci tramite la sua
API.
Ciao
-- 
Morde. 
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 indicizzare le parole del documento?
Scusa se non ti sono di aiuto ma ti dico solo questo: assicurati che quelle
che deve scannerizzare il cliente siano pagine standard (niente sfondi
colorati, disegni strani, impaginazione fantasiosa, tabelle a iosa),
altrimenti... *sono caspioli amari*.
Proponigli un inserimento manuale delle chiavi di ricerca, magari accetta;
ti risparmieresti grane che potrebbero privarti di preziosi anni di vita...
Comunque, rispondendo alla tua domanda, non credo che ci siano componenti
OCR free.
-- 
Jax
====
Nulla è più pericoloso di un'idea, quando è l'unica che abbiamo. (Alain)
Newsgroup: it.comp.lang.delphi
Titolo: [d7] timer questions

Ciao a tutti
nel mio form ho un TTimer (con interval=1000) che mi serve di visualizzare
(in minuti:secondi) il tempo che trascorre dal momento che premo un pulsante
start a quello in cui premo un pulsante stop.
Nella OnCreate del Form inizializzo il tempo
...
time1 := EncodeTime(0, 0, 0, 0);
...
Nella OnTimer del Timer ho sostanzialmente:
...
time1 := time1 + 0.00001157; // aggiunge un secondo
...
MyLabel.Caption := FormatDateTime('nn:ss', time1); // aggiorna label
Ora, il tutto funziona ma ho notato che per i primi due secondi la label
visualizza ugualmente
00.01
00.01
controllando con il debugger ho potuto vedere che la FormatDateTime
restituisce in effetti sempre 00.01 per i due successivi valori di timeLeft
"distanti" un secondo. (dal passo successivo tutto procede bene)
Ho risolto inizializzando
time1 := EncodeTime(0, 0, 0, 1);
In questo modo ottengo infatti:
00.01
00.02
etc.
Ma mi chiedo se esistono altre soluzioni.
Inoltre, in generale mi chiedevo che precisione ci si puņ aspettare dal
componenete TTimer?
Infine č possibile, senza problemi particolari, inserire eventualmente un
secondo Timer per visualizzare (per es. sulla status bar) l'orario corrente
(ricavato con Now())? (Ho provato nel mio sistema ma mi sembra che si
verifichi qualche leggera perdita di "sincronismo").
grazie di cuore in anticipo per  qualsiasi suggerimento/info


Open Delphi Manual (
http://groups.yahoo.com/group/delphi_open_manual/
)


 "sincronismo").
Un TTimer non è affatto preciso, in quanto l'evento OnTimer  dipende dal
carico del processore e da tante altre cose che non so, e non è garantito
che venga attivato ogni secondo preciso, ma spesso viene ritardato.
Quello che ti succede dipende appunto da questa cosa: tu fai eseguire del
codice ogni secondo, ma quel secondo è "virtuale". Per questo se vuoi fare
un orologio devi impostare l'Interval ad un valore più basso di 1 secondo,
in questo modo l'orologio viene aggiornato più volte al secondo ed è quindi
più preciso.
--
Jax
====
Il denaro è come l'aria, fin che c'è non te ne accorgi. (Alessandro
Morandotti )

Ma mi chiedo se esistono altre soluzioni.
Repetita juvant: 
http://tinyurl.com/ydpp
Ciao!
-- 
Morde. 
(
mo...@despammed.com
)

Newsgroup: it.comp.lang.delphi
Titolo: TTimer grosso dubbio

Ho un dubbio atroce ragazzi, qualcuno me lo sa risolvere?
Quando io metto la mia applicazione in icona (barra delle pplicazioni)
vorrei sapere se l'oggetto ttimer continua a sollevare l'evento ontimer o se
viene sospeso
fino a quando l'applicazione non viene riattivata?
Se fosse corretto il mio dubbio e il timer si fermasse esiste un modo per
consentire all'applicazione di continuare la sua esecuzione normale anche
ridotta a icona?
Grazie di cuore Giò

)

 ha scritto nel messaggio
news:c65jgd$n1r$1...@le1.cs.unibo.it...

Newsgroup: it.comp.lang.delphi
Titolo: Tabella Paradox

Salve a tutti,
 Ho un piccolo problema con un tabella paradox.
 Ho diversi campi Type Time e vorrei visualizzare solo le Ore e i
minuti.(eliminare i secondi).
 Grazie e a presto.
 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Dichiari i field nel field editor e per ciascuno dei tuoi campi Time imposti
la property DisplayFormat a 'hh:nn'.
Saluti
        Marco Bortolani
 
in...@marcobortolani.it


Funziona tutto benissimo. Grazie mille.


Newsgroup: it.comp.lang.delphi
Titolo: VCL per stampa

Sapreste indicarmi un componente per la stampa tipo QReport senza che sia 
vincolato da un dataset, ma che sia libero di stampare, parole, frasi con 
caratteri e colori diversi? Prevengo qualcuno che mi dirą di usare RichEdit 
si con questo qualcosa si puņ fare ma quando cģč la necessitą di incolonnare 
con colori diversi e caratteri diversi il componente non fa al caso.
Grazie a tutti 

Grazie a tutti 
	Ciao
	MassimoB
 
---------------------------
http://www.massimobeschi.it/
Newsgroup: it.comp.lang.delphi
Titolo: Parità...come calcolarla?!

Ciao, dunque io ho questo problema: ho una serie di byte da inviare, 
tramite com, ad un apparecchio, e devo terminare la fila di byte con il 
byte di parità...più o meno dovrebbe essere così.
Come faccio per determinarlo? Devo farmi la rappresentazione in o e 1 e 
contare?
Es.: Devo mandare questa lista di byte (rappres qui in hex)
	0A 08 01 02 01 03 09 0D
e so che lo 09 mi rappresenta la parità cioè lo XOR dei byte. (0A e 0D 
aprono e chiudono la comunicazione con l'apparecchio)
Come faccio a fare questo XOR?
Grazie
Fabio	

 Come faccio a fare questo XOR?
Con l'operatore XOR di Delphi.
<esempio>
procedure OpenTransmission(var S: String);
begin
  S := S + '0A';
end;
procedure SetParity(var S: String; ParityVal: Integer);
begin
  S := S + ' ' + IntToHex(ParityVal, 2);
end;
procedure CloseTransmission(var S: String);
begin
  S := S + ' 0D';
end;
procedure SendByte(var S: String; B: Byte;
                   var ParityVal: Integer);
begin
  S := S + ' ' + IntToHex(B, 2);
  ParityVal := ParityVal xor B;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
  ParityVal: Integer;
  ByteStream: String;
begin
  ParityVal := 0;
  ByteStream := '';
  OpenTransmission(ByteStream);
  SendByte(ByteStream, $08, ParityVal);
  SendByte(ByteStream, $01, ParityVal);
  SendByte(ByteStream, $02, ParityVal);
  SendByte(ByteStream, $01, ParityVal);
  SendByte(ByteStream, $03, ParityVal);
  SetParity(ByteStream, ParityVal);
  CloseTransmission(ByteStream);
  ShowMessage(ByteStream);
end;
</esempio>

 Come faccio a fare questo XOR?
hai provato ad utilizzare gli operatori logici di delphi.
C'è proprio XOR.
Io ho provato con i tuoi valori ed esce 9 che è la tua parità di questo
esempio.
Form1.Caption := IntToStr(8 xor 1 xor 2 xor 3 xor 1);
mi sembra troppo semplice comunque, strano che già non ci hai fatto caso.
Tu hai riportato i byte in esadecimale mentre io gli ho usati come semplici
numeri.
Bè, sicuramente tu i byte cell'hai già nel tipo di dato byte, poi se per
qualche strano motivo sono in esadecimale, fai le dovute conversioni.
Ciao.

GRAZIE a tutti.
L'operatore l'avevo già guardato ma stupidamente la ritenevo una 
soluzione non corretta e non l'aveva minimamente provata.
Fabio


Newsgroup: it.comp.lang.delphi
Titolo: Chiudo il TADODataSet e rimane il file .ldb

Quando modifico la tabella che è all'interno del database .MDB si crea il
file .LDB...
anche se chiudo la tabella quello rimane... e non posso copiare e/o spostare
il file del database fino a quando non chiudo il programma...
Ma a me serve poter copiare quel file, come posso fare?
Raptor

 ha scritto nel messaggio
news:iXc27.23196$rh.4...@news6.giganews.com...

Newsgroup: it.comp.lang.delphi
Titolo: Come posso visualizzare un HICON su un TImage?

grazie...

 ha scritto nel messaggio:
ti ho scritto questa funzioncina ...
Procedure HIconToImage(IconHandle: HIcon; Image: TImage);
var TheIcon: TIcon;
begin
  TheIcon := TIcon.Create;
  TheIcon.Handle := IconHandle;
  Image.Width := TheIcon.Width;
  Image.Height:= TheIcon.Height;
  Image.Canvas.Draw(0, 0, TheIcon);
  TheIcon.Free;
end;
Ciao! :-)
--
- Carlo -
c.b...@libero.it

 ha scritto nel messaggio
news:xO%%6.20661$F85.6...@news.infostrada.it...


 ha scritto nel messaggio
news:NAi07.2012$rh.7...@news6.giganews.com...


 (devo ancora capire la differenza)....
La differenza tra ExtractIcon/Ex penso stia nella quantità di icone che
vengono restituite.
Non vedo dove sia la difficoltà nell'utilizzare la procedura che ti ho
scritto con ExtractIcon.
Per quello che riguarda il PopupMenu non ti so dire poichè non gli ho mai
associato alcuna immagine, cmq puoi provare a vedere la voce Images dall'Obj
Inspector o la PMenu.Items.Bitmap
Ciao!


Newsgroup: it.comp.lang.delphi
Titolo: Form Html

Ciao Ragazzi,
avrei bisogno di inviare dei dati di un form html ad un determinato host,
con metodo POST.
Come posso fare?
Ho provato sia con gli Indy sia con Fastnet (TNMHTTP) ma non funziona.
Mi inviate un piccolo sorgente di esempio, incluso un piccolo form HTML?
Forse sbaglio ad inserire i valori del form nel codice delphi...
Aiutatemi...
Grazie.



 ha scritto nel messaggio
news:Gr4La.128446$lK4.3...@twister1.libero.it...


 ha scritto nel messaggio
news:wicLa.265259$g92.6...@news2.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: cgi delphi e oracle

ho una cgi di oracle che tenta di connettersi con un componente ADO a un
db oracle non sulla mia macchina ma su un'altra, la connessione se
provata da delphi funziona ma quando lancio la cgi da web da un errore
dice "errore generico", l'errore lo da quando tenta di connettersi,
questa cgi gira sotto tomcat5.
grazie a tutti.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Controlla se hai delle cose del tipo:
try
   faiqualcosa()
except
 end;
Suggerimento: guardati i doa.

 wrote in message
news:1120046984....@g44g2000cwa.googlegroups.com



fai in modo da non nascondere i msg delle eccezioni, altrimenti non
capirai mai che kakkio succede.
AS
Newsgroup: it.comp.lang.delphi
Titolo: Terminare un programma

Nel main della mia applicazione (ed esattamente nel Create) controllo la
presenza dei file necessari alla stessa e, in caso di assenza, apro un
piccolo form con un messaggio consentendo all'utente di terminare tutto.
Queste sono le istruzioni usate:
procedure MainForm.FormCreate(Sender: TObject);
............................................
   if ShowFormAvvisi = 2 then
   begin
       Application.ShowMainForm := False;
       Application.Terminate;
       Exit;
   end;
............................................
end;
Ma il programma non esce subito. In effetti prosegue ad eseguire le proc
FormShow e FormActivate. Non posso evitarlo ?

FrancoJommi ha scritto:

Invece di inserire il controllo nell'evento FormCreate della MainForm
lo potresti inserire direttamente nel dpr.
In alternativa, sempre nel dpr, dopo aver creato la MainForm e prima di
Application.Run inserisci un codice tipo:
if Application.Terminated then
  Exit;
-- 
Vuoi distribuire il tuo sito web su CD/DVD?
Prova 
http://www.dwebpro.com/
Vuoi diventare un esperto sviluppatore Delphi
Vieni a fare uno stage con noi: 
http://www.creativepark.it/stage/

>    if ShowFormAvvisi = 2 then    formclose;

Newsgroup: it.comp.lang.delphi
Titolo: [D6] Impostazione volume modem

Salve,
sto cercando di impostare il volume di un modem il problema e fin qui 
non ci sono problemi, utilizzo le API GetCommConfig e SetCommConfig.
Il problema e che non so su che porta e collegato il modem ma solo il 
suo nome (recuperato con le RAS API).
Ho provato a cercare nel registry se esisteno chiavi univoche che 
associno il nome del modem alla porta ma queste cambiano da versione di 
windows (es. da 98 a 2000).
Ho cercato anche sull'MSDN ma senza risultato. Come faccio a recuperare 
la porta a cui e collegato un certo modem conoscendone il nome esatto?
Grazie.

 non ci sono problemi, utilizzo le API GetCommConfig e SetCommConfig.
Se il modem č presente fra le periferiche del mixer di windows puoi
impostare il volume direttamente da lě. Io ho usato un componente che si
chiama TAudioMixer, se lo cerchi con google dovresti trovarlo senza
problemi
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 del modem?
No, serve solo a impostare il volume del modem se è presente fra le
periferiche del mixer, se il modem ha un suo speaker non puoi usare
questa
soluzione.


del modem?
Select Astronomy scusa la curiosita', stai creando un dialer?
Ciao
-- 
Morde. 
morde[at]programmer[.]net

 Select Astronomy scusa la curiosita', stai creando un dialer?
Si.

Si.
Ok, avevo capito bene. Grazie.



[...]
Caro Select per me non c'e' nessun problema, seguendo assiduamente il ng
percio' ricordo benissimo la questione, non intendo assolutamente ricondurmi o
riferirmi a flames.
Tra l'altro stamane con a2rg14 (ma guarda che nick strano :) si parlava
proprio del periodo di difficolta' che stiamo attraversando noi
sviluppatori... quindi da un lato hai fatto bene a chiarire subito, dall'altro
continui ad avere la mia stima, come tanti altri, per il contributo e le
conoscenze apportate su questo ng.
Ciao e spero che ti arrivino presto lavori un po piu' "prestigiosi". 
:D


 ricondurmi o riferirmi a flames.
[cut]
Ti ringrazio per la comprensione, la mia precisazione era rivolta 
sopratutto ai lettori saltuari che non conoscendo la vita del newsgroup 
potrebbero fraintendere le mie intenzioni.
Saluti.

Newsgroup: it.comp.lang.delphi
Titolo: SDK per fingerprint

Come da oggetto sapete indicarmi un SDK per integrare nelle mie
applicazioni la lettura dell'impronta digitale?
Io ho dei lettori: PreciseBiometrics.
grazie in anticipo
saluti
Lorenzo

http://www.precisebiometrics.com/?id=1809
http://www.griaule.com/page/en-us/fingerprint_sdk
su msdn pare nn vi sia nulla...
A.

 A.
Grazie ma purtroppo "precisebiometrics" offre un SDK che non si può
provare...
Gialue va bene ma non per i miei lettori finger ;|

 Gialue va bene ma non per i miei lettori finger ;|
:-( sorry!
A.
Newsgroup: it.comp.lang.delphi
Titolo: Delphi & Istruzione LIKE su Firebird

Ho notato che usando una Query con un'istruzione
del tipo
StrSQL:='SELECT * from TB_SPESE where Note LIKE ' +#39 +'Bolle' +#39;
quando eseguo la Query non ottengo , come previsto , le Note che hanno la
descrizione Bollette.
queste altre istruzioni invece danno l'esito  previsto.
StrSQL:='SELECT * from TB_SPESE where Note =' +#39 +'Bolle' +#39;
StrSQL:='SELECT * from TB_SPESE where Note >=' +#39 +'Bolle' +#39;
non credo sia un problema di TQuery , ho fatto la stessa prova con IBAdmin
ed anche qui LIKE viene accettato , ma non estrae una descrizione parziale.
come si puo' ovviare ?
Maurizio 

Questa è la sintassi giusta per eseguire like
'         CLIDOC.NUMDOC LIKE  ''%'' ||  :CODICE || ''%''  AND ' +
Ciao by Enzo
www.scozzaro.it

descrizione Bollette.
La like prevede l'uso di due wildcard: % per sostituire un qualsiasi
numero di caratteri (come * per i file) e _ per un singolo carattere.
BOLL% ti troverebbe BOLLA, BOLLE e BOLLETTE
BOLL_ ti troverebbe BOLLA, BOLLE ma non BOLLETTE
Una volta con IB e FB la START WITH era più efficiente per query che
avevano la  wildcard come ultima "lettera", non so se nelle ultime release
hanno migliorato la gestione della LIKE stessa.
Luigi D. Sandon - D&amp;D Support Team
--- posted by geoForum on 
http://www.delphiedintorni.it

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

ciao a tutti vi volevo chiedere un aiuto!? voglio creare un programmino
stile chat.mi spiego meglio vorrei fare un programmino in delphi che tramite
un interfaccia semplicissima faccia comunicare due persone in due poste
diversi nella rete
avendo l'indirizzo ip della macchina e la porta in comune da utilizzare per
scambiare messagggi
a questo punto
arriva il vostro aiuto
perche io da qui in poi non so che componenti devo utilizzare per questo
tipo di interrogazione
quindi vi chiedo se avete gia dei progetti ai quali posso prendere spunto e
capire il funzionamento oppure se avete siti o pagine dove posso leggere o
trovare materiale per questo tipo di programma grazie mille

 quindi vi chiedo se avete gia dei progetti ai quali posso prendere spunto e
ICS di Francois Piette 
(
http://overbyte.delphicenter.com/frame_index.html
), tra le applicazioni 
di esempio trovi anche uno scheletro di chat.

 ha scritto nel messaggio
news:bs4pl3$11vr$1...@newsreader1.mclink.it...


 utilizzare per scambiare messagggi
Componenty Indy, c'e' anche una demo chiamata CHAT.
-- 
I'am what I'am, I do what I can

non ho trovato la demo che dici tu
"Setec Astronomy" <setec@_NO_NOSPAM_freemail.it> ha scritto nel messaggio
news:PQnFb.200831$vO5.8...@twister1.libero.it...



Open Delphi Manual (
http://groups.yahoo.com/group/delphi_open_manual/
)

 non ho trovato la demo che dici tu
http://www.indyproject.org/teams/Demo/demolisting80.html
per il download
http://www.indyproject.org/indy/demodownloads/I9D6_Demos_24Nov02.zip

Newsgroup: it.comp.lang.delphi
Titolo: QRCompositeReport

Non riesco a far funzionare il QRCompositeReport !
Oltre a questa procedura, devo impostare qualcos'altro ?
procedure TForm1.QRCompositeReport1AddReports(Sender: TObject);
begin
QRCompositeReport1.Reports.Add(Stampa1.QuickRep1);
QRCompositeReport1.Reports.Add(Stampa2.QuickRep2);
QRCompositeReport1.Reports.Add(Stampa3.QuickRep3);
QRCompositeReport1.Reports.Add(Stampa4.QuickRep4);
end;
Nei vari report bisogna assegnare qualcosa ?
Se provo ad avviarlo cosě mi vede solo la prima pagina !
Dove sbaglio ?
grazie.....

 wrote in message
8ptu9m$bom$1...@nslave2.tin.it...


"DesCartes":
| Non riesco a far funzionare il QRCompositeReport !
| Oltre a questa procedura, devo impostare qualcos'altro ?
|
| procedure TForm1.QRCompositeReport1AddReports(Sender: TObject);
| begin
| QRCompositeReport1.Reports.Add(Stampa1.QuickRep1);
| QRCompositeReport1.Reports.Add(Stampa2.QuickRep2);
| QRCompositeReport1.Reports.Add(Stampa3.QuickRep3);
| QRCompositeReport1.Reports.Add(Stampa4.QuickRep4);
| end;
visto che non ti ca*a nessuno ;-) _provo_ a darti una soluzione:
secondo me il proplema e' che aggiungi i report all'interno
dell'evento AddReport (!?), prova a fare una procedura a parte
(o prima del qr.print,....)
boh, prova
Ciao!
Alan Solo


Dalla DEMO che c'è con D5, vengono aggiunti lì !
Ho provato anche in una procedure a parte, ma in quel modo non mi viusalizza
nessuna pagina (neanche la prima)
Grazie cmq del tuo interessamento....





Newsgroup: it.comp.lang.delphi
Titolo: [d6 ent] importare msxml.dll

ciao a tutti, qualcuno mi potrebbe dire come fare per utilizzare il
componente msxml di microsoft da delphi??
Simone

 componente msxml di microsoft da delphi??
Tollbar Componenti -> Scheda Internet -> XMLDocument
-- 
I'am what I'am, I do what I can

Ho eseguito gli aggiornamenti delphi ma non mi compare

 Ho eseguito gli aggiornamenti delphi ma non mi compare
Menu Component => Install Packages => Borland Internet Components.

Newsgroup: it.comp.lang.delphi
Titolo: Somma runtime

Salve,
in prg di lettura fattura ho fatto due tabelle master/detail nel
detail metto tutte le voci degli articoli,
come faccio la somma di una colonna della tabella, con la tabella
ancora aperta ?
Non posso chiuderla, altrimenti perdo l'indice.
GRAZIE 1000
faf...@tiscalinet.it

Non posso chiuderla, altrimenti perdo l'indice.
usando le query questo problema non lo hai...
Poi, per fare la somma senza complicarti la vita,
1) crea una nuova query :
select sum(camposucuivogliolasomma) as TotaleColonna 
from TabellaDettaglio
where TabellaDettaglio.ChiaveMaster = :Qualcosa
2) dopo averla creata indica nella proprieta' params
della query il tipo del parametro qualcosa, ovvero, la chiave
che lega il master al detail.
3) Imposta la proprieta' unidirectiona a true, in modo da velocizzare
al massimo la sua esecuzione. REQUESTLIVE A FALSE, MI RACCOMANDO!
3) Imposti il parametro qualcosa prima di aprire questa nuova query:
querySomma.ParamByName('Qualcosa').AsQualcheTipo := ChiaveMaster;
4) Quando ti serve aggiornare la somma fai così:
querySomma.ExecSql;
Prima di aggiornare non ti serve riassegnare il parametro.
Finchè non lo cambi resta quello che hai impostato la prima volta.
Certo, se cambi il record sul master dovrai aggiornarlo.
Mi permetto di insistere: non usare TTable!
C'è una lsta immensa di svantaggi e controindicazioni nel loro
utilizzo.
Saluti e buon lavoro.
AS
-- 
Posted from 
ammi.mclink.it
 [195.110.128.1] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.delphi
Titolo: Formattare un currency

Ciao a tutti e scusate per la domanda cretina.
Come si fa per formattare un currency
   ES: 1234,5
e metterlo in un Edit sotto forma:
   1'234,50 ?
Con tanto di separatore delle migliaia, 2
cifre decimali e la scritta ??
Esiste una funzione o me la devo fare io a mano?
Qui:
http://groups.google.it/group/it.comp.lang.delphi/search?q=formatta&start=20&
non ho trovato nulla. 

 ha scritto nel messaggio 
news:438cc07e$0$7322$4faf...@reader4.news.tin.it...


 Esiste una funzione o me la devo fare io a mano?
Edit1.Text := FormatFloat(',0.00 ?', 1234.5);
 
-- 
Ciao, Anto', [38, 143, AQ] 
MB C SC 220 CDI Magma Rot
"Oggi c'è una grande battaglia di idee, ma alla 
fine, non ci saranno ne vinti, ne vincitori, ne idee!"
S. Benni da Elianto

 Esiste una funzione o me la devo fare io a mano?
FormatCurr()
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

grazie
;)
Newsgroup: it.comp.lang.delphi
Titolo: Bitmap--->JPeg

Come è possibile leggere un file di tipo jpeg? Esistono oggetti particolari?
Premetto che utilizzo la libreria CLX.
Mi servirebbe sapere se è possibile salvare la picture di un oggetto di tipo
TImage in file con formato jpeg.
Grazie.
--
________________________________
Antonio Signoriello
Progettista Software
High Information Technology S.r.l.
Corso Aldo Moro 171/A
71042  Cerignola FG
Italy
Tel.   
+390885417950
Fax   
+390885417942
Cell.  +3903391199968
antonio_s...@hotmail.com
________________________________

esiste la unit jpeg che contiene delle classi apposite come TJpegImage.
Io uso d5 e non so dirti se ci sono problemi con la clx.
Bye
A.
Newsgroup: it.comp.lang.delphi
Titolo: Visualizzare immagine presente in internet senza fare il download

Ciao a tutti.
Vorrei poter visualizzare un'immagine pubblicata su internet (con url
del tipo 
http://miosito.it/arrow.bmp
) in una mia applicazione senza
però dover fare il download dell'immagine stessa. E' possibile?
Grazie a tutti.

 perň dover fare il download dell'immagine stessa. E' possibile?
Non sono certo di aver capito bene, ma come puoi visualizzare 
un'immagine senza scaricarne i dati relativi (???) :-)
-- 
Marco «Alka» Breveglieri
(marco [@] abls [.] it )
  ABLS Team S.n.c. - Software & Web
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

Grazie a tutti.
	Ciao
	MassimoB
 
---------------------------
http://www.massimobeschi.it/

Era quello che temevo, ma visto che mi era stato chiesto per un
progetto prima di dire che non era possibile volevo una conferma.
Grazie ad entrambi.

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

    è possibile creare alias di database da codice.
Grazie. 

 Grazie.
Ma gugolgrups non lo conosce proprio nessuno?
http://groups.google.it/groups?q=create%20alias%20ODBC%20runtime%20delphi&hl=it&lr=&ie=UTF-8&oe=UTF-8&sa=N&tab=wg
A te la scelta...
-- 
Jax
====
Da pecora cattiva vien buono anche un solo fiocco di lana. (Puskin)
Newsgroup: it.comp.lang.delphi
Titolo: cerco componente simile al TDBCtrlGrid

Esiste un componente simile al tDbCtrlGrid che lavori senza il
database? Ho bisogno di una generica lista di pannelli in cui mettere
componenti tipo edit, checkbox, label, trackbar, ecc. , e ogni item me
li riproponga.
grazie
   Fodox

Il 04/11/2010, Fodox ha detto :

Guarda i componenti della TMS: 
www.tmssoftware.com
-- 
Scrivo su Usenet da quando il Mar Morto era solo indisposto.


Anche l'uso di un *Frame*, magari creato dinamicamente e allineato, pu� 
assolvere tranquillamente il compito.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 assolvere tranquillamente il compito.
grazie ad entrambi, ma l'illuminazione l'ho avuta da marco: uso una
ScrollBox come contenitore e creo dinamicamente pannelli allineati in
alto come items. dentro ai pannelli poi ci schiaffo quello che mi
pare. c'e' da fare un po' di lavoro certosino per agganciare
proprieta' e procedure, ma il risultato è esattamente quello che
volevo.
ciao!
   Fod.

 volevo.
E' l'esatta implementazione che avevo adottato io a suo tempo. :)
Ciao!


Newsgroup: it.comp.lang.delphi
Titolo: TStream e DB Access

Ho un problemino.... vorrei inserire un Stream in un campo blob di
Access 2000 (usando i componenti Kadao).
Sono riuscito (almeno credo) ad inserire qualcosa nel campo blob ma non
riesco a tirarlo fuori per poterlo rileggere quindi non sono neanche
sicuro di quello che ho fatto.
Se qualcuno ha 2 minuti da regalarmi mi farebbe un enorme favore.
Ciao ciao

 Access 2000 (usando i componenti Kadao).
Non ho mai usato i componenti Kadao e tantomeno Access, però ho trovato
questo codice :
This works with KaDao
var
  stream : TMemoryStream;
begin
  stream := TMemoryStream.create;
  try
    with ImagesTbl, io do begin
      stream.Clear;
      TBlobField(fieldByName('Image')).SaveToStream(stream);
      io.LoadFromStream(TStream(Stream));
    end;
  finally
    Stream.free;
  end;
end;
Spero ti sia utile.
Ciao.
Marco D.T.

ora lo provo spero proprio di si
grazie mille
Newsgroup: it.comp.lang.delphi
Titolo: Programma 32 bit e 64 bit [Forse OT]

Ciao a tutti,
  sul pc dove sviluppo le mie piccole applicazioni ho un db firebird 2.5
Questo DB e' gestito dall'applicazione principale (non mia) che e' 
un'applicazione 32 bit ed utilizza la sua fbclient.dll
 
Ora sto aggiornando le mie utility da 32 a 64 bit.
Domanda
Possono coesistere due versioni di firebird 32 e 64 bit ?
 
Lo scenario e' che l'applicazione principale e' sempre in 32 bit, le mie a 
64; quindi le versioni di fbclient.dll sono diverse.
 
Qualche suggerimento prima di fare cose di cui pentirsi ??
 
Grazie
 
Ciao
Daniele 
 

 
 
Le due FBClient.dll vengono installate in directory diverse a seconda se 
si tratta di 32bit (SysWOW64) o 64bit (System32).
 
Ciao.
 

Ciao Luigi,
   grazie per la risposta.
Come da documentazione, le due versioni possono coesistere.
La 32 bit viene installata nella directory C:\Program Files 
(x86)\Firbirdx.x.x e la sua fbclient.dll si trova nella sotto directory bin
La 64 bit viene installata nella directory C:\Programmi\Firbirdx.x.x e la 
sua fbclient.dll si trova nella sotto directory bin mentre quella a 32 bit 
nella sotto dir Wow64
 
Per la compilazione dell'eseguibile basta mettere la fbclient.ddl 32 bit 
nella dir di progetto win32 e l'altra nella win64.
 
Per il momento, siamo ancora all'inizio del progetto, le due connessioni si 
effettuano e reggono.
 
Grazie
 
Ciao
 
Daniele

Newsgroup: it.comp.lang.delphi
Titolo: R: Compilazione, Uses, Units

 blocco tutta la unit ?
Delphi in questo senso č furbo !!! Include SOLO il codice utilizzato (tratto
da: "Il manuale di Delphi 4" di J.L.)
Ciao
Solid Snake

 da: "Il manuale di Delphi 4" di J.L.)
Ok, grazie ad entrambi... ora non mi farò più "scrupoli" ... ehehe :)
Davide DG


Non sempre
esempio
Fai una programma senza form e usa la unit Forms
vedrai 300 K
e non hai usato nulla della unit :)
toglilo
e vedrai 30 K :)
Ciao
--------------------------------------------------
Brayan Fix Kirys Solfory
E-Mail: 
Ki...@technologist.com
 
For Free Software go to: 
http://Kiryssoft.cjb.net
Newsgroup: it.comp.lang.delphi
Titolo: Trasformazione Numeri

Qualcuno può indicarmi se ci sono delle librerie in internet per
trasformare un numero decimale in numero romano???
Ringrazio Anticipatamente
Grazie, sono disperato su questo algoritmo...
Nicola
--- posted by geoForum on 
http://www.delphiedintorni.it

trasformare un numero decimale in numero romano???
E' una trasformazione banale.
Scritta al volo (controlla i possibili errori):
unit RomanNumber;
interface
type
  TRomanNumber = class
  private
    FValue: String;
  public
    property Value: String read FValue write FValue;
    constructor Create(const ADecimalNumber: Integer);
  end;
implementation
uses
  SysUtils;
const
  RomanUnits: array [0..9] of string =
     ('', 'I','II','III','IV','V','VI','VII','VIII','IX');
  RomanTens: array [0..9] of string =
     ('', 'X','XX','XXX','XXXX','L','LX','LXX','LXXX','XC');
  RomanHundreds: array [0..9] of string =
     ('', 'C','CC','CCC','CCCC','D','DC','DCC','DCCC','CM');
  RomanThousands: array [0..1] of string = ('','M');
{ TRomanNumber }
constructor TRomanNumber.Create(const ADecimalNumber: Integer);
var
  Thousands, Hundreds, Tens, Units : integer;
begin
  if ADecimalNumber >= 2000 then raise Exception.Create('decimal
number too high (max 1999)');
  Thousands := ADecimalNumber div 1000;
  Hundreds := (ADecimalNumber div 100) mod 10;
  Tens := (ADecimalNumber div 10) mod 10;
  Units := ADecimalNumber mod 10;
  FValue := RomanThousands[Thousands]+
            RomanHundreds[Hundreds]+
            RomanTens[Tens]+
            RomanUnits[Units];
end;
end.

Newsgroup: it.comp.lang.delphi
Titolo: Esplorazione cartelle...

Ho un piccolo problema... Intendo creare un programma che, data una relativa
directory, mi dia in output in una memo o in una listbox tutti i file
presenti.... Se qualcuno mi sa dare qualche dritta ...... Ringrazio tutti
anticipatamente....
cow_a...@libero.it
             Andrea.

 ha scritto nel messaggio 
news:1vq0h.19362$uv5.1...@twister1.libero.it...

FindFirst e fratelli
Ciao
V. 

 presenti.... 
Se ti accontenti puoi usare anche una TFileListBox nella palette Win 3.1 
(mi pare).
-- 
Jax
Newsgroup: it.comp.lang.delphi
Titolo: Intercettare shotdown di windows

Ciao a tutti,
avrei la necessita di intercettare lo shutdowsn di windows, cioe' qundo 
l'utente effettua l'arresto del sistema'
Qualche consiglio?
Grazie
Ciao
 Loris 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

> Qualche consiglio?
Google rulez.
A.


puoi chiedere meglio su
it.comp.programmare.win32
Ciao
C. 

Controlla il messaggio WM_ENDSESSION che viene inviato dal sistema 
all'arresto.
Se poi vuoi controllare e in qualche caso bloccare l'arresto del sistema 
controlla il messaggio WM_QUERYENDSESSION
Per l'uso dei due ti consiglio l'help in linea
Bye


Newsgroup: it.comp.lang.delphi
Titolo: ReportBuilder v7 e immagini jpeg

Qualcuno saprebbe dirmi come risolvere questo problema?
seleziono un record di un database mysql con un campo longblob e cerco 
di stamparlo tramite ReportBuilder.
A questo punto mi appare un eccezione che dice:
"Project XY as raised exception class EInvalidGraphic with message 
'Bitmap image is not valid'...".
Strano, nella creazione del report vedo benissimo la foto presente nel 
campo DBImage settato a JPEG come formato Graphic Type.
Grazie per un vostro aiuto
Tiziano Crimella

 'Bitmap image is not valid'...".
Evidentemente il componente di ReportBuilder si aspetta un bitmap e non un
jpeg...
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 jpeg...
E non mi sembra tanto evidente visto che durante la creazione del report 
imposto il formato jpeg come immagine da utilizzare
e, sempre in design mode, riesco pure a vedere la foto.
O ci sta un bugarozzo nel programma o c'é da fare qualche script un po' 
particolare.
Altri consigli???
ciao
Tiziano

 imposto il formato jpeg come immagine da utilizzare
Sta di fatto (e questo è evidente) che a runtime il programma cerca di
riconoscere un jpeg laddove si trova un bitmap.


 riconoscere un jpeg laddove si trova un bitmap.
Mi sa che ritorno su quick report...questo problema non me lo faceva.
Grazie comunque

 Grazie comunque
Forse sarebbe il caso che imparassi a usare meglio i tool che ti proponi
di usare.  Fare un passo del genere č come passare da una Ferrari a una
500 ;-)


Newsgroup: it.comp.lang.delphi
Titolo: Requisiti minimi?

Come si a sapere i requisiti minimi di un processore?
cioč che per un programma il minimo č un Pentium invece che un 486 o
un Pentium Pro o addiritura di un P4?
poi la ram?
Poi per i "riquesiti consigliati"?
Il Razziatore,
The Only Good Windows in an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596

Mi scuso questa era solo una bozza... il messagio completo è 
"Requisiti miniimi, Riquisiti Consigliati"

Newsgroup: it.comp.lang.delphi
Titolo: Altri newsgroup su Delphi e Interbase?

Oltre a quelli della Borland ci sono altri newsgroup su delphi ed Interbase?
Ringrazio chi risponde.
Marco

Ciao,
ci sono quelli di Marco Cantů (
www.marcocantu.it
), perň ti devi iscrivere.
Nella gerarchia puoi trovare libero.delphi e libero.delphi.database (mi pare
sia questo)
Uno su IB non c'č, ma quello sui DB č molto buono.
Bye
--
- Carlo -
BSSoftware Tips Mailing-List Support

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

Brr..... paura pura!
a scuola ci hanno detto che quest'anno ci vogliono insegnare
java, invece che C++ o Delphi.
Bah io la nuova prof non la capisco....
Aiuto!   :-)
rhymes
rhy...@forevergames.net
*************************************
Redattore di Forevergames.net
www.forevergames.net
*************************************

Bah io la nuova prof non la capisco....
Non cercare di capire.
Studia quel che ti dicono loro per accontentarli e poi, per fatti tuoi,
vediti il c++ ed il delphi!
AS
"Se è Microsoft non funziona"

Bah io la nuova prof non la capisco....
Non sottovalutare Java, cone linguaggio è molto buono...
Delphi puoi sempre impararlo via libri/ng, ti assicuro che ho imparato molto
di + con un po' di sudore che in 3 anni di Delphi a scuola!
Ciao e buon anno scolastico! :)
--
- Carlo -

Azzo..
Beati voi che a scuola vi hanno fatto fare Delphi, Java..
Io a scuola o fatto Tp 3.0 e TC 2.0....
accontenetatevi.. la vostra è una grossa fortuna..
Ciao
--
Posted from 
laguna.tiscalinet.it
 [195.130.224.86] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

accontenetatevi.. la vostra è una grossa fortuna..
A me hanno fatto fare il Basic ed il fortran.....Sob!



Al sottoscritto Pascal e Clipper .... mi sento vecchio!
Ciao, warp


wrote:

Newsgroup: it.comp.lang.delphi
Titolo: Ridefinizione evento OnMouseMove durante creazione componente...

Salve,
ho il seguente problema...
Sto creando un nuovo componente che deriva da TFrameControl (CLX, il 
componente funziona su Kylix quindi niente gestione dei messaggi).
Tale componente contiene un TEdit che ne occupa solo metà spazio... 
(ossia MyEdit.Left è pari al 50% della dimensione del componente)
Mi trovo adesso ad aggiungere l'evento "OnMouseMove" a questo mio 
componente... ho fatto così:
Nella sezione "Private" della dichiarazione del componente ho scritto:
  FOnMouseMove: TMouseMoveEvent;
  procedure EditOnMouseMove(Sender: TObject; Shift: TShiftState;
                            X, Y: Integer);
Nella sezione "Published":
  property OnMouseMove: TMouseMoveEvent read FOnMouseMove write 
FOnMouseMove;
La procedura EditOnMouseMove viene chiamata quando il mouse passa sopra 
MyEdit... ossia in "create" del mio componente ho questa linea:
  MyEdit.OnMouseMove := EditOnMouseMove;
E EditOnMouseMove contiene:
  procedure TMyComponent.EditOnMouseMove(Sender: TObject;
    Shift: TShiftState; X, Y: Integer);
  begin
    If Assigned(FOnMouseMove) then
     begin
      FOnMouseMove(Sender,Shift,FEdit.Left+X,FEdit.Top+Y);
     end;
  end;
Il problema è che adesso "OnMouseMove" viene eseguito solo quando il 
mouse si trova sì nel mio componente... ma solo nella parte occupata 
dall'Edit. Come faccio a fare in modo che funzioni anche dove il mio 
componente non contiene nessun SubComponente?
Grazie,
   Luca

 componente non contiene nessun SubComponente?
Ho ridefinito "MouseMove" e adesso sembra funzionare.
Ciao,
   Luca

Newsgroup: it.comp.lang.delphi
Titolo: Ricerca file di una directory

Ciao come faccio? prima avevo fsearch con Borland Pascal e ora che
abbiamo? devo leggere una directory ad esempio dei file *.lang...
grazie!
p.s. prima si avevano i tipi Text, ora sono sostituiti da TFileStream, è
giusto?
questo file .lang è fatto così:
Contenuto del file italian.lang
Hours
Minute
Seconds
mi basta un TFileStream.read (..) per leggere una stringa (senza
dimensione fissa)?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 grazie!
Guarda sull'help le funzioni FindFirst, FindNext
  Fabrizio

Esistono anche i TextFile i tipi FILE generici oppure puoi anche definire un
trecord e dichiarare un file of tuoirecord.

 trecord e dichiarare un file of tuoirecord.
si' ma le stringe nel file sono di lunghezza variabile, non fissa.


scusa il ritardo nella risposta..... scusa
Allora ....il sistema mi pare ovvio: leggi un byte alla volta con rottura
sul carriage return.

 sul carriage return.
No.
Utilizza ReadLn()

 wrote in message
news:a7fdv2$tud$1...@newsreader.mailgate.org...

perfetto è quello ke volevo

Newsgroup: it.comp.lang.delphi
Titolo: Domanda..confermare con before post

desidero chiedere all'utente se i dati che ha appena inserito in una tabella
sono giusti usando l'evento before post del ttable ....se l'utente risponde
No, i dati non devono essere aggiornati. Si deve tener conto che l'utente
potrebbe essere in inserimento o modifica del record.
RISPOSTA:=Application.MessageBox(Confermi
Inserimento/Modifica?','ATTENZIONE',mb_YesNo+mb_IconQuestion+mb_DefButton1+m
b_applmodal);
IF RISPOSTA=IDNo THEN BEGIN
                  ????????? cosa devo mettere in queste righe ??????????
                  end;
Grazie a tutti
Ciao
Gianni

                   end;
ABORT
--
saluti
FDA

>                   end;
o abort oppure lanci una bella eccezione raise exception.create( 
'Operazione interrotta' );
ciao ciao, Luca.
-- 
ICQ: 11024183
L'amore e' una malattia e, come tale, si cura andando a letto.
Newsgroup: it.comp.lang.delphi
Titolo: Domandina ADO multiutente

Ciao a tutti!
Ho una ADOQuery che mi raccoglie tutti i campi di una tabella e altri campi
di tabelle collegate. Tramite i metodi next e prev, l'utente naviga avanti e
indietro tra i record restituiti dalla query.
Se un altro utente intanto inserisce un nuovo record sul db (access), come
faccio a sapere che lo ha fatto, in modo da riquerare la ADOQuery e da
rendere visibile il nuovo record per la navigazione? Ho provato a rieseguire
la query (requery) ad ogni prev o next, ma e' terribilmente lento... :-*
Grazie, Chris

 ha scritto nel messaggio
news:embsa.82657$iy5.2...@twister2.libero.it...


 la query (requery) ad ogni prev o next, ma e' terribilmente lento... :-*
ciao
la domanda che poni fa trasparire che dopo tutto non hai un grossa
esperienza in questo tipo di problematiche, probabilmente sei ai primi
approcci in programmazione o quanto meno in programmazione client-server o
n-livelli.
ti consiglio di approfondire le tematiche in questione.
qualche consiglio utile (per quello che ne so)
1) se possibile usa un db diverso da access, perchè non è stato progettato
per un ambiente multiutente. e questo è uno dei motivi perchè è lento.
2) fare una requery ad ogni prev/next significa in poche parole richiedere
nuovamente il trasporto dei record interessati dal server al client, e
questo provoca sicuramente un peggioramento delle prestazioni, se poi la tua
query è select * from tabella, non ne parliamo. questo è un altro motivo per
cui access è lento.
3) quando posti un problema dovresti mettere un po' di codice di quello che
hai scritto cosi la comunità ti può aiutare meglio, e non cercare di
indovinare su quello che hai fatto.
4) usa TADODataSet al posto di TADOQuery che è un po' meglio. TADOQuery è
stato scritto per chi già usava questo componente con delphi prima
dell'avvento di ado però è più lento di TADODataSet.
5)hai pensato alla concorrenza degli aggiornamenti? ovvero quando due o più
utenti cercano di modificare lo stesso record contemporaneamente? ti chiedo
questo perchè se hai pensato a questo tipo di problematica dovresti
risponderti da solo alla tua domanda, diversamente ripropongo il mio
consiglio... studia ADO!! ;)
spero di averti aiutato
ciao
roberto

> spero di averti aiutato
Tantissimo, ti ringrazio per i chiarimenti :-)
Chris
Newsgroup: it.comp.lang.delphi
Titolo: caFree e errore

Scusate a tutti.. ma ho provato a cercare e non trovo questo piccolo
problema..
Ho creato a runtime una finestra MDI figlia... ora però avendole tolto il
pulsante x di chiusura
ho creato un pulsate che all'evento click fa formchild.close...
Nell'evento onclose ho messo action;=cafree
Perchè mi da errore??di memoria... quando se faccio la stessa procedura con
il suo pulsante X nativo questo non accade....?
Anche se metto un pulsante nella finestra madre avviene la stessa cosa.
Grazie mille
Stefano

 Nell'evento onclose ho messo action;=cafree
Non devi scrivere:
  Result := caFree;   ???
Ciao,
   Ste 

 Nell'evento onclose ho messo action;=cafree
Non devi scrivere:


I casi sono due: supponendo che nella nuova finestra ci sia un pulsante, 
puoi chiudere la finestra scrivendo nel metodo ButtonClick del pulsante:
Result := caFree;
{in questo caso la finestra deve essere per forza stata chiamata con 
ShowModal}
oppure semplicemente:
Close;
Il metodo OnClose di cui tu parli, viene attivato subito prima di chiudere 
la finestra, quando ormai ha già ricevuto il comando di chiusura. Non ha 
senso quindi scrivere all'interno di questo metodo nè Result := caFree; nè 
Close;...
Spero d'esserti stato d'aiuto,
   Ste 







Newsgroup: it.comp.lang.delphi
Titolo: Aiuto per menù di avvio di una serie di programmi

Ciao a tutti gente :)
Avrei bosogno di un consiglio su di un programma che ha come menù principale
una "tendina" tipo lo Start che alcuni sistemi operativi usano come menù di
avvio
(Start,. programmi etc.). Secondo voi c'è la maniera di realizzare qualche
cosa
in Delphi? (Io utilizzo la versione 5) Mi potreste instradare con qualche
esempio
o qualche dritta su come potrei farlo? (intendo sia la tendina che la
sottolineatura
al momento di passaggi con il mouse sulla dicitura.)
Grazie e ciao
----------------------------
Baluca
fidder #40
Mezzelfo ladro #1
-----------------------------

 usano come menù di avvio
So che è un consiglio antipatico, ma qualcuno doveva pure dartelo: lascia
perdere quel tipo di interfaccia, che è stata inventata proprio *apposta*
per win95 e, come tale, ha senso solo in quel contesto.
Non per niente, se guardi qualsiasi programma, non credo troverai
un'interfaccia simile, che non farebbe altro che confondere l'utente.
Al contrario puoi usare un bel TMainMenu che anche il mio coniglio sa cos'è
e come funziona, oppure dei semplici BitBtn se le azioni che il programma
deve compiere sono poche.
Comunque, se proprio vuoi usarlo, è semplicissimo, basta usare un TBitBtn
che fa fare il popup ad un (appunto) TPopupMenu, che avrai già preparato a
tuo piacimento.
procedure TForm1.BitBtn1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
 pXY: TPoint;
begin
 pXY := ClientToScreen(Point(
    (Sender as TControl).Left,
    (Sender as TControl).Top + (Sender as TControl).Height)
    );
 PopupMenu1.Popup(pXY.X, pXY.Y);
end;
--
Jax
====
Gli amici se ne vanno, e noi aspettiamo che il funerale sia finito per
dimenticarli.

Grazie, penso che farň come mi hai consigliato tu :)
Ciao
