mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: focus su una form

ciao a tutti,
vorrei scatenare un evento quando il focus va su una determinata form. Mi 
serve che si scateni sia quando si passa da un software al mio(se č su
quella 
form) sia quando all'interno del mio programma mi muovo tra le varie form
e il 
focus torna su quella che voglio io.
qualche dritta?
grazie mille
-- 
mnoga
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 serve che si scateni sia quando si passa da un software al mio
per fase cosa?
A.

 qualche dritta?
Dall'help:
1) TApplication.OnActivate Event
Write an OnActivate event handler to perform special
processing when the application becomes active.
An application becomes active when it is initially run or
when focus moves from another Windows application back to
any window of the application.
Note: You can also respond to this event using the
TApplicationEvents component, which allows you to assign an
event handler using the IDE.
2) TForm.OnActivate
Use OnActivate to perform special processing when the form
receives focus. A form becomes active when focus is
transferred to it (when the user clicks on the form, for
example).
Note: The OnActivate event of the application
(TApplication), not the form, occurs when Windows switches
control from another application.
ACSH
--- news://
freenews.netfront.net/
 - complaints: 
ne...@netfront.net
 ---

 A.
come per fare cosa? 
in pratica ho una griglia che si refresha ogni tot secondi, siccome il
carico 
sul server è elevato, volevo farle fare il refresh solo quando l'utente
accede 
alla griglia...
-- 
mnoga


 2) TForm.OnActivate
Grande ACSH, avevo dimenticato l'onactivate :-)
Newsgroup: it.comp.lang.delphi
Titolo: Out of system... con TImage

Salve a tutti, uso D3
Se provo a fare una procedura <Draw> in un componente TImage e
l'immagine è molto grossa (tipo 3000x3000), il programma si blocca e mi
dice <Out of system resource>.
Come posso fare ad eliminare questo problema?
Ringrazio a tutti in anticipo.
http://micla.hypermart.net

 wrote in message
3971B4AA...@hotmail.com...

Cosi su due piedi il problema è troppo vago e le possibilità sono tante.
Dovrei vedere il codice che disegna, cosi da capire se sono contenute
funzioni che rallentano pesantemente tipo Canvas.Pixels[X, Y] invece di
Canvas.ScanLine
o qualche ciclo iterattivo o ricorsivo strano. Se vuoi puoi mandare questo
pezzo di codice alla mia mail per non intasare il news.
                                                                        Ciao
Davide Carrara
cci...@libero.it


Personalmente penso che tu stia "abusando" del componente TImage.
Tale componente infatti e' stato studiato per gestire piccole immagini da
piazzare sulle form. Se devi gestire grosse immagini devi farne una gestione
di piu' basso livello, utilizzando le API o qualche libreria apposita per la
loro gestione
Ciao,
Stefano

vedo che non hai risolto il problema....
mi passeresti il codice ?? magari solo quello incriminato... non mi servono
le immagini
--
Callegaro Luca
EMail        : Luca_D...@Libero.It
ICQ          : 15825215
Active List : 72728232   UT ITALY

Anche io sono giunto alla conclusione di aver chiesto troppo, poi ho
scoperto che dipende anche dalla tavolozza dei colori installati sul
compiuter.
Infatti se riduco i colori a 65000 il limite della grandezza che posso
utilizzare aumenta.
Io, comunque, non volevo realizzare grandi cose, volevo solo creare una
grossa immagine dove poter inserici dentro più immagini, usando le
procedure classiche del Canvas (Draw).
Grazie della risposta.


 > Come posso fare ad eliminare questo problema?


Newsgroup: it.comp.lang.delphi
Titolo: Help di Delphi 5 in italiano

Sto cercando da molti giorni l'help del mitico Delphi 5 in italiano ma no
lo trovato :-(
Se qualcuno sa dove trovarlo (su internet naturalmente :-)
) oppure ce là gia mi invii l'indirizzo.
Vi ringrazio anticipatamente per
la vostra collaborazione.
ciao da Franza !!!!!!!!
P.S. Se non ci si
aiuta fra programmatori......
--------------------------------
Inviato via 
http://usenet.iol.it

 lo trovato :-(
non penso che esista ... o cmq non ne ho mai sentito parlare ...
--
Consonni Davide
bmq...@tin.it
gna...@wappi.com
webmaster of
http://gnaffy.Tripod.com
http://www.traduzioniellepi.com
Newsgroup: it.comp.lang.delphi
Titolo: Computer VERGINE

Salve a tutti,
ho sviluppato un'applicazione in delphi che fa uso di un database ACCESS,
adesso devo farlo girare su un pc vergine, cioe' dove non e' installato il
delphi. Ovviamente il programma non funziona senza il DBE e l'SQL Link...
vorrei sapere se esiste un sito internet dove poter reperire questi due
programmi in considerazione del fatto che non ho ovviamente il cd del
delphi!! :-)
Grazie a tutti
--
Max Power
max_...@freemail.it

 ha scritto nel messaggio
news:93o7d5$474$1...@nread1.inwind.it...


 wrote in message
93o7d5$474$1...@nread1.inwind.it...

Newsgroup: it.comp.lang.delphi
Titolo: Disegni "tra i testi"

Salve, ho la necessità di inserire alcune piccole immagini tra delle parole,
tipo smile, piccole frecce, ecc in un memo o richedit (credo che userò
questo che sembra migliore e mi pare si possano utilizzare solo qui "oggetti
esterni")...
...solamente che non so da dove partire per inserire una immagine, mi potete
aiutare a fare ciò? Per imparare e capire il meccanismo mi basta il codice
da mettere in un Button (premo sul pulsante e mi inserisce (anche con un
append) nel richedit una qualsiasi immagine (non so neanche i formati
supportati... bmp? gif? [per queste credo ci sia bisogno di altri componenti
tipo le jedi, o rxlib o sbaglio?])
Grazie per gli aiuti :)

Wok wrote:
[cuttotutto]
Nessuno mi sa aiutare? :(

Ciao, so che il RichEdit contenuto nelle Rx permette agilmente
l'implementazione delle features che richiedi.
Per farlo con un RichEdit normale non saprei... tempo fa avevo trovato a
giro per la rete un sistema per tradurre un bmp in uno stream in formato
rtf, ma ricordo anche che non avevo trovato il sistema per copiare lo stream
nel richedit.
Se trovi qualche soluzione batti un colpo, che mi incuriosisce.
Ciao

 Se trovi qualche soluzione batti un colpo, che mi incuriosisce.
Ok, se ci riuscirò farò sapere nel ng (fai lo stesso tu mi racocmando :] )
Byez

Bene, diciamo che ho fatto qualche passetto in avanti
Ho capito che il wrapper per la DLL del richedit che mette a disposizione
Borland č molto ridotto, Win32 mette a disposizione il RichOLE, molto piů
potente.
Direttamente da borland.public.cppbuiler.vcl.components.using :
TRichEdit is only a thin wrapper around the Win32 API RICHEDIT control.  The
Win32 OLE interface for the RichEdit control supports images, but the VCL
component does not expose this.  You can use the EM_GETOLEINTERFACE message
to get the IRichEditOle interface, though, and then use that directly.
Have a look at 
http://home.att.net/~robertdunn/Yacs.html
 There is a
tutorial, sample code, and a companion class for using the OLE
functionalities of RichEdit.
Ora, nel frattempo, prima di buttarmi in questa direzione, ho provato a fare
qualcos'altro (funziona, ma ancora ho moltissimi dubbi):
procedure TForm1.Inserisci_Bitmap(Immagine: TBitmap);
var
   Punto      : TPoint;
   CharPos    : Integer;
   aCanvas    : Tcanvas;
   Rettangolo : TRect;
begin
   // acchiappo la posizione al cursore
   CharPos := RichEdit1.SelStart;
   RichEdit1.Perform(EM_POSFROMCHAR, Integer(@Punto), CharPos);
   // poi disegno la bitmap passata
   try
      aCanvas := TCanvas.Create;
      aCanvas.Handle := GetDC(RichEdit1.Handle);
      Rettangolo.TopLeft := Punto;
      Rettangolo.Bottom := Punto.Y + Immagine.Height;
      Rettangolo.Right := Punto.X + Immagine.Width;
      aCanvas.StretchDraw(Rettangolo, Immagine);
   Finally
      ReleaseDC(RichEdit1.Handle,aCanvas.Handle);
      aCanvas.Free;
   End;
end;
Fammi sapere nuovi sviluppi, CIAOUX
Newsgroup: it.comp.lang.delphi
Titolo: Componente per accesso ad un DB tramite LAN

Ciao a tutti,
avrei la necessità di accedere ad un db tramite lan, evitando la soluzione
delle connessioni di rete.
Ho sentito parlare di un componente di nome midas, ma non trovato granche in
rete.
Ho provato inoltre ad usare un componente passatomi da un amico, si dovrebbe
chiamare Interbase
e dovrebbe essere tipo clone del midas, ma nonostante la config del DCOM (ho
provato tutte le combinazioni possibili di autorizzazione, tipo di accesso
etc...), ottengo sempre lo stesso errore: accesso negato!
Il server è un winxp pro mentre per i client ho provato su 98 e Xp HE.
Avete qualche suggerimento?
Grazie mille
--
Roberto Petillo

delle connessioni di rete.
In che senso "evitando le connessioni di rete" ? 
Interbase e MIDAS non sono componenti.  Interbase è un DBMS
Client/Server, MIDAS è la tecnologia di accesso ai dati in modo
distribuito.  Forse sarebbe meglio che spiegassi qual è la tua reale
esigenza.
-- 
Andrea Laforgia - a.laforgia(at)
libero.it
"There are three kinds of people in this world; 
 those who are good at maths and those who aren't".

 esigenza.
Vorrei semplicemente far risiedere il db su un server e accedervi tramite
rete lan, avitando di fare le connessioni alle unità di rete in windows.
Grazie

praticamente lo fai con qualsiasi db client/server.
ad esempio, per collegarsi ad un db interbase, basta che nel componente
tibdatabase, prop databasename, ci scrivi:
NomeDelTuoserver:C:\TUACARTELLADB\TUODB.GDB
oppure:
10.100.100.234:C:\TUACARTELLADB\TUODB.GDB
Di sicuro lo permette anchr Sybase
Bye
A

 ha scritto nel messaggio
news:bdrlme$10ceo0$1...@ID-113949.news.dfncis.de...

Ma il db è un database (Oracle, MS SQL, Interbase, MySql, ...)
oppure è un file (access, paradox, dbase) ?
--
Carlo Muccini

rete lan, avitando di fare le connessioni alle unità di rete in windows.
OK.  
Con Interbase lo fai facilmente impostando la stringa di connessione
come ti è stato detto (generalmente ogni client mantiene
l'impostazione in un file .INI).  IB richiede soltanto l'installazione
del server sulla macchina centrale e l'installazione del client su
ogni postazione.

Newsgroup: it.comp.lang.delphi
Titolo: D4 e Service Pack

Salve a tutti, vi scoccio con altre domande...
1)Oggi in ufficio abbiamo provato Delphi 4  (Attualmente usiamo il 3), e
abbiamo notato dei problemi con i tool di stampa che usavamo... ora mi
chiedo ci sono service pack a l riguardo? se si dove si possono trovare?
2) In WIn 2000 abbiamo qualche problema degli sprite a video  diventano dei
rettangoli neri se si usa una profondita di colore a 16 bit.. ma con
profondita di colore diverse va tutto bene.. cosa potrebbe essere?
Ciao a tutti !

Per quanto riguarda i SP di delphi 4, li puoi trovare sul sito della
Borland, scaricabili gratuitamente. Sono 3. L'unico problema č che
sono abbastanza grandi (2 mi pare siano dell'ordine dei 40 MB!!!).
Per Win2K non sň. Ciao.


Ciao a tutti !
aggiorna i driver della skeda video :)
--------------------------------------------------
Brayan Fix Kirys Solfory
E-Mail: 
Ki...@technologist.com
 
For Free Software go to: 
http://Kiryssoft.cjb.net
Newsgroup: it.comp.lang.delphi
Titolo: errore nell'installazione - urgente grazie!

ciao scusate il disturb ma ho un errore grave che non mi permette
l'installazione di deplhi 5.
lo sto intallando su un portatile asus,processore inter core duo
t2300,qindows zp professional.
installo tutto,al momento del lancio del programma,ancora mentre c'è
la finestrelle centrale mi appare il seguente errore :" Impossibile
trovare il punto di ingresso @Ib@SSQLDataOpen della procedura nella
libreria di collegamento dinamico VCLIB50.bpl.
premo ok e mi dice :can't load package c:\programmi\borland\delphi5\bin
\dclib50.bpl,impossibile trovare la procedure specificata.do you want
to attempt to load this  package the next time a project is 
loaded.se
premo yes riappare tutto il giro e poi dopo parte delphi,se premo no
parte subito deplhi.
qualcuno mi sa aiutare?grazieeee
--
mnoga

 libreria di collegamento dinamico VCLIB50.bpl.
Probabilmente non e' stato correttamente installato il package dei
componenti interbase.
Rimedi possibili? Reinstallare.......
ciao
-- 
Morde

 Morde
ciao,
ovviamente ho già provato a reinstallare,ma il problema
persiste...abbiamo pure provato a sostituire i bpl ma non funziona lo
stesso.
Sul portatile è presente una versione di visual studio,non so se
quella possa infastidire il delphi...
--
mnoga

Sembra ci sia un mismatch dei bpl: i bpl che hai non esportano le 
funzioni correte. Hai installato qualche aggiornamento dei componenti IB 
o è l'installazione pulita pulita? Hai installato gli update pack?
Visual Studio non c'entra, almeno con i BPL :)
--- posted by geoForum on 
http://www.delphiedintorni.it


no nulla di che,installazione pulita pulita di delphi,sempre delphi mi
chiede di installare gli ib e confermo. poi al primo avvio di delphi
mi da quei problemi..

 mi da quei problemi..
e se non confermi, installa tutto correttamente, seppur senza gli IB?
-- 
Morde

 Morde
questo lo devo provare,purtroppo mi servono gli ib...la prossima volta
provo

provo
Scarica una versione aggiornata degli IB da CodeCentral.

Newsgroup: it.comp.lang.delphi
Titolo: AddObject: cosa sbaglio ?

Salve a tutti,
utilizzo la seguente struttura e puntatore
type
  PEBFile = ^TEBFile;
  TEBFile = record
    PathFile:         string;
    TextInserted:     string;
  end;
Il codice seguente avrebbe la pretesa di inserire la struttura come
Object in un ListBox:
  PtrEB^.PathFile := sEBFileName ;
  PtrEB^.TextInserted:=DateToStr(tmpDateTime);
  lb.Items.AddObject(PtrEB.TextInserted , TObject(PtrEB));
mentre con la riga seguente vorrei leggere quanto inserito:
  s:=PEBFile(lb.Items.Objects[ReadIndex])^.PathFile ;
Non ottengo nessun errore ma in realtà leggo sempre '' (nulla). 
PtrEB lo creo con una New e lo distruggo più avanti con una Dispose.
Dove sbaglio ? Ho perso tutta la giornata con queste 4 righe di
codice...
Help me, please!!!!!
Bruno



Non trovo nulla di sbagliato, almeno nella porzione di codice che hai
postato.
Ho provato a scrivere una cosa simile e funziona egregiamente.
Te la posto nel caso possa aiutarti.
type
  TRec = record
    FileName: string;
    Data: string;
  end;
  PRec= ^TRec;
procedure TForm1.Button2Click(Sender: TObject);
var
  DosError: Integer;
  SearchRec: TSearchRec;
  P: PRec;
begin
  DosError := FindFirst('c:\*.*', faAnyFile, SearchRec);
  while DosError = 0 do begin
    New(P);
    P.FileName := SearchRec.Name;
    P.Data := IntToStr(SearchRec.Size);
    ListBox1.Items.AddObject(P.FileName, TObject(P));
    DosError := FindNext(SearchRec);
  end;
  FindClose(SearchRec);
end;
procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
  MessageDlg(PRec(ListBox1.Items.Objects[ListBox1.ItemIndex]).Data,
mtInformation, [mbOk], 0);
end;
procedure TForm1.FormDestroy(Sender: TObject);
var
  I: Integer;
begin
  for I := 0 to ListBox1.Items.Count -1 do
    Dispose(PRec(ListBox1.Items.Objects[i]));
end;
-- 
"La velocità luce non è sufficiente Comandante Nunziatella, 
dobbiamo passare alla velocità smodata!"

 wrote:
Ciao Massimo,
cosa fare per ringraziarti ?
Replicando il tuo codice tutto si è messo a funzionare!! Sono allibito
e continuo a non capire cosa c'era di sbagliato.
Ancora grazie!!!
Bruno


Newsgroup: it.comp.lang.delphi
Titolo: ComboBox... non ReadOnly?

Salve,
non so se sono io o è proprio così... ma tra le proprietà del ComboBox non
ho (Delphi 7) la proprietà ReadOnly... cio' è abbastanza fastidioso e
necessiterei non far modificare i valori... ho provato anche a cercare tra i
metodi direttamente nel codice (sul Create del Form), ma neanche li esiste
ComboBox1.ReadOnly...
Avete qualche aiuto in proposito o mi devo cercare un combobox esterno che
ce l'abbia?
Grazie mille

 ce l'abbia?
Hai guardato le proprietą Style? Se la imposti a csDropDownList dovresti 
risolvere...
HTH,
-- 
Andrea /\/\agni
ICQ# 174108000

 risolvere...
Azz, grande :)
Non sapevo la funzione delle proprietą "Style", grazie ancora tutto ok :)
(lo consideravo come un TEdit in effetti...)
Newsgroup: it.comp.lang.delphi
Titolo: D7E - Exe che gira sia come servizio che come applicazione normale

Un saluto a tutti.
Questa "domandina" e' un po tosta, lo so....
Il subject dice tutto..
So che questa cosa si puo' fare: un esempio e' il motore di interbase
che puo girare sia come exe standard su sistemi win9x sia come
servizio win32 su sistemi nt..
Al solito, non chiedo la "pappa pronta"...
Se avete link o cose che riguardano questa cosa e me li passate poi me
la smazzo da me..
Pax vobiscum.
A.

 la smazzo da me..
Prova questo link: 
http://support.microsoft.com/kb/137890
e dimmi se tengo una birra pagata o da pagare.. :-D
Ciao
-- 
Morde

 e dimmi se tengo una birra pagata o da pagare.. :-D
ehm..non si parla di os successivi a 2000...
Quindi, niente winserver2003 o windows xp....
Ma si prova. Tnx.
A.

Alberto Salvati ha scritto:

Perche' non fare qualcosa di simile nel DPR?
<pseudocodice - vado a memoria perche' non ho piu' Delphi installato>
Application.inizializate;
if Paramstr(1) = ''Serv''
 Then application.CreateForm(ClasseServizio, NomeClasse)
 Else application.createForm(TMainForm, MainForm);
application.Run;
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 application.Run;
carina, questa cosa...
Pero cosi si da per scontato che un exe "normale" e il file exe di un
servizio win32 siano uguali come struttura...
A.


 <pseudocodice - vado a memoria perche' non ho piu' Delphi installato>
Cooooome??
ACSH senza piï¿œ delphi su pc???
Un altro che se ne va....
-- 
Morde

Morde ha scritto:

asd io sono tornato!!
ho cambiato lavoro e nella nuova azienda in cui sono usano ancora 
delphi7! LoL :-D
-- 
http://www.evilripper.net
http://www.flickr.com/photos/evilripper/

 Un altro che se ne va....
Sgrat ... sgrat ...
Fammi dare una grattatina che, anche se non sono superstizioso, non fa mai 
male ...


 servizio win32 siano uguali come struttura...
I Servizi sono essenzialmente delle "Console Application", quindi direi
che 
non sara' questo il problema.
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 


 male ...
Bell'ossimoro :-)
Mi ricorda questa: "Io non sono superstizioso: esserlo porta sfiga."
^___^
Scusa ma che cosa stai facendo ora, programmi in un altro linguaggio? 
Oppure hai detto finalmente addio alla nostra ingrata professione?? :-D
-- 
Morde

 Oppure hai detto finalmente addio alla nostra ingrata professione?? :-D
A dire la verit�, di professione ingrata ne facevo - e tuttora faccio - 
un'altra. Ho semplicemente fuso l'hard disk e Delphi e' in fondo alla
lista 
dei programmi da installare.
Ciao

Newsgroup: it.comp.lang.delphi
Titolo: Debug Array Bounds Excedeed

Salve a tutti!
Sto cercando di capire come impostare il debugger integrato
in modo che mi segnali quando cerco di accedere ad un Array
fuori dai suoi limiti. Infatti attualmente non me lo segnala!
Ho provato nel menu Tools-->Debugger Options a modificare le impostazioni
sia di Language Exception che di OS Exception ma non cambia nulla.
P.S. uso Delphi 5

compiler-options-range checking


-- 
Using Opera's revolutionary e-mail client: 
http://www.opera.com/mail/

ma in effetti pensandoci bene si verificano solo in fase di esecuzione
Infatti, lo puoi sapere solo a runtime.
Ergo, dici al compilatore di creare gli obj in modo che a runtime
questi errori vengano segnalati.
Ti suggerisco di dare un occhio anche agli assert.
AS
AS

> Ti suggerisco di dare un occhio anche agli assert.
scusa, che cosa sono?


> Ti suggerisco di dare un occhio anche agli assert.
ho trovato la procedura Assert, devo ammettere che non l'avevo mai neanche  
sentita,
ma e' utile?


 ma e' utile?
Per una volta che ho scritto qualcosa di utile io... ;-)
http://www.marco.breveglieri.name/index.php?page_id=21
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Definisci "utile".
AS

 ma e' utile?
Sě, lo č, ma generalmente solo a livello di scrittura del codice.  A
run-time bisogna gestire gli errori in maniera corretta e sopratutto senza
traumatizzare l'utente. Un assert č utile per testare pre e post
condizioni per una determinata elaborazione.  Il controllo degli errori
mentre si sta scrivendo il codice č tanto importante quanto quello
effettuato a run-time.  Anzi, forse di piů.  Il codice, mentre viene
scritto, č per definizione imperfetto, mentre a run-time si presuppone che
segua strade obbligate e controllate (a meno di clamorosi bug).  Mentre si
scrive il codice, č possibile che si salti ad iniziare certe elaborazioni,
senza che tutte le precondizioni indispensabili per esse siano verificate.
 La assert ti aiuta a fermarti prima di spendere giorni in debug.  A
volte, infatti e ad esempio, non č assicurato che i9l tentativo di accesso
alla memoria indirizzata da un puntatore non valido determini un access
violation. Neanche il test sulle postcondizioni č da sottovalutare. 
Assicurarsi che la propria funzione riceva sempre i parametri corretti e
restituisca sempre parametri coerenti, significa rendere il codice piů
robusto, sebbene non necessariamente privo di bug.  Questo vale tanto piů
se si sta modificando del codice e si vuole preservare il suo
funzionamento, controllandolo con unit di test scritte ad hoc.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.delphi
Titolo: lookup

    ciao a tutti, ho una TQuery collegata ad un db mysql, ho creato un cambo 
lookup e nelle griglie alcuni campi risultano agganciati correttamente e 
altri invece visualizzano FALSE, qualcuno ha qualche idea?
Simone 

 correttamente e altri invece visualizzano FALSE, qualcuno ha qualche idea?
Secondo me, serve qualche altra informazioni in più. :-)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Newsgroup: it.comp.lang.delphi
Titolo: Sorgenti

Salve.
Secondo voi esiste un obbligo legale per cui un cliente mi
chiede, con una certa insistenza, i sorgenti del programma che ho fatto?
Da quello che so io, devo solo distribuire l'eseguibile, il BDE, i vari
file di funzione, un manuale e una licenza che dichiara il possesso.
C'è altro secondo voi?
Per me no. Chi vuole gli eseguibili deve pagarli cari... 

chiede, con una certa insistenza, i sorgenti del programma che ho fatto?
Solo se specificato sul contratto.  Se gli hai venduto i sorgenti,
allora hai evidentemente l'obbligo di darglieli, se non gliel'hai
venduti, il software non č suo, ma tuo e lui possiede solo una licenza
d'uso.
Generalmente, cedere i sorgenti equivale a fornire gli ingredienti e
le relative dosi del proprio prodotto, il che fa crescere, e di molto,
il prezzo.

Newsgroup: it.comp.lang.delphi
Titolo: Ultimo passo

Un grosso problema che mi stà terrorizzando ogni notte è :
una volta che ho finito il programma come faccio a compattarlo, a creare un
file autoinstallante, e soprattuto il db BDE funzionarà correttamente???

 file autoinstallante, e soprattuto il db BDE funzionarà correttamente???
http://www.programmando.org/public/web/modules.php?name=News&file=article&si
d=17&mode=&order=0&thold=0
spero ti sia utile :)))
--
Max Etere
massimili...@programmando.org
http://www.programmando.org


Grazie mille, spero di non aver problemi

> Grazie mille, spero di non aver problemi
Io lo suo da un paio di anni con successo... è semplicissimo da usare... poi
ha anche un wizard per la creazione dello script iniziale...
per qualsiasi cosa chiedi pure
--
Max Etere
massimili...@programmando.org
http://www.programmando.org
FoFi Techno 1.2 16V MY96, 3 porte, Jewel Green
FoFo Ambiente 1.8 TDCi 100 CV, 3 porte, Blu Executive

> Grazie mille, spero di non aver problemi
Io lo suo da un paio di anni con successo... è semplicissimo da usare... poi
ha anche un wizard per la creazione dello script iniziale...
per qualsiasi cosa chiedi pure

Newsgroup: it.comp.lang.delphi
Titolo: Programmi installati

Come faccio a sapere se sul computer su cui girerà il mio programma è
installato un certo software, ad esempio Real Player, Quick Time,
Acrobat Reader e simili?
grazie in anticipo
ciao
El Bandolero

per quellie che prevedono ole puoi usare in un try..except la 
CreateOleObject, passando il nome della classe che ti interessa.
Se la funzione va in errore, allora il sw che prevede quella particolare 
classe non è installato.
AS


Dai un occhiata al registry di windows, con la classe TRegistry.
ciao
Newsgroup: it.comp.lang.delphi
Titolo: Passaggio a Delphi 7

Sono passato da poco a Delphi 7 (dalla versione 6) e chiedo se c'è la 
possibilità di portarmi dietro anche componenti di terze parti 
registrati (senza sorgenti) e per i quali i produttori non hanno 
rilasciato l'aggiornamento alla versione 7.
Franco

)

 > rilasciato l'aggiornamento alla versione 7.
Non ho mai creato degli Activex da un componente Delphi, ma sospetto e forse
qualcuno puo' confermarlo, che cmq ci sia bisogno del sorgente. In caso
contrario una strada ci sarebbe.
Ciao Giorgio Padoan

 contrario una strada ci sarebbe.
Da dove sono usciti fuori gli ActiveX? :-)


 Da dove sono usciti fuori gli ActiveX? :-)
Mi spiego, se trasformi il comp. D6 in un activex questo e' utilizzabile
come componente VCL anche in D7... ma ripeto, senza il sorgente e possibile
trasformarlo in Actvivx??
Abbi pazienza.. stavo "filosofando".
Giorgio Padoan
Newsgroup: it.comp.lang.delphi
Titolo: Bloccato

Ho dovuto ricompilare un package di componenti che uso e trovo un errore che 
non riesco a superare. Tra l'altro, non ho cambiato niente a livello di 
Options e, a suo tempo, avevo installato il package senza problemi. L'errore 
è il seguente:
[DCC Error] FullEditC.pas(488): F2039 Could not create output file 
'c:\program files\codegear\rad studio\5.0\Lib\FullEditC.dcu'
Uso Delphi2007 sotto Windows Vista. L'help di Delphi dice che non c'è help 
per DCC... 

 per DCC...
cerca il motivo perchè non può creare il file , forse permessi?

 ha scritto nel messaggio 
news:1td3uo7pl3lru.2...@40tude.net...

Forse. Ma come faccio a saperlo ? 

 ha scritto nel messaggio 
news:1td3uo7pl3lru.2...@40tude.net...

Si tratta di un problema di permessi come tu avevi ipotizzato. In effetti, 
direzionando l'output sul disco D: l'errore non si è ripresentato.
Delphi crea i .dcu nella sottodir ..\lib della dir di installazione (se non 
si è specificamento scelto un altro percorso). Adesso la domanda è: come 
cambio i permessi ? Lavoro con un utente amministratore. Perchè non posso 
scrivere in questa dir ? 

 amministratore. Perchč non posso scrivere in questa dir ?
la dir dei programmi č virtualizzata, in Vista e in 7. Devi
disabilitare l'UAC se vuoi ottenerne l'accesso.
Ale

 posso scrivere in questa dir ?
Hai UAC abilitato? Avere un utente amministratore della macchina, 
soprattutto da Windows Vista in poi, non e` sinonimo che tu possa fare 
arbitrariamente quello che vuoi (anche se puo` aggirare i limiti senza 
problemi)
Enrico


Togli l'impostazione di sola lettura alla cartella di output dei file
*.Dcu.
Gdevil.

 ha scritto nel messaggio 
news:4ca71f52$0$40280$4faf...@reader2.news.tin.it...

Grazie a tutti!
Newsgroup: it.comp.lang.delphi
Titolo: Abbrevia 3.04

 Sto cercando di installare il componente Abbrevia 3.04 su Delphi 7 ma 
ho dei problemi. Ho scaticato il file tpabbrevia.zip da 
torry.net
 e ho 
letto le istruzioni:
1. Unzip the release files into a directory.
-> FATTO!
2. Start Delphi or C++Builder.
-> FATTO!
3. Add the source subdirectory (e.g., d:\abbrevia\source) to the IDE's 
library path.
-> FATTO!
4. Open & compile the runtime package specific to the IDE being used.
-> FATTO! (ho compilato il file B304_r70.dpk)
5. Open & install the designtime package specific to the IDE being used. 
The IDE should notify you the components have been installed.
-> Quě il problema č che ho il file B304_d50.dpk ma non B304_d70.dpk, se 
apro il 5 e lo installo mi chiede se voglio aggiornare la versione ma 
poi mi da un errore; ho provato con B304vr70.dpk, B304vd70.dpk, 
B304cr70.dpk, B304cd70.dpk ma mi dice che non sono "designtime 
package"...
6. Make sure the PATH environmental variable contains the directory in 
which the compiled packages (i.e., BPL or DPL files) were placed.
-> Questa frase non la capisco ma tanto sono fermo al punto precedente...
--- posted by geoForum on 
http://www.delphiedintorni.it

 -> Questa frase non la capisco ma tanto sono fermo al punto precedente...
in winxp risorse del computer-->proprietą-->avanzate-->variabili di ambiente 
in basse c'č una lista seleziona path, tasto modifica, ed aggiungi un punto 
e virgola seguito del percorso nel quale si trova il dpl.
potrebbe essere quello il problema.
ciao. 

grazie per il punto 6, ma sono sempre fermo a quello precedewnte... ciao

Newsgroup: it.comp.lang.delphi
Titolo: Problema con DataSet

Ciao a tutti,
sto creando una stampa in Delphi3 con Quick Report.
Nella form con cui la lancio ho un RadioGroup mediante il quale ho la
possibilità di scegliere tre tipi di diversi di stampa a seconda dei
dati che mi occorrono.
Quindi ho utilizzato un ClientDataSet in cui ho inserito i campi che mi
occorrono e tre componenti TQuery che utilizzo per valorizzare il
DataSet a seconda del tipo di stampa scelto.
Nella procedura BeforePrint del Report vado a valorizzare i campi del
dataset in questo modo nel caso in cui il tipo di stampa è uguale a
zero:
{Apro il dataset}
CDSEstrattoConto.Open;
{valorizzo i parametri della query}
  QyVendite.ParamByName('BADGE').AsInteger :=
FDatiStampaEstrattoConto.Badge;
  QyVendite.ParamByName('DATAINIZIO').AsDateTime :=
FDatiStampaEstrattoConto.DataInizio;
  QyVendite.ParamByName('DATAFINE').AsDateTime :=
FDatiStampaEstrattoConto.DataFine;
{valorizzo i campi del dataset}
  if FDatiStampaEstrattoConto.Operazione = 0 then begin
    QyVendite.Open;
    CDSEstrattoConto.FieldByName('NROPERAZIONE').AsInteger :=
QyVendite.FieldByName('PROGRESSIVO').AsInteger;
    CDSEstrattoConto.FieldByName('DATAORA').AsDateTime :=
QyVendite.FieldByName('DATAINSERIMENTO').AsDateTime;
    CDSEstrattoConto.FieldByName('DARE').AsFloat :=
QyVendite.FieldByName('IMPORTO').AsFloat;
    CDSEstrattoConto.FieldByName('DESCRIZIONE').AsString := ('Vendita')
  end
Quando lancio la stampa però mi viene fuori il seguente messaggio di
errore:
MISSING DATA PROVIDER OR DATA PACKET
Qualche consiglio...?
Grazie mille!
Saluti
Stefano M.

     CDSEstrattoConto.FieldByName('DESCRIZIONE').AsString := ('Vendita')
        QYVENDITE.NEXT
        CDSEstrattoConto.pOST
    END
   end
        CDSEstrattoConto.FIRST;
AS
Newsgroup: it.comp.lang.delphi
Titolo: RunOnce e fratelli

Buongiorno a tutti,
qual č la differenza fra Run, RunOnce, RunOnceEx, RunServices and 
RunServicesOnce ?
Il loro comportamento varia tra Windows 95 (famiglia) e Windows NT 
(famiglia) ?
Ho trovato RunOnce in HKLM, HKCU e HKU\.DEFAULT, quali sono presi in 
considerazione quando un utente si logga oppure quando si preme Escape al 
logon ?
Inoltre, qual č l'ordine di esecuzione di queste chiavi ?  e dei comandi 
all'interno delle chiavi ?
Grazie infinite
	Paolo

 RunServicesOnce ?
Dunque, Run e RunOnce avviano applicazioni.
RunServices e RunServicesOnce avviano servizi.
Se è Once, viene avviato una sola volta dopo il riavvio e, dopo che viene
avviato, viene eliminato/spostato da Once.
Per esempio, quando installi un applicazione, il setup metterà in RunOnce le
istruzioni per registrare le DLL, cosa che windows farà e dopo averlo fatto
cancellerà suddette istruzioni.
RunOnceEx non ho idea di cosa sia ma MSDN dovrebbe spiegarlo (perchè in MSDN
non ci mettono anche le ricette per cucinare? Mancano solo quelle) :-)
Ciao
Bald0z

Buongiorno a tutti,
qual č la differenza fra Run, RunOnce, RunOnceEx, RunServices and 
RunServicesOnce ?


 (famiglia) ?
non penso
Inoltre esistono delle API per aggiungere/rimuovere programmi oppure bisogna
passare direttamente dal registry ?
hai provato nel NG borland.public.delphi.winapi ?
ciaoo
Solid Snake IT
"Nemo mortalium omnibus horis sapit" (Plinio il VECCHIO)

Newsgroup: it.comp.lang.delphi
Titolo: [D7] FSO (File System Object) ...

Ciao a tutti,
mi trovo ad affrontare questo problema:
 * Individuare tutte le unita' (anche mappate) presenti sul pc e riconoscere
quali sono mappate
 * determinare lo spazio libero e occupato di ciascuna unita' individuata
usando VB potrei usare FileSystemObject ... ma siccome mi piacerebbe usare
Delphi, mi chiedevo se vi e' un modo analogo per poter determinare tutte le
caratteristiche del file system.
Grazie
Filippo
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

usando VB potrei usare FileSystemObject ... ma siccome mi piacerebbe usare
direi che la vcl contiene a già delle funzioni specifiche (che
purtroppo al momento non ricordo, dovrei googleggiare, ma lo puoi fare
tu) 
comunque questo soluzione più generica potrebbe esserti più familiare
specie se devi fare dei porting.
uses
  ComObj;
function....
var
  fso: OleVariant;
begin
   fso := CreateOleObject('Scripting.FileSystemObject');
....
end;

Newsgroup: it.comp.lang.delphi
Titolo: Acquisire da scanner

Conoscete componenti free per l'acquisione da twain? D6 professional
possiede componenti utilizzabili allo scopo?
Grazie.
Luciano.

 possiede componenti utilizzabili allo scopo?
free non so, ma Imageen
(
http://www.hicomponents.com/zzdownloads_imageen.asp
) per 59 euro ti da una
suite di componenti anche per l'acquisizione, fotoritocco, scalatura,
elaborazioni anche vettoriali, ecc. - se devi fare un qualche lavoro serio,
spendi 59 euro e fai le cose perbene anziche' raccattare componenti free in
giro per la rete :)
Ciao, Sandro

 ha scritto nel messaggio
news:ann2e5$fdjto$1...@ID-43509.news.dfncis.de...

Grazie, sono d'accordo sul fare le cose perbene.
Luciano

Newsgroup: it.comp.lang.delphi
Titolo: Report via e-mail

Ho la necessità di inviare in automatico un report fatto con Quick Report
via e-mail.
Come posso fare? Avete suggerimenti?
Utilizzo Delphi 6
Ciao e grazie
--
Alessandro
aze...@inwind.it

Utilizzo Delphi 6
cerca su torry (
www.torry.net
) dei componenti che permettono di
stampare generando un pdf. Io sto ho installato PowerPdf, freeware.
 Una volta ottenuto il pdf costruisci un'email e gli alleghi il pdf.
Puoi cercare tra le discussioni di questi giorni ci sono dei thread
che parlano di costruzione ed invio email con allegati, il tutto fatto
da programma.
Morde

 da programma.
il componente PowerPdf...l'avevo già installato...ma posso attraverso questo
componentino
salvare in .pdf un report fatto con quick report?
Se si come fai?
ciao e grazie
Alessandro

salvare in .pdf un report fatto con quick report?
Se intendi crearti i report con quickreport per poi da li' passare al
pdf, allora PowerPdf non credo ti possa venire incontro.
Vai invece su 
www.torry.net/quickreport.htm
 troverai alcuni tools che
fanno l'esportazione in pdf.
Purtroppo nessuno e' free, sono tutti a pagamento.
Ciao
Morde
Newsgroup: it.comp.lang.delphi
Titolo: button array

> Ho una serie di bottoni che agiscono in  modo simile,
cioč?
Gli array di controlli di vb servono non allo sviluppatore, ma a loro per
risparmiare handle.
Infatti, in una form vb non puoi mettere + di 253 controlli.
Se ne vuoi di +, ti tocca usare un array di controlli.
Da qui, un bel select case (case of in delphi/pascal....) per ogni procedura
associata
agli eventi in quanto devi processare l'indice che ricevi come parametro di
ingresso
per sapere quale pulsante č stato premuto.
Sai come viene leggibile il codice!!!!!
nessuno di proibisce di associare una sola procedura al click di + pulsanti.
E avrai SEMPRE come parametro il SENDER di classe TObject su cui puoi fare
un cast a TButton per leggerne le proprieta come il nome per sapere quale
pulsante č stato premuto dall'utente.
BaiBai
A.

 end;
<...>
Associ all'evento OnClick di ogni Bottone questo codice:
procedure TForm1.ButtonClick(Sender: TObject);
begin
   clientsocket1.Socket.SendText((Sender as TButton).Caption +#13+#10);
end;
(Sender as TButton) è un cast di Sender (che è definito come TObject) in
TButton, così puoi leggere la proprietà Caption
Ciao
--
/\/and

 end;
Spiegati meglio... dal codice sembra che tu voglia, quando l'utente
clicca col destro su un bottone... fare cosa? Far scrivere all'utente la
nuova Caption del bottone?
Ora veniamo all'altro tuo problema, che se ho capito bene è quello di
poterti riferire ai bottoni che hai sulla form in modo da avere un
array... in Delphi questo si realizza con le proprietà ComponentCount e
Components[] di una TForm:
var
 i: Integer;
 a: Array [0..2] of String;
begin
// l'array a contiene le caption di tutti i bottoni
 a[0] := 'Bottone1';
 a[1] := 'Bottone2';
 a[2] := 'Bottone3';
// analizza tutti i componenti che ci sono sulla form
for i := 0 to Form1.ComponentCount - 1 do
 begin
// per ogni componente, controlla che sia un TButton
// se lo è, assegna la caption corrispondente alla sua proprietà Tag
(preimpostata)
  if Form1.Components[i] is TButton then
   (Form1.Components[i] as TButton).Caption := a[(Form1.Components[i] as
TButton).Tag];
 end;
La proprietà Tag non serve a niente, per cui possiamo utilizzarla per
"indicizzare" i bottoni.
--
Jax
Newsgroup: it.comp.lang.delphi
Titolo: [Cobol] Indagine sul Cobol.

Salve,
sto considerando l'opportunita' di creare
un newsgroup sul Cobol.
Facendo delle ricerche con google,
ho trovato degli interventi sporadici
anche su questo NG, riguardanti l'argomento.
Se ci fosse ancora qualcuno interessato
a questo linguaggio, ne potremmo discutere
su it.comp.lang, tanto per capire se vale
la pena di continuare in questo progetto,
oppure rinunciarvi.
Se inviate dei nuovi messaggi su it.comp.lang,
indicate il tag [Cobol] nell'Oggetto.
Ciao.
pF

 un newsgroup sul Cobol.
Si capisce dall'impaginazione del messaggio ... :-) :-) Pero' si capiva
meglio se era scritto tutto maiuscolo. :-) :-)

 Pero' si capiva meglio se era scritto tutto maiuscolo. :-) :-)
Ho un leggero mal di gola ! :-)
Ciao.
pF
Pssssssss.
Ma tu sei interessato, o no ??

 un newsgroup sul Cobol.
it.comp.archeologia.cobol? ;)
Ciao, Sandro


Gallina vecchia fa buon brodo :-)
Ciao.
pF

Zortek wrote:

LOL

 Ma tu sei interessato, o no ??
Non particolarmente... considero il Cobol un "male necessario", lo uso
talvolta ma non mi interesserebbe un gruppo dedicato.

Newsgroup: it.comp.lang.delphi
Titolo: dynamic sql error -901 feature is not supported.

Database creato con Firebird 1.5
l'ho copiato in una cartella condivisa di un server su cui ho installato 
i servizi di FB 1.5
Il test di accessibilità (sia con il componente Interbase che con IB 
express) danno esito positivo.
Quando provo ad accedere (aprendo una tabella con l'applicazione o 
collegandomi con IBEXPRESS) mi da l'errore in oggetto.
Ho cercato in giro sulla rete ma non sono riuscito a trovare nulla che mi 
mettesse sulla buona strada.
Qualcuno ha esperienza di questo tipo di situazione?
Grazie per l'attenzione e per l'aiuto.
Massimo
--- posted by geoForum on 
http://www.delphiedintorni.it

Mi sa che qui sono OT... l'ho spostato nel gruppo Interbase.


Newsgroup: it.comp.lang.delphi
Titolo: Consumare webapi asp.net da xe7

 
Ciao.
Mi chiamo Antonio e mi sto avvicinando allo sviluppo software che è sempre stata una passione che non ho mai approfondito.
 
Chiedo quindi se qualcuno su questo gruppo può darmi indicazioni su come scrivere in xe7 quanto scritto qui in c#:
 
http://www.asp.net/web-api/overview/advanced/calling-a-web-api-from-a-net-client
 
 
Ho capito che devo usare TRestClient, TRestRequest e TRestResponse ma non so come passare i riferimenti alle api che sono divisi in parte ta TRestClient e TRestrequest.
 
 
Approfitto anche per una domanda: esiste in xe7 la possibilità di creare delle webapi come in visual studio?
 
 
Grazie.
 
 

 Ho capito che devo usare TRestClient, TRestRequest e TRestResponse ma non so come passare i riferimenti alle api che sono divisi in parte ta TRestClient e TRestrequest.
 
http://docwiki.embarcadero.com/RADStudio/XE8/en/Tutorial:_Using_the_REST_Client_Library_to_Access_REST-based_Web_Services?cid=701G0000001Rryf
Newsgroup: it.comp.lang.delphi
Titolo: immagini

Salve a tutti,
avrei la necessità di memorizzare delle foto in campo di una tabella access.
fin qui tutto ok.
Ho usato il componente dbimage, il quale mi permetto di inseriresolo file
bmp.
Sapete come fargli memorizzare anche immagini di altr formato?
Inoltre io per far vedere la foto in tale campo ho usato loadfromfile..
ecc..
ma non chè modo di far andare in memorizzazione direttamente la foto dopo
che quando faccio la visualizzazione?
Quale comando devo usare per memorizzare un immagine ?
Scusate la mia ignoranza
-- 
Daniele Napoli
s_mu...@tin.it


s_mu...@tin.it
	Ciao
	MassimoB
 
---------------------------
http:\\
www.massimobeschi.it
Newsgroup: it.comp.lang.delphi
Titolo: RXLib ?

cercando la Libreria RXLib con controllo esteso delle DBGrid
su 
www.rxlib.com
 , non trovo niente di inerente , qual'e' il link corretto ?
su questo trovo dei componenti , li conoscete ?
http://www.quasidata.com/dbhdrctrlgrid.html
ciao , Maurizio
Newsgroup: it.comp.lang.delphi
Titolo: Ritardare azione

Salve
E' possibile ritardare l'esecuzione di una azione?
Nel mio caso:
procedure TForm1.BorderPanelMouseEnter(Sender: TObject);
begin
ExpansiblePanel.Width:=Memo1.Width;
end;
Si tratta di un pannello che all'evento MouseEnter assume la dimensione
width del Memo. Chiaramente l'esecuzione č immediata, vorrei ritardare tale
azione, cioč, detto in altri termini, il pannello (nascosto in un lato della
form) dovrebbe aprirsi piů lentamente.
Ho provato ad utilizzare TTimer ma non ci sono riuscito.
Ciao e grazie

 il pannello dovrebbe aprirsi piy lentamente.  
var tmp:integer;
begin
  for tmp:=0 to Memo1.Width do
  begin
    ExpansiblePanel.Width := tmp;
    sleep(5); // valore inversamente proporzionale alla velocita'
    Application.ProcessMessages;
  end;
end;
-- 
I'am what I'am, I do what I can

Newsgroup: it.comp.lang.delphi
Titolo: Come inviare SMS tramite internet

scusate la domandina semplice:
devo aggiungere ad un mio programmino la possibilità di mandare degli SMS di
avviso ad un certo numero di clienti.
Conoscete un sistema semplice e veloce ????
Grazie in anticipo

 Conoscete un sistema semplice e veloce ????
Utilizza un servizio di gateway SMS e TIdHTTP, TIdSMTP o TIdFTP a
seconda del protocollo richiesto.
-- 
I am what I am, I do what I can
Do. Or do not. There is not try.

se interessa l'argomento contattatemi via email e vi potrň dare qualche 
informazione visto che la nostra azienda vende anche pacchetti di sms e 
fornisce la procedura per inviare tramite http o ftp
Simo 

 ftp
Per favore, quota decentemente, posta in risposta al post giusto ed usa
il tag -promo: se devi fare promozione.

Newsgroup: it.comp.lang.delphi
Titolo: Aiuto per copia di una tabella tra due database

Salve, 
ho un problema con dbX e poichè non sono molto pratico vi chiedo già in
anticipo un minimo di comprensione... :-)
Ho una query su una tabella TAB1 su un database DB1 che mi produce un
dataset, quale è il modo più veloce per copiare i dati di questo dataset
(voglio fare un append) su una tabella TAB2 (di struttura identica a
TAB1) su un database DB2 ??
Il tutto utilizzando solo dbExpress.
Tante grazie in anticipo e buon week-end.
l.
-- 
* Chi non ha testa abbia gambe *

 Campo per campo riga per riga.
Il problema č che non mi viene, potresti buttarmi giů due righe?
Ho fatto un po' di esperimenti ma non riesco.
Grazie per la veloce risposta.


posta il codice dei tuoi esperimenti.
Qualcuno del ng ti potrà indicare quali sono le correzioni.
Bye
A

 
hai ragione, il fatto è che ora sono qualche giorno in ferie e non ho il
codice sottomano, cmq provvederò al più presto.
Grazie


 > Qualcuno del ng ti potrà indicare quali sono le correzioni.
Allora ecco qua.. tutto nasce da dover riscrivere ammano una parte di
codice che utilizza TBatchMove (e dunque il BDE) ad una che usa
solamente il dbXpress.
Dunque il codice che ho scritto prevede una classe TBackup (è un
TComponent) che come TBatchMove prende una TQuery (diventata
TSQLQuery) e una TTable (diventata TSimpleDataset) la classe esegue la
query che ritorna un dataset ed è proprio qui che mi blocco:
è giusto usare TSimple
(ho letto infatti che questo è il modo più veloce con dbX per avere
dataset editabili)
In ogni caso io ho un dataset ritornato da una TSQLQuery e vorrei
aggiungerlo ad una tabella (append) di un altro database (ovviamente
il dataset e la tabella hanno la stessa struttura).
Ho delle difficolta a "riempire" il ciclo while...
Query è la TSQLQuery che ritorna un dataset da il primo database.
Destination è il TSimpleDataset connesso al secondo database.
procedure TBkup.ExecuteBackup();
begin
  Query.Open; // esegue la query
  Destination.Active:=true;
  while not Query.Eof do
  begin
     ????
     Query.Next;
  end;
  ???
end;
Come fo a copiare (appendere in realtà) i record del dataset della
query
al TSimpleDataset e poi a salvare  il tutto?
Record per record (e se si come?) oppure visto che voglio aggiungere
tutto
il TDataset ritornato da Query a Destination c'è un altro modo più
efficente?
Scusate se ho fatto un po' di casino e se non mi sono spiegato molto
bene, il fatto è che non conosco in profondità la materia ma devo fare
questo "travaso"...
tante grazie a chi vorrà aiutarmi.
l.
PS:
ovviamente è ben accetta ogni altra soluzione per appendere un
TDataSet ad una tabella e a salvare le modifiche!
Newsgroup: it.comp.lang.delphi
Titolo: Form trasparente....

Scusate ma tempo fa avevo letto in rif.
a come poter rendere la form trasparente
al desktop !
ora ho cercato ma non la trovo, qualcuno
potrebbe riscriverla, grazie 1000
Max

Grazie 1000000 ora provo caso mai ti so dire
nel bene e nel male !!!
Max

Ciao vedo che hai il mio stesso alias !!
Ok ho provato funziona, persň ho provato ad inserire un'animazione GIF
sul desktop č trasparente, ma quando passa su una finestra se la porta
dietro.
Hai qualche suggerimento in merito.
Se ti interesso ti mando l'exe che ho provato cosě ti rendi conto !!
Max

 al desktop !
Subclassala (SetWindowLong) e imposta la flag WS_EX_TRANSPARENT.
Saluti
--
- Carlo -
c.b...@libero.it

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

buongiorno :)
in un server http all'evento
procedure TForm1.httpsCommandGet
ho una prcedura per l'autorizzazione :
 if cb3.Checked and
  ((RequestInfo.AuthUsername <> autu) or (RequestInfo.AuthPassword <> autp))
then
  begin
  authfailed;
  exit;
  end;
--
in cui "autu" e "autp" sono due String  che cambiano all'evento onchange dei
rispettivi edit
autu :=edit4.text;
autp:=edit5.text;
ma settando la password a run time cioe dall'edit non viene accettata (la
user si)  mentre se ne inserisco una a a design time
tutto funsiona.. qualcuno sà perchè?
ciao
erik

re
maaa... io non ci capisco un tubo ora me ne accetta solo alcune altre no!
prima inserivo sempre "pippo"o"pluto" come pass
e difatti continua a non accettarle se metto "prova" l'accetta e anche molte
altre!
forse non gli piacciono i cartoni animati :)
ciao
erik