mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: query: punti interrogativi ????

salve forse vi sembreranno domande sciokke ma ho bisogno di consigli :(
1) ho notato che se utilizzo delle query un pò + complesse o ricche
l'applicazione rallenta, è normale questo o è colpa mia perkè potrei cmq
ottimizzare utilizzando altri metodi?
2) poi non riesco a fare delle join tra + tabelle mi da errore probabilmente
sbaglio la sintassi vorrei fare un outer left o right join tra + tabelle
sto utilizzando i componenti ADO e database Access.
grazie a tutti  : )

grazie a tutti  : )
	Ciao
	MassimoB
 
---------------------------
http:\\
www.massimobeschi.it

controllerò
Diversa versione delle MDAC?
---
vabbè ... mi sa che come al solito mi sono dilungato
troppo ... vado a dormire e spero di non aver scritto
troppe boiate a quest'ora ... :)


molti Join?
Il punto e' tutto li'.
Io ho sviluppato un report dove vengono richiamate query e subquery, una cosa
pazzesca, un report che incrocia i dettagli di 3 domini di dati, la prima
pagina si apre in 7 secondi e ti posso garantire che e' assai veloce dato la
tonnellata di informazioni che deve processare. Eppure al cliente sta bene
cosi', siccome gli processo e incrocio i dettagli dei log delle sue macchine
da produzione, una mole di informazioni al giorno che non avrebbe mai potuto
analizzare con carta e penna.Eppure non ha fiatato, e anzi e' molto contento
perche' lui ha le sue informazioni, io la mia soddisfazione.
Questo per dire che conta molto, ma davvero molto, il modo con cui una query
viene costruita e il modo con cui si analizzano i domini di dati: non a caso
lo studio dei database e dell'sql e' materia universitaria, non a caso
esistono bravi DBA e meno bravi DBA, analisti e tutto quanto ne consegue.
Non a caso io mi sono fatto aiutare da un bravo analista per la preparazione e
ottimizzazione delle mastodontiche query. :-)
Ciao!
-- 
Morde. (
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/
Firefox, il miglior browser: 
http://www.mozilla.org/products/firefox/
Newsgroup: it.comp.lang.delphi
Titolo: adotable1: record non found!

ciao a tutti,
utilizzo la funzione locate per la ricerca ma se non c'è corrispondenza mi
viene generato l'errore 'Adotable1: record not found'
come posso gestire questa eccezione e scrivere un messaggio in italiano??
ciao

 found'
Di solito Locate non dovrebbe generare un'eccezione se non trova il
record, dovrebbe semplicemente ritornare False.
Sei sicuro che l'errore non ti venga generato per qualche altra ragione?
Quando viene interrotta l'esecuzione controlla il tipo di eccezione che
ti viene generata (Exxxxxx) e posta qui :)
--
Jax

On Sun, 20 Oct 2002 14:10:40 GMT, "schumy83" <flys...@NOSPAM.it>
wrote:

Non capisco come faccia la Locate a sollevare un'eccezione simile.
Puoi spiegarti meglio?
Per flussi di operazioni di norma uso un ciclo simile:
   try
      dm1.ADOConnection1.BeginTrans;      
      while not MyTable1.Eof do begin
         .
         .
         .
         .
         if not
(MyTable2.Locate('IdKey1;IdKey2',VarArrayOf([iKey1,sKey2]),[])) then
raise Exception.Create('Errore durante la scrittura.'+#13+#10+'Non ho
trovato il rapporto di reciprocità');
         .
         .
         .
         .
 
      dm1.ADOConnection1.CommitTrans;
   except on e: Exception do begin
         dm1.ADOConnection1.RollbackTrans;
         MessageDlg(E.Message, mtError, [mbOK], 0);      
      end;
   end;
Cioa
Morde

Newsgroup: it.comp.lang.delphi
Titolo: Questa volta ho cercato ma...

Non trovo nessun tool per fare Ottimizzazione mediante algoritmi evolutivi 
multiobiettivo .
Esempio il Lindo, ma c'è qualcosa per il multiobbiettivo?
Vi ringrazio se sapete qualcosa....

"TDK1981"  ha scritto nel messaggio

Forse su
it.scienza.informatica
hai piu' speranze.
Ciao
-- 
ACSH
[D4]
Chi fa da se', fatica il doppio 

 hai piu' speranze.
Oppure su
it.scienza.matematica
In ogni caso:
http://groups.google.it/groups?hl=it&q=multiobiettivo
ci sono gia' diverse risposte alla tua domanda


 ha scritto nel messaggio
news:TbxAe.11054$tX6.2...@twister1.libero.it...

Ciao, e ben tornato!
credo che potresti partire da qui:
http://www.lania.mx/~ccoello/EMOO/EMOObib.html
Ciao, Vittorio

 Vi ringrazio se sapete qualcosa....
Un ultima cosa: metti qualcosa di significativo nell'oggetto, e non "ho
cercato", "aiuto", "non so più come fare", e cose simili. Sono inutili e,
presonalmente, in genere salto questi thread
-- 
Lis                 
www.alessandroghezzi.it
O'Telma Formula1:   
http://snipurl.com/otelma
Spesso tutti sono convinti che una cosa sia impossibile, finché arriva uno
sprovveduto che non lo sa e la realizza... (Albert Einstein)
Newsgroup: it.comp.lang.delphi
Titolo: Tasti rapidi...

ciao, come si fa se il cursore si trova in mezzo ad una procedura per 
spostarsi all'inizio o alla fine della stessa?
grazie. 

 spostarsi all'inizio o alla fine della stessa?
Non sono certo che esista una "scorciatoia" per l'esigenza che hai 
presentato, anche se è possibile usare la combinazione CTRL+SHIFT 
assieme alla freccia in alto, o in basso, per spostarsi tra la 
dichiarazione della procedura (o del metodo) e l'inizio della sua 
implementazione.
Se devi spostarti frequentemente tra due posizioni, sfrutta i Bookmark 
premendo CTRL+SHIFT+n (dove n è un numero da 0 a 9) per impostarli e 
CTRL+n per spostarti immediatamente su uno di essi.
Ciao! :-)
-- 
Marco «Alka» Breveglieri
(marco [@] abls [.] it)
  ABLS Team S.n.c. - Software & Web
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 CTRL+n per spostarti immediatamente su uno di essi.
Questi sono comodissimi, ma non c'č modo di salvarli insieme al progetto,
giusto? Io per ora risolvo mettendo dei numeri nel codice prima di uscire,
cosě alla prima ricompilazione mi si posiziona in quei punti :)
-- 
Lis        
www.alessandroghezzi.it
O'Telma:   
http://snipurl.com/otelma
E' piů facile spezzare un atomo che un pregiudizio (Albert Einstein)

 così alla prima ricompilazione mi si posiziona in quei punti :)
Sinceramente, io li ho sempre visti come forma di "marcatura 
temporanea", pertanto mi sono sempre andati a genio così come sono. :-)
Delphi2005 supporta invece i "bookmark persistenti", mantenendoli anche 
alla chiusura dei singoli file o dell'intero progetto.


 temporanea", pertanto mi sono sempre andati a genio così come sono. :-)
Anche io li uso temporaneamente, ma capita che questo "temporaneo" sia a
cavallo tra la sera e la mattina del giorno dopo :)
-- 
Lis        
www.alessandroghezzi.it
O'Telma:   
http://snipurl.com/otelma
Cartoni animati con un topo? Che idea orribile: terrorizzerà tutte le donne
incinte (Louis B. Mayer)
Newsgroup: it.comp.lang.delphi
Titolo: Matrici Dinamiche (o array bidimensionali dinamici) come volete

problema:
devo gestire una matrice dinamiche di stringhe ma come faccio a sapere le
sue dimensioni? riesco a scoprirne solo una (con l'istruzione high) e per
sapere l'altra dimensione?.
è grave?
--
Davide - 
Gna...@wappi.com
P.S. mi serve per un componente che sto creando che praticamente serve a
generare pagine html se poi a qualcuno interessa chieda pure.

 wrote in message
8f767e$gju$1...@nslave2.tin.it...


Ma dinamiche e bidimensionali non è la stessa cosa.
Anche gli array a una dimensione possono essere dinamici.


sapere l'altra dimensione?.
Dimensioni di cosa? Spiegati meglio e potremo aiutarti!
Ciao
--
- Carlo -
BSSoftware Tips Mailing-List Support

per il messaggio di luigi: matrici=araay bidimensionali dinamici=dinamici.
mi sono spiegato male io.
praticamente ho una matrice si dichiarata:
Tmatrice= array of array of string[255];
poi la passo come parametro in una procedure. esempio:
procedure inizializza(Var Matrice: Tmatrice);
var
  righe, colonne: word;
begin
...
...
ora se io voglio inizializzarla come faccio? ho risolto il problema delle
colonne cosi:
colonne:= High(matrice);
il che funzionerebbe se io avessi un vettore, cosi però riesco a sapere solo
il numero di colonne, ma per le righe come faccio?
e se avessi un cubo invece di una matrice?
essere o non essere?
--
Davide - 
Gna...@wappi.com

per conoscere la prima dimensione scrivi
length(Matrice);
per conoscere la seconda dimensione
length(Matrice[0]);
per conoscere la terza:
length(Matrice[0,0]);
ecc ecc.
Naturalmente funziona de tutti i sottoarray sono grandi uguali.
Ciao !                        {MSX}

e se avessi un cubo invece di una matrice?
Guarda la funzione Length...
Bye


grazie
--
Davide - 
Gna...@wappi.com

 ora se io voglio inizializzarla come faccio? ho risolto il problema delle
Prova a fare cosi:
var
  i,j:integer;
begin
  for i:=low(matrice) to high(matrice) do
    for j:=low(matrice[i]) to high(matrice[i]) do
      matrice[i][j]:='quello che ti pare';
end;
Ruggero

Newsgroup: it.comp.lang.delphi
Titolo: DBNavigator & eventi

nell' evento BeforeAction in un DBNavigator controllo la pressione del 
tasto nbPost e verifico che in  una textbox ci sia un valore, se la 
trovo vuota visualizzo un messaggio all' utente per obbligarlo ad 
inserire un valore nella Textbox, pero' avrei bisogno di inibire l' 
esecuzione legata al tasto nbPost(altrimenti mi ritorna un errore), come 
posso fare ?
Ciao Slurp

Slurp ha scritto:

Utilizza la procedura *Abort*, che permette di generare una "eccezione 
silenziosa", che non produce cioè la visualizzazione del messaggio 
fornita dal gestore predefinito delle eccezioni della VCL.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
     Non hai la possibilità di scaricare Turbo Delphi Explorer?
     Te lo spedisco io!! [
http://www.marco.breveglieri.name/?p=48
]

 
Grazie Marco per la dritta. Ciao Slurp
Newsgroup: it.comp.lang.delphi
Titolo: Errore nel Locate

procedure TMainForm.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
   if Key = #13 then
   begin
     Key := #0;
     DBGrid1.DataSource := DataSource2;
     Table1.Locate('CITTA',VarArrayOf([Edit1.Text]),[loPartialKey]);
   end;
end;
Salve a tutti volevo sapere perchè questa procedura mi da errore.
--------------------------------
Inviato via 
http://usenet.libero.it

Salve a tutti volevo sapere perchè questa procedura mi da errore.
Puoi postare l'errore che ti da ?
Morde

"Invlaid variant operation"
uso delphi 5
e devo effettuare una ricerca. il mio cliente/amico è vicinio a me
Grazie

--------------------------------
Inviato via 
http://usenet.libero.it

Grave!
Molto grave!
Forse tu non hai installato il TIS: Telepat information Server?
Se lo installi non ti serve che ti postino messaggi e/o codici di errore:
sarà il sistema operativo che ti fornira queste indicazioni: basta pensare
intensamente al post di cui vuoi conoscere le informazioni e,
magia! ti si apre una sessione di explorer con una pagina html/xml con tutti
i dettagli che ti servono.
ahahahahahahahah! ;))
A.

uso delphi 5
Prova a cambiare questa riga
Table1.Locate('CITTA',VarArrayOf([Edit1.Text]),[loPartialKey]);
con
Table1.Locate('CITTA',Edit1.Text,[loPartialKey]);
Morde

Forse tu non hai installato il TIS: Telepat information Server?
^__^

Grazie Morde funziona!!!!!!!!!!!!!!!!
Volevo sapere se ti posso inviare un e-mail personale per un problema che
non riesco a risolvere da 4 anni.


io sposterei tutto sul keydown e non assegnerei ad ogni tasto premuto il
datasource della dbgrid.
prova questa:
procedure TMainForm.Edit1KeyDown(...);
var
  s: string;
begin
   if Key = VK_RETURN then begin
     Key := #0;
     s := edit1.text;
     Table1.Locate('CITTA',VarArrayOf([s]),[loPartialKey]);
   end;
end;
A.

non riesco a risolvere da 4 anni.
Ti andrebbe di proporlo sul ng ?
Diversamente, ti contattero' in privato.
Fammi sapere.
Ciao
Morde

Preferire in privato se mi invii la tua e-mail a 
vidi...@hotmail.com
, ti
ringrazio.
fake...@libero.it
 mi č tornata in dietro anche se avevo qualche dubbio
della sua esistenza.


della sua esistenza.
Per motivi di privacy e spamming non pubblico la mia email.
Ti contattero' in privato.
Ciao
Morde
Newsgroup: it.comp.lang.delphi
Titolo: Tabelle

Ciao,
uso delphi 3, ed ho la necessità di conoscere i nomi di tutte le
tabelle presenti in uno specifico db che gli indicherò, ma non ho idea
di come procedere.
Qualche suggerimento?
Grazie

> Qualche suggerimento?
si: fornire qualhe dettaglio in + tipo *quale db", *quale tecnologia di 
accesso ai dati*
A

 A

 > > Qualche suggerimento?
Potresti iterare tutte le tabelle del/dei DataModule
With DataModule1 do
    if ComponentCount>0 then
        for n:=0 to ComponentCount-1
            if Component[n] is TTable then
                if TTable(Component[n].DatabaseName)='MioDatabaseName' then
                    // Memorizzo il nome della Tabella in una TStringList
gia' creata...
                    List.Add(TTable(Component[n].Name));
l'ho scritta al volo, controlla per event. errori
Ciao Giorgio Padoan

 Potresti iterare tutte le tabelle del/dei DataModule
il problema č che il programma "non sa" che tabelle contiene il db a
cui si sta connettendo, deve perň mostrarle all'utente, cosě che esso
possa scegliere quale selezionare per
svuotarla/dropparla/visualizzarla ecc.
Cmq grazie lo stesso, forse sono stato io a non spiegarmi bene.

 Potresti iterare tutte le tabelle del/dei DataModule
il problema č che il programma "non sa" che tabelle contiene il db a


 Potresti iterare tutte le tabelle del/dei DataModule
il problema č che il programma "non sa" che tabelle contiene il db a


Newsgroup: it.comp.lang.delphi
Titolo: Tscrollbox e mousewheel

Mi chiedevo come si può fare per utilizzare la rotellina del mouse su un
oggetto di tipo TscrollBox creato a run-time. Cosa devo impostare?
Grazie a tutti

 ha scritto nel messaggio
news:av1nk9$oji$1...@le.cs.unibo.it...


Newsgroup: it.comp.lang.delphi
Titolo: Componenti per MySql

Sapreste dirmi dove trovare componenti per la connessione e esecuzione di
query per MySql da Delphi?
Grazie.
O.T. : Scusate per questa domanda O.T. ma qualcuno sa dirmi se si può
memorizzare un file di immagine in una tabella di MySql e in quale tipo di
colonna!
Grazie.
--
-------------------------------------------------------------
Software e servizi per le tue esigenze :
 
www.danosoft.it
-------------------------------------------------------------

 colonna!
forse volevi dire tipo....i tipi sono:blob, mediumblob e longblob
rispettivamente con un massimo dati di ~65500 byte, 1.6 MB e 4.2 GB.
P.S.
valuta bene se è conveniente memorizzare immagini nel database (il database
crescerà di parecchio), puoi sempre memorizzare solo il nome in un campo
varchar e poi visualizzare l'immagine con un componente.
Ciao
Gianni Giusti
Newsgroup: it.comp.lang.delphi
Titolo: InterBase 6:Interactive SQL





Quando cerco di copiarmi uno script nell' editor di 
interactive sql del IB6 per poi eseguirlo,non accetta più di 2300 righe 
circa.Come mai?E' un mio errore o è una limitazione dell'IB6?


P.S.:per chi non sapesse cos'è uno script,è un file di 
testo in cui sono contenute istruzioni per la creazione di 
tabelle,procedure,viste,etc...


GRAZIE!!!



 ha 
  scritto nel messaggio 
news:000d01c01cc6$bad50980$050aa8c0@PCFRANCO
...


Quando cerco di copiarmi uno script nell' editor di 
  interactive sql del IB6 per poi eseguirlo,non accetta più di 2300 righe 
  circa.Come mai?E' un mio errore o è una limitazione dell'IB6?


P.S.:per chi non sapesse cos'è uno script,è un file di 
  testo in cui sono contenute istruzioni per la creazione di 
  tabelle,procedure,viste,etc...


GRAZIE!!!


 


Succedeva anche con IB5, anche se non ho mai 
verificato quale fosse il limite. Il mio workaround è stato quello di fare una 
applicazione Delphi con una TQuery che esegue quello che mi serve. Tra l'altro 
mi pare che il DBExplorer non abbia questo problema.


 


Ciao


Andrea



"Franco Di Lorenzo"
| Quando cerco di copiarmi uno script nell' editor di interactive sql del
IB6 per poi eseguirlo,
| non accetta più di 2300 righe circa.Come mai?E' un mio errore o è una
limitazione dell'IB6?
presumo che tu usi IBConsole, e presumo che la limitazione sia proprio di
quest'ultimo
e non del motore in se stesso. Piu' precisamente penso che il problema sia
del memo... (prova a guardare la dimensione del file, scommetto che supera
i 64k, eh?...)
la soluzione? non c'e' l'ho (ma quanta roba hai dentro quello script,
ammazza!),
se non quella di spezzarlo in due o piu' parti ed esguirne uno alla volta.
(ma sicuramente ci saranno soluzioni migliori...)
Inoltre ti ricordo che IB (e anche IBConsole, tra l'altro scritto in Delphi)
sono open source, io lo modificherei in modo che legga direttamente
lo script da file, anzichè caricarlo assurdamente nel memo,
a occhio non sembra una modifica difficile...
Ciao,
Alan Solo

"-=SIMO=-":
| > io lo modificherei in modo che legga direttamente
| >lo script da file, anzichè caricarlo assurdamente nel memo,
| >a occhio non sembra una modifica difficile...
| Questa possibilità è già contemplata da ISQL..basta usarla.. :)
|
| (menu 'File' -> 'Run an ISQL script' )
stai parlando dell' ISQL all'interno dell'IBConsole fornito con IB _6.0_?
La versione in mio possesso nel menu file ha solo Print e close, e c'è solo
la possibilità
di fare il 'Load script' nel memo. Cmq forse saranno uscite nuove versioni,
quell'IBConsole è stata superbaggata fin dall'inizio...;-)
adesso che ci ripenso una soluzione potrebbe essere quella
di usare l'isql.exe contenuto nella dir bin di IB (questa è l'utility,
seppur spartana, 'ufficiale')... basta fare 'isql -input script.sql'
Ciao, :-)
Alan Solo

a occhio non sembra una modifica difficile...
Questa possibilità è già contemplata da ISQL..basta usarla.. :)
(menu 'File' -> 'Run an ISQL script' )
Ciao,
-=SIMO=-
Newsgroup: it.comp.lang.delphi
Titolo: Hub Direct Connect

Vorrei sapere se qualcuno mi sa dire l'indirizzo dell'hub
di 'Delphi Vcl Comunity' di direct connect.
Grazie molte per chi voglia rispondermi.

 di 'Delphi Vcl Comunity' di direct connect.
Cerca su gruppi google, mi pare che la risposta sia già stata data non
troppo tempo fa.
--
- Carlo -

troppo tempo fa.
Infatti ricordavo anche io,una ricerca su google mi ritorna
sven.mine.nu
risposta data il 5 marzo allo stesso scrivente.
-- 
Morde. 
morde[at]programmer[.]net

Newsgroup: it.comp.lang.delphi
Titolo: [ADO Accesso Concorrenziale] Per Fabrizio Mancini

Ciao, innanzitutto grazie per il tutorial che ho prontamente
scaricato e studiato.
Ho provato a lanciare due volte l'applicazione del tuo tutorial
metterne una in edit, e provare a fare l'edit con l'altra istanza.
Ok, funziona. Ma se rilascio il record annullando l'edit sulla prima
istanza, e di nuovo provo a modificare con la  seconda istanza
continua a darmi il messaggio che il record e'
bloccato da un altro utonto e non mi fa fare modifiche.
In realta' il record non e' piu' bloccato....
Risulta anche a te?
Ciao!
WinXP e Access2000

 Risulta anche a te?
ho lo stesso problema
ciao

 Risulta anche a te?
si indago e vi faccio  sapere. da oggi sono in ferie per tutta la setimana.
ciao fabrizio
Newsgroup: it.comp.lang.delphi
Titolo: Report .... aiuto ...

Ciao a tutti,
               fino ad ora ho sempre stampato i record di una tabella in 
modo "artigianale" usando un componente che mi permette di avere una pagina 
virtuale e su quella pagina indicando il le coordinate ed il testo 
costruisco il report.
Questo funziona su un singolo record.
Ora ho aggiunto un campo memo dov'e' possibile salvare una (piu' o meno) 
piccola nota, il rpoblema e' ora quello di stampare anche la nota che molto 
spesso richiede il salto pagina.
Cosi' nella prewiev, adesso, devo vedere due pagine .... ma con il metodo 
"artigianale" non va.
Pensavo di passare a quickreport (incluso nel delphi 6) ma non ho idea da 
che parte iniziare.
Qualche suggerimento & esempi pratici ?
Grazie
Ciao, Daniele 

Qualche suggerimento & esempi pratici ?
Demo, tutorial, faq, ecc:
http://www.qusoft.com/Downloaddoc.html
Tutorials:
http://tinyurl.com/5vhx5
ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

Newsgroup: it.comp.lang.delphi
Titolo: DelphiX per Delphi 5

sono passato da poco da Delphi 3, dove usavo dei componenti DelphiX, a
Delphi 5 e vorrei sapere se DelphiX esiste anche per Delphi 5 e in
caso dove posso trovarlo.
e-mail: 
sab...@libero.it

 caso dove posso trovarlo.
sito ufficiale di Hori:
http://www.yks.ne.jp/~hori/program-e.html
bye
Alan Solo

Newsgroup: it.comp.lang.delphi
Titolo: [BDE]Esportare un applicazione

Ciao a tutti,
Ho sviluppato una piccola applicazione con Delphi 6 appaggiandomi ad un
database tramite il BDE.
Domanda: come faccio a esportarla su altri computer?
Grazie
--
Shinji Ikari
E-Mail : 
neot...@tin.it
UIN: 151270938
IRC chan: #CLOVER
"I'm the worst" - "The End of Evangelion"

> Domanda: come faccio a esportarla su altri computer?
Installarla, non "esportarla"
Devi creare un kit di installazione con installshield express fornito con
delphi.
Bye
AS

Newsgroup: it.comp.lang.delphi
Titolo: problema DBgrid

Sto cercando di imparare a fare un programma per leggere una tabella di un 
database (di tipo MS access)
Ho seguito le indicazioni trovate su un sito:
per prima cosa ho inserito nella form una DBGrid per visualizzare la 
tabella. Poi ho inserito un DataSource e un ADO Table. Ho configurato l'ADO 
Table in modo che mi vada a leggere il mio file di Access, nella proprietą 
TableName ho selezionato la tabella del database che mi interessa, poi ho 
collegato il DataSource all'ADO Table e la DBGrid al DataSource come 
indicato. A questo punto dovrei vedere sulla DBGrid il contenuto della 
tabella estratta dal database, ma niente, la DBGrid resta vuota.
Cosa ho sbagliato? 

scusate
problema risolto
avevo lasciato la proprietą Active dell'ADO Table su false.
Newsgroup: it.comp.lang.delphi
Titolo: Eseguire un file con un'applicazione diversa da quella a lui associata.

Si può pare con la ShellExecute????
Grazie anche x gli aiuti che mi avete dato in precedenza!!!!!!
Devil
Mail Box:
de...@inwind.it

Si può pare con la ShellExecute????
credo di si anche se non ho mai provato.
Magari si può specificando il file (da aprire) come parametro (in modo
corretto ovviamente) del programma che lanci !!
Ma a questo punto devi anche conoscere il nome e percorso del programma che
dovrà lanciare il tuo file.
In alternativa ti puoi un po' complicare la vita ridefinendo l' associazione
attuale !!
Ti saluto.....ciao !!
Antonio Tarolla
BSSoftware Tips Mailing - List Support

 attuale !!
No... direi proprio di no...
Piuttosto mi rivolgerei alla CreateProcess...
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply

Piuttosto mi rivolgerei alla CreateProcess...
mesà che è la più abbordabile.
Ok Andrea, ci si sente.
Ciaoooo !!!!

Newsgroup: it.comp.lang.delphi
Titolo: eseguire applicazioni su pc remoto

Come si può far eseguire da un programma delphi 5 un'applicazione su un 
computer della rete?
Esempio aprire word su un pc remoto.
Grazie 

 Esempio aprire word su un pc remoto.
Con un trojan? :-)
Scherzi a parte (spero) quale potrebbe essere il motivo di questo tipo 
di interazione tra PC e PC? :-|
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 di interazione tra PC e PC? :-|
Infatti voglio dedicarmi alla produzione di Virus   :)
E' strettamente collegato al post di qualche giorno fa...
Devo riuscire a ricevere quante + informazioni possibili su un client senza 
effettuare installazioni e quant'altro.
Quindi ho pensato se dico al client pippo di eseguire il mio software di 
lettura il gioco č fatto.
Grazie
Ciao 

 computer della rete?
http://www.sysinternals.com/Utilities/PsExec.html
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio 
news:44c4d68e$1...@newsgate.x-privat.org...

Eventualmente andrebbe bene anche installare tipo antivirus un programma 
client sui vari pc direttamente dal server
Grazie 

 lettura il gioco è fatto.
Si' ma Pippo come fa ad inviarti le informazioni, dovrebbe creare un file 
log che tu visualizzi da remoto.
Giorgio 

 Giorgio
Esatto!!! Scrive su un db comune o un file log.
Credo che al momento questo per me sia il minore dei problemi  ;)
Ciao
Newsgroup: it.comp.lang.delphi
Titolo: sito sorgenti delphi

mi sapete dire dei siti dove si trovano dei sorgenti delphi già scritti?
finora ho trovato solo 
delphi.programmazione.it
..
ciao
--
Riccardo
www.nicknet.it

 finora ho trovato solo 
delphi.programmazione.it
..
Ti sei impegnato poco.
Con questa query i primi 10 sono ottimi siti, poi quarda tra i link degli
stessi e ne troverai altri.
http://www.google.it/search?sourceid=navclient&hl=it&q=delphi+source+code

http://www.xungame.com
e digita "Delphi" nella ricerca.

Newsgroup: it.comp.lang.delphi
Titolo: Filtrare records

Ciao,
ho un altro tipo di problema con il filtraggio dei records.
Mi spiego meglio:
ho il solito db Access 2000 con ADO.
Dovrei estrapolare dal Campo1 solo determinati dati, ossia:
- tutti i records della Tabella1;
- gli ultimi 30 records;
- alcuni record a scelta ( ad esempio da una data ad una data).
Ho provato con delle query parametriche ma c'è qualcosa che non và.
Avete qualche suggerimento per i tre punti sopra descritti?
Grazie (anche per la pazienza)
:-)

> Ho provato con delle query parametriche ma c'è qualcosa che non và.
Servono maggiori dettagli.
Cosa vuol dire "qualcosa non va"?
Posta le tue query parametriche e, ribadisco: aiutaci ad aiutarti.
Bye
A

 ha scritto nel messaggio
news:bej3fv$2q0i$1...@newsreader1.mclink.it...



Devi inserire '''' perchè chiò che è contenuto nei capi edit deve essere
considerato stringa
   with ADOTable1 do
     begin
       Filtered := False;
       Filter := 'data >=' + '''' + QuotedStr(Edit1.Text) + '''' +
       // Questo per la prima Edit
       and 'data <=' + '''' + QuotedStr(Edit2.Text)+ '''';
       // Per la seconda
       Filtered := True;
     end;
Oppure
       Filter := 'data >='''' + QuotedStr(Edit1.Text) + '''' +
       and 'data <='''' + QuotedStr(Edit2.Text)+ '''';
--------------------------------
Inviato via 
http://usenet.libero.it

>  Filter := 'data >=' + '''' + QuotedStr(Edit1.Text) + '''' +
Mariopiva...... Occhio...... QuotedStr quota già la stringa......
Acqua

 Come posso fare?
Filter := 'data >= ' + QuotedStr(Edit1.Text) + ' and data <=' +
QuotedStr(Edit2.Text);
Acqua

 ha scritto nel messaggio
news:ZzUPa.168238$Ny5.4...@twister2.libero.it...


 tabella?
Non uso Access da una vita ma ricordo che quando volevo che la select mi
ritornasse i primi 5 records dovevo scrivere una cosa del genere "SELECT
TOP 5 [LAST_NAME]
FROM ADDRESS;".
Se non c'è un modo simile per ottenere le ultime 5, ordina in modo
inverso e ti peschi le prime 5.
Acqua
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.delphi
Titolo: Delphi e FastReport

Ciao a tutti,
sto' provando FastReport 4 ma mi sono "incartato" nella stampa di una 
tabella (non da DB) per quanto riguarda i titoli.
Mi spiego... vorrei stampare una tabella come questa:
-------------------------------
|Titolo1 | Titolo 2 | Titolo 3|
-------------------------------
| val1   | val2     | val3    |
-------------------------------
| val4   | val5     | val6    |
-------------------------------
dove val1..val6 sono i valori di riempimento che passo e 
Titolo1..Titolo3 sono i titoli che dovrei passare a runtime ma non so come.
Idee?


allora se è un report fisso 3 colonne e 3 righe
puoi usare le varibili passate da codice prima di visualizzare  il
report o in alternativa una string list che passi come fonte dati.
ciao

 wrote:

ma la stampa è una stampa fissa?
nel senso avrà sempre 3 colonne e 3 righe?
se si puoi usare o delle variabile che passi prima di visualizzare il
report o come db una string list (se vai nella cartella demo di
fastreport ci sono degli esempi)
ciao

No non e' una stampa fissa. E' questo il problema

 No non e' una stampa fissa. E' questo il problema
Allora utilizza una o piu' stringlist come sorgente dati.
Se scarichi il demo di fastereport, all'interno c'e' un esempio di come
usare la stringlist.
Ciao
-- 
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: Utilizzo di ActiveX da Delphi

Ciao a tutti
Una domanda da profano ;)
Come posso utilizzare delle librerie ActiveX dal mio programma Delphi4?
Ad. es. se volessi usare un ADODB.Recordset come posso fare, volendo magari
anche avere l'intellisense?
Grazie a tutti.
Ciao


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

 lato server (ad esempio, in pagine ASP).
Non sono d'accordo :)
Sono gli stessi oggetti usati dai componenti ado di cui sopra (e poi 
sono solo un esempio: potrei voler lavorare con oggetti Ax creati con 
VB), se solo si riuscisse tramite una tlb a evitare il late binding non 
vi sarebbero differenze e potrei continuare a utilizzare l'intellisense.
Ciao

 l'intellisense.
Avevo frainteso le tue vere esigenze. :-)


 Library]...dovrebbe essere quella che fa al caso tuo.
Perfetto, grazie :)
Ci č voluto un po' per capire come usare il .pas generato, ma sembra
funzionare benissimo.
Ciao

Newsgroup: it.comp.lang.delphi
Titolo: dove si legge la posizione dei file lck paradoc

ciao a tutti, dove vengono salvati i file lock (.lck) di paradox???
Simone

 ciao a tutti, dove vengono salvati i file lock (.lck) di paradox???
Dipende dalla configurazione del BDE e/o dagli eventuali parametri che
imposti per il l'oggetto TDatabase della tua applicazione.
In genere si trovano nella Private Directory indicata dall'oggetto
TDatabase. Se questa non č valorizzata, li troverai nella cartella
contenente tutte le tabelle.
Ciao,
Gianluca.

 TDatabase. Se questa non è valorizzata, li troverai nella cartella

Newsgroup: it.comp.lang.delphi
Titolo: search su più files doc

Ciao a tutti,
Dovrei fare un programma che ricerca una stringa , una parola su più files
doc ( e qui sta il problema).
Suggerimenti?
Ringraziando anticipatamente
enrico

 doc ( e qui sta il problema).
se il problema sta nel trovare tutti i file *.DOC di una determinata 
cartella o di tutto il disco, ho sviluppato un componente apposito molto 
semplice che rende disponbili tutti i file e le cartelle contenuti in una 
data cartella e in tutte sue le ramificazioni. Se t'interessa fammelo sapere 
che ti posto il codice qui.
-- 
Mauro Falzari.
"Se guardi nell'abisso, anche l'abisso guarda in te."
(Friedrich Nietzsche)

 che ti posto il codice qui.
grazie Mauro per l'interessamento ma il problema č che devo cercare delle
parole contenute nei vari files doc ( una specie del search del doc esteso
su
piů files)
ciao e grazie  lo stesso
enrico

 su più files)
a tale proposito ti consiglio di guardarti cosa dice la guida di VB per Word 
sull'oggetto Find.
Comunque, in VBA avremmo scritto qualcosa del tipo:
----
Function InternalFind%(AString$)
Dim r As Range
    Set r = ActiveDocument.Content
    While r.Find.Execute(AString)
        r.Bold = True
        InternalFind = InternalFind + 1
    Wend
 
End Function
Sub Test()
    MsgBox InternalFind("ciao")
End Sub
-----
per evidenziare in grassetto tutte le parole da cercare e restituire il 
numero di quelle trovate (nel documento attivo).
In Delphi invece il codice di cui sopra diventerebbe così:
-----
function InternalFind(const Doc: WordDocument; const AString: string): 
Integer;
var
  R: Range;
  v: Variant;
  OV: OleVariant;
begin
  Result:= 0;
  OV:= OleVariant(AString);   //conversione necessaria perchè Find.Execute 
                              //richiede dei parametri OleVariant
  R:= Doc.Content;
  v:= R;
  { LA TECNICA di utilizzare un Variant come 'intermediario' serve per
    evitare di fornire tutti i parametri richiesti, ad es. la riga     	    
    sottostante:
      v.Find.Execute(AString);
    sarebbe dovuta essere, applicando lo stretto controllo sui tipi:
      R.Find.Execute(OV, EmptyParam,EmptyParam,EmptyParam,EmptyParam,
        EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);
    che cmq fuzionerebbe allo stesso modo! }
  while v.Find.Execute(AString) do
  begin
    R.Bold:= Variant(True);     //la proprietà Bold richiede un Variant
    Inc(Result);
  end;
end;
---------
per far funzionare questo esempio puoi piazzare su una form un componente 
TWordApplication (che trovi nella palette Servers) e scrivere qualcosa del 
tipo:
--------
procedure TForm1.FormCreate(Sender: TObject);
begin
  with WordApplication1 do
    ShowMessage(IntToStr(InternalFind(ActiveDocument, 'ciao')));
end;
---------
che funzionerà solo se è aperta un'istanza di Word e c'è un documento 
attivo.


     R.Bold:= Variant(True);     file://la proprietà Bold richiede un


 Grazie mille Mauro
Una riga di risposta e 72 di quoting? Occhio :)
--
Jax
Newsgroup: it.comp.lang.delphi
Titolo: Delphi 3 e/o 4

Salve scusate la domanda, 
ho già Delphi 3 Standard installato sul pc, adesso vorrei installare
anche Delphi 4 Client/Server la domanda è:
se installo D4 posso continuare ad usare D3? 
Il BDE continuerà a funzionare anche con D3?
E le installazioni create con IS per D3 funzioneranno?
ultima domanda: le installazioni create con IS per D4 funzioneranno lo
stesso? Insonna in una: D3 e D4 sono compatibili tra loro sullo stesso
pc?
Grazie in anticipo
Robin


Potresti provare a mettere Delphi 4 in una cartella diversa da quella
dove si trova Delphi 3 ma, francamente non so quanto ti convenga.
Probabilmente D4 oltre a sovrascrivere alcuni file modifica anche le
impostazioni nel registro di configurazione relative a Delphi 3.
Ciao!	:-)

Newsgroup: it.comp.lang.delphi
Titolo: Progress bar durante il download...

salve a tutti,
la mia procedura si aggiorna con un download da sito ftp ed attualmente
faccio visualizzare il solito avi con i foglietti che svolazzano durante il
download. Vorrei poter misurare il tempo che passa tramite una progress bar.
Su cosa imposto il maxvalue ?? [dimensione del file che sto scaricando?] e
come lo testo ??
ciao e grazie

 [dimensione del file che sto scaricando?] e come lo testo ??
Se usi idFTP è facilissimo:
procedure TForm.IdFTPWorkBegin(Sender: TObject;
  AWorkMode: TWorkMode; const AWorkCountMax: Integer);
begin
 ProgressBar1.Position := AWorkCountMax;
end;
procedure TForm1.IdFTP1Work(Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCount: Integer);
begin
 ProgressBar1.Position := AWorkCount;
end;
--
Jax
====
Un bravo artista é destinato ad essere infelice nella vita : ogni volta
che ha fame e apre il suo sacco, vi trova dentro solo perle. (H.Hesse)
Newsgroup: it.comp.lang.delphi
Titolo: Delphi 7 + opendialog

Ciao a tutti!!!Volevo chiedervi se e possibile aprire una cartella e
visualizzare i file all'interno sebbene questa caratella possa avere
delle proprie sotto cartelle. Io ho provato con il componete open
dialog ma non riesco perche mi visulizza le sotto cartelle e non i
file al suo interno...Come posso fare?
Grazie

 ha scritto nel messaggio 
news:8340ea73-22ba-494c...@i29g2000prf.googlegroups.com...

Ciao,
hai impostato i filtri di visualizzazione/apertura?
TuoOpenDialog.Filter:= 'Tutti i file|*.*';
TuoOpenDialog.FilterIndex:= 1;
Ciao

 ha scritto nel messaggionews:8340ea73-22ba-494c...@i29g2000prf.googlegroups.com...

Si io ho messo un filtro per i file xml...però il mio problema e che
non vede i file contenuti nelle sotto cartelle della cartella dove
sono posizionato...non esiste un modo per farlo? anche con un altro
componete?
Grazie

Si io ho messo un filtro per i file xml...però il mio problema e che
non vede i file contenuti nelle sotto cartelle della cartella dove
sono posizionato...non esiste un modo per farlo? anche con un altro
componete?
Cioè vuoi puntare ad una cartella e automaticamente visualizzare anche i 
file delle sottocartelle?
Mmmh... se ci sia un componente che faccia questo non so. Puoi sicuramente 
programmartelo, però devi lavorarci un pochino.
Mi dispiace, modi semplici per fare ciò non ne conosco.
Ciao


Non sono molto esperto però ci provo...se qualcuno poi ha una
soluzione può sempre esprimerla.
Grazie mille!!!



con poche righe di una procedura ricorsiva te la cavi bene...si tratta di
estrarre tutte le foglie che hanno una certa caratteristica (es file xml)
da un albero. Con una semplice ricerca con google dovresti trovare diverse
soluzioni facili da adattare al tuo caso.

 soluzione può sempre esprimerla.
La mia soluzione è che non vedo il senso di fare una cosa del genere: se 
poi ti ritrovi con due file aventi lo stesso nome, ma presenti in due 
directory diverse, come fai a distinguerli? Devi per forza raggrupparli 
successivamente per la sottocartella di appartenenza, cosa che le 
finestre di dialogo comuni di Windows già fanno, presentandoti i file 
così come sono organizzati: in cartelle e sottocartelle.
A che scopo una complicazione di questo tipo?
Quali sono i vantaggi che otterresti (prendendo però in esame gli 
svantaggi elencati sopra, che sono solo alcuni dei tanti, presumo).
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)


Hai ragione marco a pensarci bene e una complicazione che non vale la
pena di affrontare...Utilizzo il dialog normale
Grazie del vostro interesse!
Newsgroup: it.comp.lang.delphi
Titolo: Copia di files

Qualcuno sarebbe cosě gentile da mostrare ad un povero neofita inesperto di
API come trasferire 3 files (per esempio FileA, FileB, FileC) da un percorso
SrcPath a un altro DstPath utilizzando il SHFileOperation o come si
chiama... la mia scarsa esperienza non mi permette di comprendere appieno
l'utilizzo delle API da manuale senza esempi di riferimento! :'(
Poochie

 SrcPath a un altro DstPath utilizzando il SHFileOperation
Per usare "SHFileOperation" bisogna inizializzare una struttura di tipo 
  TSHFileOpStruct con i parametri necessari al fine della buona riuscita 
della chiamata. Solo dopo aver fatto ciò è possibile chiamare la funzione:
procedure TForm1.Button1Click(Sender: TObject);
var
  Shf: TSHFileOpStruct;
begin
  Shf.Wnd := GetDesktopWindow;
  Shf.wFunc := FO_COPY;
  Shf.pFrom := ('C:\mydir\*.*'#0#0);
  Shf.pTo := ('C:\mydir2\');
  Shf.fFlags := FOF_NOCONFIRMMKDIR;
  SHFileOperation(Shf);
end;
Come si legge dalla guida, il campo "wnd" specifica l'handle del dialogo
che da informazioni sullo stato dell'operazione; "wFunc" specifica il 
tipo di operazione da eseguire; "pFrom" specifica i files da copiare e 
nel campo "wTo" vengono specificati i files di destinazione (ma può 
trattarsi anche di una directory); "fFlags" specifica dei flag per la 
modalità di esecuzione dell' operazione richiesta:in questo caso stiamo 
   facendo in modo che non ci vengano richieste conferme in merito alla 
creazione di una nuova cartella.
Se invece vuoi copiare FileA, FileB, FileC, puoi fare così:
var
  Shf: TSHFileOpStruct;
begin
  Shf.Wnd := GetDesktopWindow;
  Shf.wFunc := FO_COPY;
  Shf.pFrom := ('C:\mydir\FileA'#0'C:\mydir\FileB'#0'C:\mydir\FileC'#0#0);
  Shf.pTo := ('C:\mydir2\'#0#0);
  Shf.fFlags := FOF_NOCONFIRMMKDIR;
  SHFileOperation(Shf);
end;
I nomi dei file vanno messi in una lista e separati con il carattere 
nullo; l'ultimo file invece è seguito da due caratteri 'nulli'.

Problema:
[Error] Unit1.pas(28): Undeclared identifier: 'TSHFileOpStruct'
Forse che debba dichiarare qualcosa nelle uses?
Poochie
"Kernel" <ker...@NOSPAMlacosca.org> ha scritto nel messaggio
news:H8XC9.47721$Yw.22...@news2.tin.it...


Forse che debba dichiarare qualcosa nelle uses?
Ti sei risposto da solo...
Morde

 Forse che debba dichiarare qualcosa nelle uses?
Ops...Con tutto quel codice avevo proprio dimenticato di ricordare che 
effettivamente qualcosina in più nelle uses va messa. Per questo non c'è 
problema: per sapere cos'è che manca puoi sempre cercare nella guida 
(per altro proprio nella pagina della funzione) qual'è il file a cui 
fare riferimento. :)
Newsgroup: it.comp.lang.delphi
Titolo: rename

esiste una procedura che mi permetta di modificare tutti i nomi dei file di
una dir specifica troncandone l'inizio?
Esempio in una cartella chiamata prova ho una serie di file:
pippo.doc
pluto.txt
minni.avi
topolino.wav
silvestro.mp3
esiste un modo per rinominare tutti i file di questa dir con qualsiasi
estensione togliendo i primi x caratteri?
se x è 3 il nome dei file deve diventare
po.doc
to.txt
ni.avi
olino.wav
vestro.mp3
cioè tolgiendo le prime 3 lettere ad ognuno (non importa che mi facciate i
controlli sulla lunghezza dei nomi in caso un nome sia minore di 3
caratteri)
come posso fare?
tenete presente ke nn so da dove iniziare quindi sono nelle vostre mani
grazie
ciao

 una dir specifica troncandone l'inizio?
[cut]
Di seguito ti allego copia di una funzione che ti permette di avere la lista
dei nomi dei file conenuti in una directory a seconda di una determinata
mask (es: *.* *.mp3 etc)
Per utilizzarla vedi l'esempio di seguito.
var tmpList:TStringList;
    tmp:integer;
    OldName,NewName:string;
begin
 tmpList:=TStringList.Create;
 try
  ReadFileNames('c:\','*.*',tmpList);
  for tmp:=0 to tmpList.Count -1 do
   begin
    OldName:=ExtractFileName(tmpList.Strings[tmp]);
    // qui modifica NewName togliendo i caratteri che non ti interessano
NewName := etc...
    RenameFile(OldName,'C:\' + NewName);
   end;
 finally
  tmpList.Free;
 end;
 end;
procedure ReadFileNames(Directory,Mask: string;FileList: TStringList);
var
  MaskPtr: PChar;
  Ptr: PChar;
  AttrWord: Word;
  FileInfo: TSearchRec;
const
   Attributes: array[TFileAttr] of Word = (faReadOnly, faHidden, faSysFile,
     faVolumeID, faDirectory, faArchive, 0);
begin
    AttrWord:=DDL_READWRITE;
    Directory:=CheckSlash(Directory);
    ChDir(Directory); { go to the directory we want }
    try
      MaskPtr := PChar(Mask);
      while MaskPtr <> nil do
      begin
        Ptr := StrScan (MaskPtr, ';');
        if Ptr <> nil then
          Ptr^ := #0;
        if FindFirst(MaskPtr, AttrWord, FileInfo) = 0 then
        begin
          repeat
              if FileInfo.Attr and faDirectory <> 0 then
                FileList.Add(Directory + Format('%s',[FileInfo.Name]))
              else
                FileList.Add(Directory + FileInfo.Name);
          until FindNext(FileInfo) <> 0;
          FindClose(FileInfo);
        end;
        if Ptr <> nil then
        begin
          Ptr^ := ';';
          Inc (Ptr);
        end;
        MaskPtr := Ptr;
      end;
    finally
    end;
  end;
Newsgroup: it.comp.lang.delphi
Titolo: Cambio icona EXE

Come si fa a cambiare icona ad un eseguibile tramite del codice?

 Come si fa a cambiare icona ad un eseguibile tramite del codice?
AFAIK non č possibile
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

 AFAIK non č possibile
AFAIK e' possibile.
Devi accedere alle risorse dell'eseguibile e modificarle.
Posto un po' di codice:
    fResourceModule := TPEResourceModule.Create;
    try
      fResourceModule.LoadFromFile(ANomeFile);
      if (fResourceModule is TPEResourceModule) then
        for tmp := 0 to fResourceModule.ResourceCount - 1 do
        begin
          details := fResourceModule.ResourceDetails[tmp];
          if (details is TIconCursorGroupResourceDetails) then
          begin
            grp := TIconCursorGroupResourceDetails(details);
            if grp.ResourceName = 'MAINICON' then
            begin
              if grp.ResourceCount > 0 then
              begin
                Picture := TPicture.Create;
                Picture.LoadFromFile(ANomeIcona);
                grp.ResourceDetails[0].SetImage(Picture);
                fResourceModule.SaveToFile(NewFileName);
                Picture.Free;
              end;
            end;
          end;
        end;
    finally
      fResourceModule.Free;
    end;
Il componente utilizzato e di Colin Wilson 2002 lo sviluppatore di
xananews, cerca con google.
Saluti.
-- 
I'am what I'am, I do what I can

                 fResourceModule.SaveToFile(NewFileName);
e invece vedo che scrivi le nuove risorse direttamente sull'exe :-)



[CUT]
Grazie mille!

Newsgroup: it.comp.lang.delphi
Titolo: www@www.www  TClientSocket, TServerSocket.

 Come faccio ad installare da i TClientSocket, TServerSocket in d7?
Li prendo da D5? Come?
TClientSocket, TServerSocket li conosco bene, vorrei continuare su 
quella strada....
Grazie
AtcBrambo
--- posted by geoForum on 
http://www.delphiedintorni.it

Ho fatto.... Grazie di avere letto il post....
Ciao a tutto il fantastico gruppo ...
Giovanni Brambilla


Newsgroup: it.comp.lang.delphi
Titolo: Campi MEMO in DBGrid ?

Ciao,
Ho risolto i miei problemi con le query, grazie a tutti  per le 
spiegazioni :-)
Adesso vorrei sapere come fare per vedere un campo MEMO in una DBGrid,
non posso 
in qualche modo convertirlo in un altro formato ?  Ovviamente non mi 
interessa vedere 
tutto il memo (anche se non sono dei papiri :-))
La fonte dati della DBGrid e' una Query, e non vorrei agire su quella 
ne' creare tabelle temporanee.
Francesco 
IACT Member
http://Frengo.dragonfire.net/

 wrote in message
odyV1f3lyD6W-pn2-eyVDNLes4gdn@localhost...


 tutto il memo (anche se non sono dei papiri :-))
Si, usci un campo calcolato:
supponiamo che hai un campo memo chiamato: NOTE
crea un campo calcolato chiamato : NOTE_DESCR e dici che è un tipo STRING di
lunghezza 80
a questo punto in OnCalcFields dici:
QueryNOTE_DESCR.Value := Copy(QueryNOTE.AsString,1,80);
Ciao
Solid Snake
Newsgroup: it.comp.lang.delphi
Titolo: MySql e Delphi 7 incompatibili ?

Stò valutando se passare a delphi 7 ma leggo sempre più spesso problemi 
legati alla compatibilità tra delphi 7 e mysql 4.3 avete trovato 
soluzioni magari free per utilizzare l'ambiente delphi appieno con il 
potente mysql ?
Daniele

 potente mysql ?
http://www.zeoslib.net/
Le uso da 3 anni con mysql, mai avuto problemi. A onor del vero č 
testato con mysql 4.2, ma credo che non avrai problemi con la 4.3
Ciao
Gianni

 Gianni
Grazie la provo immediatamente e speriamo mi risolva anche i problemi 
con il quick report e il rave (anche li ho dei grossi 
problemi)!!!!!!!!!!!!!!
Daniele


Come pensavo non me ne va una dritta: o scaricato la versione 6.1.5 
stable poi ho caricato il progetto in delphi 7 o compilato e fatto il 
build ma i bpl che dovrebbero servirmi non li trovo ho seguito le 
indicazioni di install indicate ma niente da fare tu come hai fatto ?
Daniele

 indicazioni di install indicate ma niente da fare tu come hai fatto ?
1) sono andato sotto la cartella in cui ho i packages delle zeoslib. Nel 
mio caso:
C:\Programmi\Borland\Delphi7\Lib\zeoslib\packages\delphi7
Ora arriva il bello..... non mi ricordo l'ordine di compilazione dei 
pakages :-). Se non erro... ZCore.dpk - ZDbc.dpk - ZPlain.dpk - 
ZParseSql.dpk - ZComponent.dpk. Li compili e li installi.
2) Ho aggiunto a mano i percorsi ai sorgenti: menu Tools/enviroments 
options/Linguetta library/
un clik sul primo pulsante [...] "Library path".
Ho aggiunto questi (ovviamente i tuoi possono cambiare):
C:\Programmi\Borland\Delphi7\Lib\zeoslib\src\plain
C:\Programmi\Borland\Delphi7\Lib\zeoslib\src\parsesql
C:\Programmi\Borland\Delphi7\Lib\zeoslib\src\dbc
C:\Programmi\Borland\Delphi7\Lib\zeoslib\src\core
C:\Programmi\Borland\Delphi7\Lib\zeoslib\src\component
....da quello che ho capito, ti manca da fare il punto 2
Ciao
Gianni

Ho guardato la pagina in cui spiega come installarli.
L'ordine di installazione non è quello che ti ho dato io, ma questo:
     * ZCore.bpl
     * ZParseSql.bpl
     * ZPlain.bpl
     * ZDbc.bpl
     * ZComponent.bpl
....a parte questo "piccolo" particolare comunque il resto rimane 
identico. Aggiungi i path nella library e vedrai che funzionano.
Ciao
Gianni

 
No bhe il problema era sui bpl che non capivo come importare installare 
poi ho visto i dpk e ho usato quelli.
E comunque ti ringrazio perchč mi sembra a colpo d'occhio una libreria 
piuttosto potente.
Daniele

 Gianni
No erano i dpk che non avevo capito come usare perchè nell'help della 
libreria dice di usare i bpl che non sapevo cosa farne. Ma poi ho 
risolto grazie cmq.
Daniele
Newsgroup: it.comp.lang.delphi
Titolo: immagini pulsanti

Ciao Ragazzi, qualcuno di voi sa dove posso reperire una bella raccolta di 
immagini adatte ai TSpeedButtons ???...
Max 


Le raccolte di immagini possono essere infinite. Il problema è che dipende
da cosa devi fare o meglio dalle azioni che devono svolgere i tuoi
SpeedButtons nelle applicazioni ciao.
--- posted by geoForum on 
http://www.delphiedintorni.it

 raccolta di immagini adatte ai TSpeedButtons ???...
http://www.virtuallnk.com/
Z.

 ha scritto nel messaggio 
news:6nm5gcF...@mid.individual.net...


 speciale...
Prova a fare una ricerca con "delphi free glyphs".
Per esempio qui ne trovi un po': 
http://www.torry.net/pages.php?id=1527
-- 
Jax