mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Color in ListView

Ciao a tutti,
ho provato di tutto... ma probabilmente non ci arrivo.
Avete presente le ListView... 
Io le metto in modalità "list".. e vorrei che quando seleziono un voce
non mi apparisse il solito evidenziatore in blu ma potessi di volta in
volta dargli un colore diverso.
Ho cercato di simulare un qualcosa trovato per le Grid ma non mi
funzione... forse sbaglio qualcosa....
Avete un'idea
grazie



 
http://makeashorterlink.com/?L33D25BD5
-- 
"La velocità luce non è sufficiente Comandante Nunziatella, 
dobbiamo passare alla velocità smodata!"


Ti ringrazio per la risposta.... mi scuso per non essermi accorto di quel
thread.
Il problema mi resta pero': posso cambiare il colore alle lettere... posso
cambiare il colore allo sfondo delle lettere... ma non ho capito come
cambiare il colore all'evidenziatore "blu" che passa sopra la lista di
opzioni.
Stefano


Non e' piu' facile cambiare la piccola icona che si puo' porre a sinistra
della voce posta in un componente tImageList.
La si controlla con ImageIndex.
Ciao.
--------------------------------
Inviato via 
http://usenet.libero.it

 della voce posta in un componente tImageList.
E' più facile sicuramente, ma il suo problema mi sembra diverso, e molto
interessante. Non ho mai sentito nessuno chiedere o fare qualcosa del
genere...
-- 
Lis
ICQ@Home #7317603sette     ICQ@Work #16285702tre
Mercatino: 
http://lis77.bravepages.com
 (aggiornato *con foto*: 16/06/03)


wrote:

Scusa tu, ho letto di fretta.
Purtroppo, al contrario di TTreeView, TListView fa on "override" del
colore dell'highlight.
Credo sia necessario modificare il metodo CNDrawItem per poter fare
quello di cui hai bisogno.


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

鼢
Salve!
Come faccio a "mettere" il PC in stadby dalla mia applicazione?
Con la ExitWindows[Ex] riesco solo a spegnere, riavviare, ....
Come si fa?
Grazie ancora una volta, ciao.
鼢
DeViL
================================
 E-mail : 
de...@inwind.it
================================
____________________________________
鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢
Principio della perversita' della programmazione:
   "C'e' sempre un altro bug."
鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢

____________________________________
鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢
Principio di Shaw:
   "Fai un programma che anche un idiota puo'
    usare, e soltanto un idiota vorra' usarlo."
鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢鼢


 Grazie ancora una volta, ciao.
www.torry.ru
 sezione tips, System, dovresti trovare il codice

Newsgroup: it.comp.lang.delphi
Titolo: Colore nelle celle di un string grid

Ho cercato di trovare un modo per settare il colore del font sulle
celle di un string grid, ma non sono riuscito a trovare un modo per
limitare l'impostazione a una sola cella, o, al limite, a una intera
riga.
Mi e' sfuggito qualcosa o davvero non si puo? :-(
ciao, Michele

> Mi e' sfuggito qualcosa o davvero non si puo? :-(
Metti defaultdrawing a false e usa l'evento OnDrawCell.
Bye
AS



Thank you very much :-))
ciao, Michele
Newsgroup: it.comp.lang.delphi
Titolo: Uint 64

Avrei bisogno di un tipo Unsigned Int a 64 bit...Lo posso trovare in
delphi??? Ho visto nell'help ma a quanto pare esiste solo una versione
signed a 64 bit intera...
Come posso fare??? E' possibile in qualche modo crearlo???
Ringrazio anticipatamente,
--
Sergio Zaza
http://sourceforge.net/users/vampirsergio/

signed a 64 bit intera...
Oggi revisionando i miei delphi links, ho ritrovato questo:
http://www-rab.larc.nasa.gov/nmp/nmpIndex.htm#LargeIntegers
sono librerie in turbo pascal, non so cosa contengano e se fanno al caso
tuo... dacci un'occhio e fai sapere :-)
Ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 tuo... dacci un'occhio e fai sapere :-)
ok vedo un po' e grazie x il link!!!
Ciao,


Newsgroup: it.comp.lang.delphi
Titolo: scrittura di un help

Ciao!
sono un programmatore poco esperto.
ho scritto un'applicazione freeware e vorrei darle un help decente.
esiste un tool freeware per scrivere files di help a parte usare word?
e se no, qualche sito che spieghi bene come usare word per scrivere i files?
Grazie
Andrea

Dai una occhiata qui....
        Ciao
http://www.interfeb.com/


 wrote in message
crLd7.1119$6T5....@news2.tin.it...

io ho un documento che spiega come formattare il testo tramite Word per
ottenere un file RTF che sarą poi compilato con Help WorkShop fornito anche
con Delphi. Se cerchi in una delle sottodirectory di Delphi, dovresti
trovare il compilatore. ( mi pare che il file sia HCW.EXE o qualcosa del
genere )
Per il documento, se vuoi scrivimi in privato e te lo invio.
Ti saluto....ciao ciao !!
Antonio Tarolla

Newsgroup: it.comp.lang.delphi
Titolo: mkdir su 98 non funziona

Ciao a tutti,
Vorrei una conferma da voi :)
Uso delphi 6, devo creare una cartella es. c\pippo\pluto\ su 2000 e xp tutto
funziona correttamente, ma su 98 non la crea e devo spaccare l'istruzione in
due mkdir, ovvero:
mkdir('c:\pippo\');
mkdir('c:\pippo\pluto');
A voi è già capitato?
Mi sapete dire qualcosa
Grazie a tutti

 mkdir('c:\pippo\pluto');
???
ForceDirectories ('c:\pippo\pluto');
Saluti.
-- 
I'am what I'am, I do what I can


Grazie, non mi era mai capitato il problema, anche per la velocità di
risposta :)
CiaoCiao

 mkdir('c:\pippo\pluto');
Non è un problema di delphi ma della shell dei comandi che utilizza: in 98
c'è ancora il vecchio dos e questa operazione non era permessa, al contrario
di quanto avviene invece da win2k in avanti
-- 
Lis
ICQ@Home #7317603sette     ICQ@Work #16285702tre
Mercatino: 
http://lis77.bravepages.com
 (aggiornato *con foto*: 16/06/03)
Newsgroup: it.comp.lang.delphi
Titolo: Disabilitare autorun

Salve,
ho bisogno di disabilitare momentaneamente da programma l'autorun dei
cdrom.
Come posso fare?
Grazie, Giubbe

 wrote in message
news:b6k63e$ee5$1...@newsreader.mailgate.org...



Grazie, ma mi sono spiegato male.
Io non desidero riavviare il computer per ottenere il risultato.
Mi serve un "qualcosa" che impedisca l'avvio automatico di un
programma quando il mio è in esecuzione.
Io avevo pensato ad una soluzione macchinosa, leggo il file
autorun.inf del cdrom appena inserito, poi cerco il programma in
esecuzione e lo termino.
Hai un'idea migliore?
Grazie, Giubbe

)
BOh.....
--
Morde. 
morde[at]programmer[.]net

Ho provato due soluzioni, la prima funzione "qualche volta". Non
riesco a capire il motivo!
procedure TForm1.WndProc(var Msg: TMessage);
begin
if Msg.Msg = MM_Connect then begin
  Msg.Result := 0;
  showmessage('AutoPlay cancellato')
end
else Inherited;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
 MM_CONNECT:=RegisterWindowMessage(pchar('QueryCancelAutoPlay'));
end;
Il messaggio appare sempre, ma non sempre corrisponde al vero...
Il seguente esempio invece non funziona mai.
...
    Reg.WriteBinaryData('AutoRun',DoAutoRun[AAutoRun],1);
  end
  finally
  Reg.Free;
  end;
Valore:=PChar('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Cdrom\autorun');
  SendMessageTimeout(HWND_BROADCAST, WM_SETTINGCHANGE,
0,longInt(addr(valore)),SMTO_Normal,1000,tr);
  ShowMessage(IntToStr(TR));
 WM_SETTINGCHANGE
dovrebbe notificare il cambiamento del valore del registro, ma non lo
fa.
Qualcuno ha qualcje idea?
Grazie, Giubbe

Newsgroup: it.comp.lang.delphi
Titolo: Editor Icone

Qualcuno conosce un buo editor di icone che gestisca anche la trasparenza?
Grazie

> Qualcuno conosce un buo editor di icone che gestisca anche la trasparenza?
Microangelo... non č freeware perň.
Ciao,
   Luca

 ha scritto nel messaggio
news:i%FT8.89252$j65.2...@twister1.libero.it...


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

Un saluto a tutti.
Ieri sera  ho provato a fare qualcosa con la suite in oggetto.
E ho tozzato...
 
Ho seguito il tutorial che sta qua:
 
http://wiki.remobjects.com/wiki/Using_Classes_with_RemObjects_PascalScript
 
 
ma naturalmente, quando dal mio script tento di usare la mia classe,
ho un errore del tipo" variable not found':
 
a) ho creato l'adapter/plugin della mia classe usando L'unit Importer
 
b) ho messo nella create di un form l'aggiunta del plugin al psstript
 
c) nell'evento OnCompile ho messo
Sender.AddRegisteredPTRVariable('MyVar', 'TMyClass');
 
 
Ma quando arriva all'evento Execute si incazza:
 
PSScript1.SetPointerToData('MyVar', @MyVar,
PSScript1.FindNamedType('TmyClass'));
 
 
C'e' qualcuno qui che usa sto componente?
Grazie per ogni dritta.
 
A.
 

 Grazie per ogni dritta.
 
 
Io non l'ho mai usato, ma qui c'è una mini guida:
http://www.lazaruspascal.it/index.php?page=84
 
 
Magari puoi fare qualche domanda lì nel forum ...
 
Ciao, Mario
Newsgroup: it.comp.lang.delphi
Titolo: AOwner

.. scusate ma nella creazione degli oggetti a cosa serve il parametro
(AOwner:TComponent)?
Sia utilizzando (nil) che (Application) il risultato non cambia.. e quand'č
che si usa (Self)?
grazie ..ciao Raf

 (AOwner:TComponent)?
Sull'help è ben spiegato quanto da te richiesto
Ciao
--
- Carlo -
c.b...@libero.it

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

C'è nessuno che saprebbe come
trovare la formula di conversione
del seguente formato:
mreal = Array[1..4] of byte
datax[32, 252, 13, 147] corrisponde a 290785 (real)
altro esempio:
datax[215, 163, 60, 134]  corrisponde a 47,1600 (real)
Grazie. Dany

mreal = Array[1..4] of byte
I 4 byte a cui ti riferisci molto probabilmente sono quelli dello
standard IEEE 754 per i floating point.
Questo standard e' quello adottato da Delphi ed e' descritto da piu'
parti su internet.
--
Andrea Laforgia
"Nessun linguaggio di programmazione e' perfetto"
                              - Bjarne Stroustrup

Se mi potresti dire da quale parti ti sarei grato!
Dany

>mreal = Array[1..4] of byte
Puoi usare i puntatori e un piccolo trucchetto:
type TQuattro= Array[1..4] of byte;
var source: real;
        dest: TQuattro;
    p1:^Tquattro;
    p2:^real;
begin
source:=4.3;
p2:=@source;
p1:=p2;
dest:=p2^;
end;
Dovrebbe andare anche se non l'ho testata.. se non va perdonatemi, mi sono
appena svegliato e ho dormito pochissimo :))

NON VA!!!

Newsgroup: it.comp.lang.delphi
Titolo: componente filtro per CDS

ciao.
ho qualche problema con il filtraggio dei dati con i clientDataSet,
conoscete qualche componente free che faccia la ricerca ed eventualmente un
esempio.
vi ringrazio dell'attenzione.
ciao e grazie.

 wrote in message
a29vf9$tn7$1...@pegasus.tiscalinet.it...

Non sei stato molto preciso ma provero' ad immedesimarmi
nella tua necessita'. Su un altro post avevo gia' discusso una
cosa simile.
se devi filtrare il campo Nome per tutte le stringhe che
iniziano per 'Lor' fai cosi':
Table1.filtered:=false;
Table1.filter:= QuotedStr('Nome=Lor*');
Table1.filtered:=true;
ho solo un dubbio se la funzione QuotedStr sia scritta proprio
cosi'. Casomai guarda nell'help.
saluti,
airenzo

Newsgroup: it.comp.lang.delphi
Titolo: Oggetti ADO

Ciao a tutti.
Quando voglio inserire un componente ADO, esce il messaggio d'errore
"INTERFACE NOT SUPPORTED".
E' un errore collegato alla versione MDAC installata? Io ho win Xp pro in
ITA e la versione MDAC installata è la 2.7 RTM (2.70.7713.4)! Ho provato a
installare l'ultima versione dal sito microsoft, la MDAC 2.7 RTM
(2.70.9001.0) ma il problema persiste!
Cosa posso fare?
Grazie e ciao
                        Francesco

 (2.70.9001.0) ma il problema persiste!
Se accedi a Db Access prova ad installare il SP3 di Jet 4
Newsgroup: it.comp.lang.delphi
Titolo: firebird embedded

Salve ho notato sul sito di firebird che esistono dei componenti "embedded" 
mi sembra di aver capito che con essi sia possibile accedere al db senza 
dover installare alcun servizio basta semplicemente distribuire il file del 
db, mi confermate o non c'ho capito niente?
grazie.
-- 
 

grazie.
	Ciao
	MassimoB
 
---------------------------------
http://www.massimobeschi.it/
---------------------------------
Se tu pagare come dici tu ...
Io lavorare come dico io ...
Se tu pagare come dico io ...
Io lavorare come dici tu ...
---------------------------------

 č stato scritto giŕ molto a riguardo
ogni tanto mi dimentico di google :-)
ciao e grazie. 



nel package che contiene i file di installazione e la documentazione notes di 
FB, c'è anche un file README_embedded.txt che descrive proprio ciò che 
chiedi: le caratteristiche e le limitazioni di un embedded server, nonchè il 
modo d'uso.
Sostanzialmente, il Windows Embedded Server ha le stesse caratteristiche del 
Superserver, eccetto il supporto multi-utente e la protezione tramite 
password.
L'Embedded Server è il file fbembed.dll, che è grande esattamente quanto un 
floppy.
L'uso è semplicissimo: "Just copy fbembed.dll into the directory with your 
application. Then rename it to either fbclient.dll or gds32.dll depending on 
your database connectivity software." 
Questo perchè alcuni componenti scritti per Interbase si aspettano di trovare 
un file che si chiama gds32.dll
Se vuoi il supporto per i linguaggi internazionali (fbintl.dll) o le UDF, 
devi simulare questi percorsi con sottocartelle dell'applicazione, come se si 
trattassero di sottocartelle del server
  c:\my_app\app.exe
  c:\my_app\fbembed.dll
  c:\my_app\intl\fbintl.dll
  c:\my_app\udf\fbudf.dll
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

   c:\my_app\fbembed.dll
c:\my_app\gds32.dll


 your database connectivity software." 
Aggiungo un'altra cosa: su installazioni "fresche" di sistemi operativi 
Win98, WinME (e parenti), pare che la libreria non funzioni a meno che 
non sia presente anche la libreria <msvcp60.dll>, che a prima vista 
sembrerebbe essere una DLL di runtime di Microsoft C++.
Ciao! :-)
-- 
MARCO «Alka» BREVEGLIERI
   (
http://www.marco.breveglieri.name
)
Leggi le FAQ di ICLD: 
http://icld.altervista.org
Newsgroup: it.comp.lang.delphi
Titolo: SubItem

Come trovo la caption di un subitem di una listview di un item slezionato
all'evento OnClick?
cosí non vá..
ItIndex:=listview1.ItemIndex;
ShowMessage(ListView1.Items.Item[itindex].SubItems[5].Caption);
bye
erik

 ShowMessage(ListView1.Items.Item[itindex].SubItems[5].Caption);
Semplicemente
ShowMessage(ListView1.Items.Item[itindex].SubItems[5])
-- 
Lis
ICQ@Home #7317603sette     ICQ@Work #16285702tre
Mercatino: 
http://lis77.bravepages.com
 (aggiornato *con foto*: 16/06/03)

 ShowMessage(ListView1.Items.Item[itindex].SubItems[5].Caption);
TListItem.SubItems è una TStringList => non ha proprietà Caption.
SubItems[Index] e' gia' una stringa.
Saluti
Paolo Arosio
--
"La dimostrazione dell'esistenza di specie intelligenti nell'universo
 e' che non ci vengono a trovare"

 ShowMessage(ListView1.Items.Item[itindex].SubItems[5])
ciao lis
veramente come dici tu a me non funsiona
ho fatto cosí .. ma preferivo un metodo migliore
// InvPos dá l'ultima ricorrenza e non la prima
s1:=ListView1.Items.Item[itindex].SubItems.DelimitedText;
s2:=copy(s1,InvPos(',',s1)+1,Length(s1));
ciao

 veramente come dici tu a me non funsiona
è vero, scrivendo di fretta ho 'toppato', scusa. Prova con
ShowMessage(ListView1.Items[ItIndex].SubItems[5])


Newsgroup: it.comp.lang.delphi
Titolo: Libreria BPL

Salve, 
ho creato una libreria BPL di prova, adesso vorrei poterla inglobare in
un progetto (.exe) e richiamarlo da una form. La libreria a sua volta ha
delle form che verrebbero visualizzate dopo aver pigiato il bottone
preposto. Come si fa richiamare dinamicamente la bpl da un .exe?
Spero di essere stato chiaro.
Esempio:
Creo un programma con una form ed un bottone. 
Al pigiare del bottone devo richiamare una BPL creata in precedenza che
mi mostra a sua volta la sua form.
Da dove inizio? Dove dichiaro la BPL nel .exe? 
Grazie mille,
  Marco
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:e33ffa08ad06d83c2ad...@mygate.mailgate.org...

http://community.borland.com/article/0,1410,27178,00.html
 č un esempio per
package dinamici
Ciao
Simone
Newsgroup: it.comp.lang.delphi
Titolo: Nascondere finestra "Copia in corso...." di windows

Salve,
ho sviluppato un'applicazione che tra l'altro fà in modo automatico
delle copie di backup del DB, eseguendo tale operazione,
ho necessità di nascondere la finestra "Copia in corso..." di windows.
Qualcuno ha già intrapreso e risolto tale problema,
o semplicemente sà come fare?
ringrazio tutti
sal
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Con che funzione esegui la copia?


        CopyFile(nomeFile, mynomeFile);


         CopyFile(nomeFile, mynomeFile);
Usa la SHFileOperation(), c'è modo di dirle di non visualizzare la
finestra utente.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 o semplicemente sà come fare?
riguarda le api di windows, dai un'occhio alla unit win32, dovrebbero
essere le api di tipologia SHoperation.
-- 
Morde

 o semplicemente sà come fare?
prova la CopyFileEx (le due variabili sono di tipo stringa):
CopyFileEx(PChar(FileOrigine), PChar(FileDestinazione), nil, nil, nil, 0);


grazie
funziona alla grande



grazie
funziona alla grande



grazie lo stesso
ho risolto con SHFileOperation
buon lavoro

Newsgroup: it.comp.lang.delphi
Titolo: <? FACILE>Delay in Delphi ???

Come si può introdurre un ritardo in Delphi di n millisecondi facendo però
in modo che il processore continui ad elaborare i processi in coda?
Mi spiego meglio: io ho già provato ad aggirare il problema in un modo
brutale ovvero ho fatto un ciclo For da 1 a 99000000 che mi tenesse
impegnato il processore per un po' di tempo. Questo è un metodo un po'
schifoso.
Io vorrei che mentre si esegue il ciclo il processore svolga anche gli altri
processi; un po' tipo la procedura Yield in Vb o un po' tipo il Timer sempre
di Vb.
Ho sentito parlare di una Api: la WaitForSingleObject : cos'è e potrebbe
fare al caso mio?

di Vb.
Non ho capito......
In D4 c'č il vcl TTimer che ti permette di eseguire a determinati intervalli
di tempo alcune operazioni.
In +, la classe TApplication ha il metodo ProcessMessages, che non fa altro
che resitituire temporaneamente il controllo al sistema operativo per
processare eventuali messaggi in coda.
Uso tipico, refresh di schermo.
Infine, cosa da non trascurare, ci sono i Thread.
Se mandi un post con maggiori indicazioni potremmo aiutarti a capire quale č
la soluzione ottimale per il tuo problema.

io una volta avevo scritto una procedura del genere non è difficile comunque
c'è anche un componente chiamato timer.....


io uso Sleep(tempo in MS)
Funge bene
poi dipende da cosa vuoi fare :D
--------------------------------------------------
Brayan Fix Kirys Solfory
E-Mail: 
Ki...@technologist.com
 
For Free Software go to: 
http://Kiryssoft.cjb.net

 in modo che il processore continui ad elaborare i processi in coda?
Ciao.
Da un vecchio tip :
procedure Delay(msecs:integer);
var
   FirstTickCount:longint;
begin
     FirstTickCount:=GetTickCount;
     repeat
           Application.ProcessMessages; {allowing access to other controls,
etc.}
     until ((GetTickCount-FirstTickCount) >= Longint(msecs));
end;
Questa penso sia la varsione + "pulita" per aspettare __all'interno di una
procedura/evento__ tot millisecondi.
Se invece devi eseguire operazioni nel tempo, allora ti consiglio i timer
(TTimer, system palette).
Ciao!!!        Davide DG

Ringrazio tutti i ragazzi che mi hanno risposto; soprattutto Davide DG: la
tua procedura funge alla perfecSCION.
Grazie ancora.
A risentirci.
Newsgroup: it.comp.lang.delphi
Titolo: BlackFishSQL dataset read only e problema delle chiavi primarie

Facendo esperimenti con BlackFishSQL non riesco a scrivere sul databsae. 
Quando cerco di scrivere (faccio una chiamata ad Append()) mi lancia 
un'eccezione dicendo che il dataset e' in modalita' read only eppure il 
parametro 'readonlydb' e' false.
Lo stesso DB, quando scrivo da Database explorer funziona.....
Qualche idea ?
Inoltre non riesco a qualificare i campi come chiavi primarie. Quando da 
database explorer salvo una tabella mi toglie il check di "primary key"
dalla row scelta ho letto c'era qualche problema, ma dovrebbe essere 
stato risolto dall'update di dicembre.
Qualche idea ?
Grazie per l'aiuto
Ing Giuseppe Monteleone

 Qualche idea ?
idee no, ma una considerazione si...
A che pro impegolarsi su un db con quale su cose basilari ti stai
bloccando quando esistono
fior di database agratis usati a livello planetario senza troppi
problemi?
A.

 quanto meno la tecnologia di accesso ai dati.....
Presumo che sarà *dbExpress*, più che altro perché non vedrei altri 
"connettori" affidabili per questo database, al momento.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 A.
Mi fai qualche esempio ? Stavo giusto imparando "BlackFishSQL + 
dbExpress4" perche' mi sembra la soluzioen piu' veloce ed economica per 
molte applicazioni.
Ho letto in giro (ma potrei sbagliarmi) che in CodeGear stanno 
costruendo un layer software che permtta di sostituire il BDE con un 
BDE-like basato su BackFish.
Ho letto anche di firebird ma putroppo non ho ancora trovato dei driver 
DB4 che funzionano, visto che i driver Interbase non funzionano piu' :-(
Grazie.
Ing Giuseppe Monteleone

 DB4 che funzionano, visto che i driver Interbase non funzionano piu' :-(
xche spendere un fottio di euro x le licenze di blackfish
e non una manciata di euro x cio che riguarda i driver dbx per
firebird della corelab
abbondantemente citati in questo ng?
A parte cio, se devo spendere soldi x comprare licenze database non li
spendo x blackfish.
Capisco che fa comodo un database che non richiede troppa
manutenzione, ma tra
un prodotto uscito ieri a zero manutenzione e uno con pochissima
manutenzione esistente da un pezzo
sceglierei il secondo. x esempio, tra blackfish e interbase credo che
sceglierei interbase.
Va cmq detto che la v9 di db2 prevede tutta una serie di automatismi
che "dovrebbero" ridurre notevolmente
le attivita di manutenzione,  e db2 è un bel database.
A.
Newsgroup: it.comp.lang.delphi
Titolo: ITDevCon: novità?

Qualcuno ci è andato? novità? Qualcosa di significativo dopo il delphi day?
-- 
morde
QT 4.7
Delphi (5,6,7.. expired)
Firebird Database
 

 Qualcuno ci è andato? novità? Qualcosa di significativo dopo il delphi day?
 
Io ci sono andato, e il mio feedback è positivo su tutta la linea.
 
Non aggiungo altro perché tutti i dettagli li sto già scrivendo in forma 
(troppo) estesa in un documento che pubblicherò a breve.
 
Ciao!
   Marco.
 
-- 
MARCO BREVEGLIERI
#Home: 
http://www.marco.breveglieri.name
 
#Blog: 
http://www.compilaquindiva.net
 

 (troppo) estesa in un documento che pubblicherò a breve.
 
Grazie Marco
ciao!


Newsgroup: it.comp.lang.delphi
Titolo: Clipboard di windows

Mi è stato chiesto di fare una modifica al software che ho fatto.
Praticamente mi chiedono di dare la possibilità all'utilizzatore del
programma di copiare un'immagine da un programma (come potrebbe essere
photoshop) nella clipboard di windows e poi di riuscire ad incollarla
(tramite un comunissimo bottone) all'interno del mio programma dentro ad un
oggetto TImage.
Come posso fare?
Davide

 Come posso fare?
Leggendo il manuale?
uses ClipBrd;
procedure TForm1.Button1Click(Sender: TObject);
var
  Bitmap: TBitmap;
begin
 if Clipboard.HasFormat(CF_BITMAP) then
 begin
   Image1.Picture.Bitmap.Assign(Clipboard);
 end;
end;
-- 
I'am what I'am, I do what I can

Newsgroup: it.comp.lang.delphi
Titolo: Variabili condivise

La situazione e' questa:
Unit1 contenente la mainform, questa include con la clausola USES,
Unit2 e Unit3.
Dove posso dichiarare variabili e strutture dati che siano visibili nei
corpi di tutte e 3 le Unit?
Grazie, Andrea


wrote:

Potresti, per esemio, usare una quarta unit nella cui interface
dichiari tutte tue strutture. 

In genere, si cerca di evitare l'uso di variabili globali.
Ti servono proprio?
Cosa devi realizzare?
magari esistono soluzioni alternative...
Bye
AS

Massimo Pini

Inoltre, se si vuole mantenere un minimo di controllabilita' del codice
(e di approccio OO), si puo' pensare di fare in modo che le variabili
diventino proprieta' di un oggetto, eventualmente ad istanza singola,
che offre gli opportuni metodi di accesso in lettura e scrittura.
Un esempiello si trova nella unit Printers (adesso hanno cambiato
implementazione, se non sbaglio, ma prima) Printer era una var di tipo
TPrinter dichiarata nella interface.
Saluti
Paolo Arosio
unit uMySharedObj;
interface
uses SysUtils, Classes, ...;
type
  TMySharedObj = class (TObject)
  private
  public
    constructor Create({lista parametri inizializzazione})
    destructor Destroy; override;
    property ...
  end;
var
  MySingleSharedObject: TMySharedObj;
implementation
constructor TMySharedObj.Create();
begin
  if Assigned(MySingleSharedObject) then
    raise Exception.Create('Gia'' esisto');
  ...
end;
...
initialization
  MySingleSharedObject.Create(...);
finalization
  MySingleSharedObject.Free;
end;
Newsgroup: it.comp.lang.delphi
Titolo: usare "Trova: Tutti i file" di win9x con prog. Delphi

Mi piacerebbe utilizzare la finestra di win9X "Trova: Tutti i file" come
server, da un programma Delphi
con la possibilità d'impostare Nome:, Testo contenuto:, Cerca in:, ecc.
memorizzando il risultato della ricerca in un file o in memoria per
successive elaborazioni
ma non so da dove cominciare
qualcuno può darmi qualche dritta?
Grazie!
Dodo

C'è un vcl che fat 'sta cosa.
Vedi su 
www.torry.ru
.
Se non lo trovi scrivimi in privato e vedo di inviartelo.
Saluti
AS
"Se è Microsoft non funziona"


Troppa grazia Sant'Antonio
ho fatto come mi hai detto
adesso devo solo vedere qualche decina di programmi
per trovare quello piů adatto al mio scopo
grazie!
Dodo
Newsgroup: it.comp.lang.delphi
Titolo: OnShortCut su tutta l'applicazione

Ciao a tutti scusate la lunga assenza ma in questo periodo sono veramente
sommerso dal lavoro..
Veniamo al dunque:
Come faccio a intercettare la pressione di una shortcut all'interno di TUTTA
l'applicazione?
Ad esempio CTRL+SHIFT+ALT+F6 su qualunque form io mi trovi?
Ho tentato utlizzando il componente TApplicationEvent e il suo gestore di
evento OnShortCut e riesco ad acchiappare la chiave premuta (nel caso sopra F6)
ma non riesco proprio a capire come intercettare lo shift o l'ALt o il Ctrl (in
pratica i valori che sono contenuti nell'array Shiftsate passato dall'evento
OnKeyDown).
Ho provato anche a gestire l'evento OnKeyDown della form principale ma perdo la
visibilità non appena mi posiziono con il fuoco su di un'altra form.
Grazie in anticipo e ciao a tutti.
-- 
Posted from  [213.82.192.70] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

"David Marcucci"  ha scritto nel messaggio
| Come faccio a intercettare la pressione di una shortcut all'interno di
TUTTA
| l'applicazione?
| Ad esempio CTRL+SHIFT+ALT+F6 su qualunque form io mi trovi?
Prova cosi':
 // nella dichiarazione della form
 // dichiaro il gestore d'evento per le hotkey
 private
    { Private declarations }
    Procedure WMHotkey( Var msg: TWMHotkey );
      message WM_HOTKEY;
// al momento della creazione della form
// registro l'HotKey
procedure TForm1.FormCreate(Sender: TObject);
begin
 If not RegisterHotkey
   (Handle, 1, MOD_CONTROL or MOD_ALT or MOD_SHIFT, VK_F6) Then
    ShowMessage('Errore.');
end;
//al momento della chiusura della form lo elimino
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
 UnRegisterHotkey( Handle, 1 );
end;
// gestisco l'evento scatenato dall'hotkey
procedure TForm1.WMHotkey(var msg: TWMHotkey);
begin
 If msg.hotkey = 1 Then Begin
      ShowMessage('Funziona!');
     end;
end;
Una nota: quattro dita per una shortcut non sono troppe?  :-)
--
Ciao.
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio

Grazie adesso provo, avevo trovato una soluzione alternativa ma bruttina,
cioč creare una funzione su una unit dichiarata nella uses di tutte le form,
a cui puntano tutte le formkeydown di tutte le form passando la key e lo
shiftstate.
Le 4 dita per la shortcut sono giuste in questo caso, il tuo dubbio č piů
che lecito, ma la funzione a cui si fa riferimento č una funzione
nascosta..;-)
ciao

Ok ho usato la RegisterHotKey "controllicchiando" anche l' help delle apine
ma perchè devo mettere
MOD_CONTROL or MOD_ALT or MOD_SHIFT e non
MOD_CONROL and MOD_ALT and MOD_SHIFT ????
Sarò duro, ma non sono riuscito a capire...
Newsgroup: it.comp.lang.delphi
Titolo: Delphi 6 Personal e tab "Data Access"

Ho Delphi 6.0 Personal (la versione gratuita scaricabile da Borland).
Sto seguendo i tutorial del libro "Teach Yourself Delphi 4 in 21 Days"
ma nella barra dei componenti non trovo il tab "Data Access".
Dove sto sbagliando?
Grazie

Semplicemente, non ci sono nella versione personal (non a caso e' gratuita
:) )
Ciao, Sandro

Ciao, Sandro
Che triste notizia. Avevo riposto grandi aspettative
in questa versione.
Ciao e grazie

 wrote in message
news:fauftu8ctbvrb787l...@4ax.com...

Cerca sul newsgroup ed in internet, ci sono molti componenti che permettono
di ovviare a detto problema. Su Linux & C. (
www.oltrelinux.com
) di alcuni
mesi fa puoi trovare alcuni articoli su come far andare Kylix 2 con
componenti Open Source  anche per l'accesso a DB (quasi le stesse cose le
puoi fare con Delphi Personal).
Saluti

di ovviare a detto problema. 
Sono andato su Torry.net, ma non so preciso dove cercare.
grazie
Ciao

 wrote in message
news:09fituce5nt0de7dh...@4ax.com...

http://sourceforge.net/projects/freeclx/


http://sourceforge.net/projects/freeclx/
Grazie sei una persona gentilissima.
Ciao

Newsgroup: it.comp.lang.delphi
Titolo: [RISPOSTA IN RITARDO]Passare parametri a prog avviato

Ciao, scusa I/O ma ho trovato solo adesso un minuto...
allora... questo metodo mi è stato suggerito da LaForgia qualche tempo fa...
Supponiamo di avere 2 applicazioni :
A : che deve mandare una notifica (messaggio) all'applicazione B
B : aspetta questo messaggio e quando arriva fa qualcosa
codice dell'applicazione A
premesso
    IDMessaggio: UINT;
procedure TForm1.FormCreate(Sender: TObject);
begin
  IDMessaggio := RegisterWindowMessage('UNMESSAGGIO');
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  PostMessage(HWND_BROADCAST, IDMessaggio, 0, 0);
end;
codice dell'applicazione B
sempre premesso
    IDMessaggio: UINT;
procedure TForm2.FormCreate(Sender: TObject);
begin
  IDMessaggio := RegisterWindowMessage('UNMESSAGGIO');
end;
procedure TForm2.ApplicationEvents1Message(var Msg: tagMSG; var Handled:
Boolean);
begin
  if (Msg.Message = IDMessaggio) then
  begin
        < FAI QUALCOSA >
    Handled := true;
  end
end;
Scusa ancora l'enorme ritardo. Ciaoux

   PostMessage(HWND_BROADCAST, IDMessaggio, 0, 0);
Sostituirei, ove possibile (soprattutto se le due applicazioni si scambiano
un volume non indifferente di messaggi), quell' HWND_BROADCAST con il vero
Handle della finestra; in questo modo il mittente recapiterà il messaggio
solo alla message-queue del thread realmente interessato (quello che ha
generato la finestra) e non a *tutte* le code. In alternativa si può usare
direttamente PostThreadMessage() a patto di conoscere il thread id
interessato.
--
- Carlo -
"Imparare senza riflettere o riflettere senza imparare non vi porta alla
buona comprensione" Confucio
Newsgroup: it.comp.lang.delphi
Titolo: Libreria  OpenGL

 Salve ragazzi , siccome ho sentito parlare della libreria OpenGL che 
permetterebbe anche in Delphi di creare applicazioni 3d , sapreste dirmi 
dove potrei trovarla? Bisogna installarla? Sapete se e' molto complessa 
come istruzioni? Grazie mille ciao a tutti.
--- posted by geoForum on 
http://www.delphiedintorni.it

La libreria è installata già nei winxp ( e se non ricordo male anche
win2000), se hai bisogno di maggiori informazioni le puoi trovare su :
http://www.opengl.org/
e qui puoi trovare dei componenti opensource per delphi ed OpenGl
http://glscene.sourceforge.net/wikka/HomePage
Non posso aiutarti di più perchè non l'ho mai usata... ;-))
Ciao.
Cristiano.

Cristiano


Newsgroup: it.comp.lang.delphi
Titolo: Limitare un prg ad una sola sessione

Come da subject,
vorrei che il mio prg non si avviasse con piů di una sessione,
in VB facevo cosě:
if App.PrevIstance........
e in Delphi?
(scusate la domanda che forse č stat fatta decine di volte)
Grazie
Robin

 vorrei che il mio prg non si avviasse con più di una sessione,
io l'ho risolto creando un mutex all'avvio del programma dopo averne
testato la presenza: se lo trovo gia', sparo fuori la seconda
sessione... se vuoi informazioni piu' precise, domattina posso
controllare in ufficio il codice e postartelo
ciao
Alex F.
randall...@yahoo.com
Sent via Deja.com
http://www.deja.com/

 controllare in ufficio il codice e postartelo
eccolo, l'ho trovato:
-----------------------------------------------------------------
uses Windows;
...
procedure p_WaitProcess();
var
  ls_as_mutex : String;
  li_errore   : LongWord;
  lv_handle   : HWND;
begin
// tento di creare un mutex con un nome simbolico
     as_mutex  := "esempio"
     lv_handle := CreateMutex(NIL, false,PChar(as_mutex));
     li_errore := GetLastError;
     CloseHandle(lv_handle);
// verifico l'errore: il processo esiste gia'
     if li_errore = ERROR_ALREADY_EXISTS then
     begin
// il mutex esiste gia': devo uscire
     end
     else
     begin
// nessun mutex: continuo
     end;
end;
------------------------------------------------------------


Newsgroup: it.comp.lang.delphi
Titolo: come faccio? nuovi componenti

ciao scusate, ma se devo aggiungere nuovi componenti che scarico da internet
a delphi,
Come devo fare?
come faccio ad installarli?
c'č qualche esempio da guardare o guida sul web?
Grazie

 ha scritto nel messaggio
news:aPrRa.12320$sj6.2...@tornado.fastwebnet.it...

Per istallare nuovi componenti ci sono soluzioni diverse,
tipo compilare o istallare il .dpk oppure il .dpc
ci sono alcuni compoenti che hanno un loro setup.
Di solito nei componenti che scarichi te lo dicono come istallarli.
se ci dici che problema hai nel dettaglio magari possiamo aiutarti
ciao
gabriele


    Via De Gasperi, 14 - 42019
    Scandiano (Reggio Emilia)
Newsgroup: it.comp.lang.delphi
Titolo: Installazione componenti

Come sti installa un componente in Delphi 2 DeskTop?
Precisamente vorrei installare HTML generator di Gnaffy.
Grazie.
--
Luigi Cartelli

Presente !
c'è un help allegato al componente, non l'hai letto?
comunque basta copiarlo nella directory dove metti i componenti, poi avvii
il file .DPK, ed infine quando si è aperto delphi 5 e si apre un finestra,
premi il tasto install. ed è fatto, ti trovi il componente sulla palette
(tab gnaffy).
ciao ciao
--
Ciao Ciao.
Davide - 
Gna...@wappi.com

Quali file devo copiare nella directory?
Io delphi 2 non il 5 e non trovo il file .dpk
Luigi Cartelli
--
Posted from [195.223.215.6] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

> Io delphi 2 non il 5 e non trovo il file .dpk
devi usare per forza delphi 5, il componente utilizza array diamici.


> Io delphi 2 non il 5 e non trovo il file .dpk
devi usare per forza delphi 5, il componente utilizza array diamici.
c'è anche scritto che è per delphi 5.




 wrote in message
8gesf8$gvp$1...@nslave1.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: Problemi con TGifImage

Ho installato  TGIFImage v.2.2 come componente, in modo anche in design time
possa caricare gif in TImage. Problema fastidioso: quando lo faccio va
benissimo con gif statiche, ma con una gif animata da me creata (supportata
dal compoente) fa bloccare delphi che inizia ad usare il 100% della cpu e mi
costringe a terminarlo brutalmente...
qualche consiglio?
Grazie, Poochie

 qualche consiglio?
si, 2:
1) prova con altre gif animate (non create da te)
2) scrivi all'autore del componente e segnala il problema
Ciao, Sandro

 wrote in message
news:bqujjs$25s7m5$1...@ID-43509.news.uni-berlin.de...

Nella furia ho rimosso il componente... installando il pacchetto completo
delle Jedi ho visto che le loro funzionano, ma sono riesco a far partire
l'animazione e non ho trovato alcun help sulla rete o nell'help in linea su
TJvGIFImage.
Poochie

 TJvGIFImage.
Usa TJvGIFAnimator che trovi nella palette Jvx Controls.
Setta JvxAnimate a True.
Newsgroup: it.comp.lang.delphi
Titolo: D2005 indice ListBox su WebForm

quando una voce del ListBox cambia riesco ad intercettare
la sua Descrizione con
ListBox1.SelectedValue; ma non il valore dell'Indice con
ListBox1.SelectedIndex che ritorna sempre 0 ; (valore piu' basso)
o con ListBox1.SelectedItem.Value che ritorna String; 

Maurizio ha scritto:

Sei sicuro che venga eseguito un "postback" quando selezioni un nuovo 
elemento dalla *ListBox*?
Verifica che la proprietà /AutoPostBack/ sia impostata a True e poi 
dimmi se hai risolto. :)
Ciao,
   Marco.
-- 
Marco «Alka» Breveglieri	
http://www.marco.breveglieri.name
  «bvmcnxsjlkhròhyeq, potrei scrivere a questo punto,
   se mi addormentassi sui tasti» (Daniele Luttazzi)

> elemento dalla *ListBox*?
si era disabilitato :-(  ; avevo provato ad abilitare AutoPostBack in
modo manuale al click su un RadioButton che rende visibile la ListBox
questo perche non riesco a scatenare un'Evento che non sia
ListBox1_SelectedIndexChanged(sender: System.Object; e: System.EventArgs);
che ha il difetto che se si torna sulla pagina e' si clicca la stessa voce, 
non
si ha cambio di Indice e non scatta l'Evento .... SelectedIndexChanged.
anche se prima di fare Response.Redirect, setto ListBox1.SelectedIndex:=-1;
con AutoPostBack:=True , l'indice non si sposta.
ciao Maurizio 

 con AutoPostBack:=True , l'indice non si sposta.
Ahem...scusa ma mi sono perso completamente. :-)
Hai risolto il problema? In caso contrario, dimmi cosa vorresti ottenere 
così ti spiego come lo implementerei e vediamo dove può essere l'errore, 
se c'è...


> se c'č...
ListBox1.SelectedIndex e' risolto;
Cio' che vorrei e' :
- intercettare il click su una voce del ListBox anche quando non si cambia 
voce;
- oppure creare un'evento lato client che intercetti il click su ListBox
comportamento Lato server da risolvere
- AutoPostBack=True si intercetta l'evento SelectedIndexChanged scatta solo
  se si clicca una voce diversa dell'indice;
- se eseguo il redirect ad una pagina web ; response.redirect(..) , e sposto
  l'indice a -1 il Server esegue il redirect e non cambia indice
es: ListBox con
Voce1
Voce2
Voce3
click su Voce1 , quindi l'Indice di ListBox1 e' 0
eseguo Response.Redirect(<pagina>) ---> viene eseguito
imposto ListBox1.SelectedIndex:=-1  ---> viene ignorato
da IExplorer si sceglie <- (Indietro) , la pagina con ListBox viene 
visualizzata ,
l'indice ListBox1 e' ancora 0 (Voce1);
un click sulla Voce1 non produce effetti (dato che l'indice non e' variato)
ciao Maurizio 

 imposto ListBox1.SelectedIndex:=-1  ---> viene ignorato
Qualsiasi codice esegui per modificare lato server lo stato dei 
controlli è ininfluente se, successivamente, fai un Redirect ad un'altra 
pagina o anche alla pagina in esame. :-/

Newsgroup: it.comp.lang.delphi
Titolo: pixelsperinch

Come si fa ad ottenere l'esatto numero di pixel per pollice dello schermo?
Screen.PixelPerInch restituisce il valore per le y!
GetDeviceCaps() ha bisogno dell'handle dello schermo: quale e'?
GetDeviceCaps(Printer.Handle, PHYSICALOFFESETX) restituisce il margine
destro: in quale unita' di misura?
Grazie per le risposte.
-- 
Ciao da Giuseppe Fraddosio
    // FidoNET 2:335/727.2    
 \X/  
fradd...@libero.it
 
fradd...@tin.it
 
Membro AGI Puglia Sez. Bari 
Powered By Amiga2000T/060@50Mhz/CV3D 4Mb/AmigaOS 3.5

 wrote in message
yam8265.137...@mail.libero.it...


 cerca cerca
Sull'help di delphi dice solo che screen.pixelperinch restituisce il valore
per le y che viene asseganto da delphi nel momento di caricamento del
programma. Io pero' vorrei utilizzare l'API GetDeviceCaps() in maniera tale
da avere maggiore precisione, ma non so come passare l'handle dello
schermo! Chi e' che mi aiuta?


 schermo! Chi e' che mi aiuta?
dovresti passare alla getdevicecaps l'handle del device context dello
schermo che dovresti ottenere con
GetDC( 0 )


Provero'!


Newsgroup: it.comp.lang.delphi
Titolo: CreateToolhelp32Snapshot e NT

i SO Win tranne che su XP (ma dovrebbe andare anche lì)
function Quanti_Word : Integer;
var
   t : thandle;
   i : tagPROCESSENTRY32;
   count : integer;
   conta : integer;
begin
   // inizializzo l'output
   Result := 0;
   String_Processi := TStringList.Create;
   String_Processi.Clear;
   t := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,GetCurrentProcessId);
   i.dwSize := sizeof(i); // !importantissimo!
   process32first(t,i);
   while getlasterror <> ERROR_NO_MORE_FILES do
   begin
      String_Processi.Append(i.szExeFile);
      process32next(t,i);
   end;
   closehandle(t);  // chiudo l'handle (importante)
   conta := 0;
   for count := 0 to String_Processi.Count -1 do
   begin
      if not(pos('WINWORD', UpperCase(String_Processi[count])) = 0) then
      Inc(Conta);
   end;
   String_Processi.Free;
   Result := Conta;
end;
Questa API CreateToolhelp32Snapshot non funziona su NT ha come requirements
2000 or later.
Devo implementare una funzione del tipo che funzioni su tutti i S.O. o
"qualcosa" che mi specifichi se la determinata app è già attiva.
Ho usato hprevinst e la unit PrevInst.pas (per chi ha già affrontato il
problema e non funzionano) .
Il valore della variabile globale hprevinst è sempre a 0.
La mia app non ha un form ma è nella task bar.
Volevo tenere come ultima soluzione quella del file semaforo (tenendo conto
di eventuali crash )
Qualcuno a qualche idea?
Grazie e ciao a tutti.

 2000 or later.
Microsoft, con le ToolHelp ha fatto una bella cazzata, cioč le ha incluse su
Win9x, poi su NT ha cambiato strada (o forse era gią diversa dal 3.51) per
poi riprenderle da Windows 2000 in poi. Scarica i sorgenti di Process
Inspector da 
http://members.fortunecity.it/cbertu/Programmi.htm
 e guarda il
contenuto della unit ProcManager. C'č tutto quello di cui hai bisogno.
--
- Carlo -


Thks scarico e guardo
Ciao
Newsgroup: it.comp.lang.delphi
Titolo: regsrv32 e dll

Ciao a tutti
Qualche anima pia saprebbe indirizzarmi verso le API per poter caricare a
runtime una dll nel sistema "esattamente" come si fa con REGSRV32.EXE ?
Con Google non ho trovato nulla nei post precedenti ...
Grazie
Andrea

uummmm!
Se usi l'instahllshield express, puoi specificare quali files vanno
registrati.
Farlo direttamente dalla applicazione al primo avvio non so.
Ma ricorda che non esiste solo il ng.
Hi visto su msdn, su codecentral, su 
delphi.about.com
, 
sudelphi3000.com
?
Bye
A
--
Per rispondere non usare il reply ma scrivere al seguente indirizzo:
alsalvati(at)
supereva.it

phora wrote:

Non ti basterebbe l'utilizzo di shellexec (regsrv32.exe /s tuadll.dll)?
In alternativa scaricati i sorgenti di InnoSetup (
http://www.innosetup.com
 ), e vedi come lo fa lui.
Saluti.

 Hi visto su msdn, su codecentral, su 
delphi.about.com
, 
sudelphi3000.com
?
No.
In effetti sto "rumando" nell'help delle API di Delphi e poi, vinto dalla
disperazione, mi sarei avviato a msdn.
Lo so che con InstallShield (ho la versione registrata) risolverei tutti i
problemi ... purtroppo sto sviluppando una console application che verrà
utilizzata da una applicazione DOS e ... il committente (vero dinosauro) non
vuole installazioni "tipiche" di Winsozz.
Grazie delle dritte.
Vado a vedere
Ciao
Andrea


L'uso della shellexec era l'ultima cosa che desideravo ... anche perchè
prima devo verificare che la DLL non sia già caricata.
Per curiosità (mia): una operazione di questo tipo (regsrv32.exe /s
tuadll.dll) va bene da Win95 a WinXP ?
Vado a vedere i sorgenti che mi suggerisci.
Ciao e grazie
Andrea

 tuadll.dll) va bene da Win95 a WinXP ?
In teoria si, dovrei verificare.


Intanto ho scoperto come fa Inno Setup .... banale, nella sua semplicità ...
ci si poteva pensare, ma con questo caldo ....
Grazie di tutto l'aiuto.
Andrea

 Grazie di tutto l'aiuto.
Potresti postare il codice in risposta alla tua domanda, cosi resta sul
newsgroup e puo' essere trovato anche dagli altri.
Grazie

Mi autorispondo ... se può servire a qualcuno il codice è questo
uses
 ActiveX, ComObj;
  procedure RegisterServer(const Filename: String);
    var
      SaveCurrentDir: String;
      LibHandle: THandle;
      RegisterServerProc: function: HRESULT; stdcall;
    begin
    SaveCurrentDir := GetCurrentDir;
    try
      SetCurrentDir (ExtractFilePath(Filename));
      LibHandle := LoadLibrary(PChar(Filename));
      if LibHandle <> 0 then
        try
          @RegisterServerProc := GetProcAddress(LibHandle,
'DllRegisterServer');
          if Assigned(@RegisterServerProc) then
            RegisterServerProc;
        finally
          FreeLibrary (LibHandle);
         end;
    finally
      SetCurrentDir (SaveCurrentDir);
      end;
    end;
NB. Per scaricare la DLL basta sostituire
          @UnRegisterServerProc := GetProcAddress(LibHandle,
'DllURegisterServer');
          if Assigned(@UnRegisterServerProc) then
            UnRegisterServerProc;
La routine è stata testata per un DLL in Win95, Win98, Win98SE, WinME,
Win2000Prof e WinXPProf
Grazie dell'aiuto a tutti.
Andrea
Newsgroup: it.comp.lang.delphi
Titolo: Ho persono dei moduli!!!!

c:\programmi\borland\delphi5\bin\dclteel50.bpl
c:\programmi\borland\delphi5\bin\dcldss50.bpl
c:\programmi\borland\delphi5\bin\dcltqr50.bpl
C'è qualche anima pia che mi può inviare questi files?
chry...@libero.it
--
Chrys-bj
http://digilander.iol.it/chrysbj

 ha scritto nel messaggio
news:ILUy6.3139$5Y1....@news1.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: Matrice costante passata x param. come?

Voglio la luna o si può fare?
Io dichiaro una matrice costante in una funzione:
const miaMatrice: array [0..9,0..1] of string =(
  ('sorgente1','destinazione1'),
  ('sorgente2','destinazione2'),
...
  ('sorgente10','destinazione10')
  );
poi ho bisogno di passare la matrice ad una funzione ma non so come
passare tale parametro tenendo conto che a tale funzione vorrei poter
passare anch altre matrici di diverse dimensioni rispetto a quella
dichiarata sopra ad esempio miaMatrice2 :array [0..7,0..1] of string
ecc...
Per il momento mi creerò un record con "sorgente" e "destinazione" e
poi una lista di questo record... ma mi piaceva sapere se si poteva
fare questo lavoro usando delle costanti come descritto sopra.
Grazie

 dichiarata sopra ad esempio miaMatrice2 :array [0..7,0..1] of string
Non so se ho capito bene, ma credo di sì.
Dovresti usare degli array dinamici. Niente di difficile, io me ne sono
tenuto alla larga per parecchio tempo temendo che fossero chissà cosa, poi
ho letto l'help (alla voce using dynamic arrays) e tutto mi è stato
chiaro... e sono effettivamente utilissimi!
-- 
Jax
====
L'angoscia vera è fatta di noia. (Cesare Pavese)

Allora o usi gli array dinamici (ma in questo caso scordati le costanti) 
oppure dichiari un tipo matrice della dimensione maggiore che ti serve e 
gestisci le costanti di conseguenza (anche se con perdita di risorse)
Comunque gli array dinamici sono la scelta migliore (almeno secondo me)
Ciao,
David

Newsgroup: it.comp.lang.delphi
Titolo: Decompilare Programma Delphi

Salve,
Tempo fa qualcuno di voi mi indicò il sito dove era possibile reperire
un bel programmino che dato un exe delphi ti ricavava i form ed il
sorgente in assembler, questo prg. si chiama exe2delphi o roba del
genere, siccome ho perso l'indirizzo, non è che qualche anima pia me lo
posta nuovamente ?
Grazie
Massimo
l.sky...@iname.com
------------------------
Che la forza sia con te!
------------------------

posta nuovamente ?
Di' la verita' : sei uno di quelli che scrive i programmi e poi perde
i sorgenti !... eh eh eh ....
...Ma quante ne sai !...
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
---------------------------------------------
#exclude <windows.h>

Un programma del genere c'è anche su un cd di IoProgrammo. non ricordo il
numero
--
Gna...@Wappi.com
ICQ# 76488613
http://gnaffy.tripod.com/


poi mi sembra che c'è un prog chiamate dede o qualcosa del genere.
cmq io in genere sono contrario a queste cose.
preferisco farmi daccapo il programma.
