mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: valutare espressione definite a runtime

Salve a tutti.
Vorrei dare agli utenti delle mie applicazioni la possibilita di digitare
una espressione a runtime per calcolare un valore numerico.
Con il vecchio CA-Clipper esisteva questa possibilita' tramite i
"code-block" che altro non erano che puntatori a funzione.
Qualcuno sa se in delphi4 si puo' fare la stessa cosa?
Saluti & buon lavoro
AS

Ciao Alberto,
Alberto Salvati ha scritto:

credo che devi farti un parser che valuta l' espressione e la calcola.
Su 
www.programmazione.it
 c' č un articolo sui parser. Non l' ho ancora
letto, ma puoi sempre darci
un' occhiata.
Dai anche un' occhiata al repository di Mr Coke sul newsgroup di Marco Cantů
(
news.marcocantu.it
) ..... forse c' č qualcosa.
Ti saluto.....ciao !!
Antonio Tarolla
BSSfotware Tips Mailing - List Support

 Qualcuno sa se in delphi4 si puo' fare la stessa cosa?
Cerca un Parser di espressioni su Torry o sulla DSP (ce n'era uno carino, il
file era Parser01.zip)
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply

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

Salve,
quale componente usare per un look come i tabs della finestra principale 
di TD2006 con gli angoli arrotondati e quei bei simboli di navigazione 
sulla destra?
Grazie


Credo si tratti di un TTabSet modificato in modo da disegnare le
linguette tonde con il gradiente.
ciao
Giacomo

Giacomo Degli Esposti pisze:

E per i simboli di navigazione a destra? Mi sembra che TTabSet (che 
l'help sconsiglia di usare, preferendo TTabControl) abbia solo i simboli 
di navigazione destra e sinistra...

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

Scusate la domanda un po stupida, per aprire un qualsiasi file (non exe)
come devo fare?
La shellexecute serve solo x  file eseguibili e  cartelle.
Sto realizzando  un programmino che apra gli mp3 e automaticamente apra
anche i testi delle canzoni.
Volevo sapere anche se in delphi esiste qualche strumentino che mi permetta
di leggere gli mp3 o altri  file sonori.
--
Aloha
Tihocan
can...@tin.it

tihocan

Per _aprire_ un file:
con OP: FileOpen o AssignFile / Reset; (v. help di Delphi)
con Win: CreateFile (v. Win32.hlp)
Se il file è un documento: per aprire il programma associato passando il
nome del file come parametro: ShellExecute o ShellExecuteEx (v. Win32.hlp,
esempi anche in questo NG).
Per ciò che riguarda mp3 non ti so dire.
hth
Paolo Arosio

 esempi anche in questo NG).
Grazie cmq devo aprire gli mp3 e i wav(almeno x ora)

Newsgroup: it.comp.lang.delphi
Titolo: Problema BDE

Ok, dopo molte ricerche su google con nessun esito scrivo qui', magari 
qualcuno ne sa qualcosa...
 
Ho un programma molto ma molto vecchio (delphi 5 + BDE) che non posso 
portare su XE o altri per vari problemi interni, comunque il problema ï¿œ 
il seguente:
 
Se il sistema operativo ï¿œ seven o 8 multilanguage e come lingua uso il 
Greco, il cirillico o comunque qualsiasi lingua con caratteri "strani" 
al momento di memorizzare una stringa nel data base essa viene 
trasformata in una sequenza di #
Se il sistema operativo ï¿œ Seven o 8 della lingua nativa che serve non ci 
sono problemi, stessa cosa se il SO ï¿œ 2000 (sia con lingua nativa che 
multilingua).
Come posso venirne a capo? Ho provato ad utilizzare le widestring ma non 
cambia nulla, anzi ï¿œ peggio (nel senso che non memorizza praticamente 
niente)
Ovviamente a video o nei file tipizzati che usiamo va tutto bene: sembra 
un problema solamente di memorizzazione del data-base
 
Ps. come data-base usiamo paradox
 
Grazie a tutti,
David

 trasformata in una sequenza di #
 
 
Probabilmente è legato a unicode.
Cosa intendi quando dici che hai provato a usare widestring?
Spiega meglio e posta un po di codice su COME assegni il valore al campo.
Cosi a occhio, potrebbe essere necessario usare qlc funzione di conversione da Unicode ad ansi (in fase di scrittura)...
cqm, mi sembrerebbe strano che paradox non supporti unicode....
 
A.


 
Aggiungo:
 
https://forums.embarcadero.com/thread.jspa?threadID=68379
 
 
A.

Grazie a tutti....
 
riepilogo se ho capito bene (considerate sempre che DEVO lavorare con 
Delphi 5)
 
I campi stringa della tabella li identifico con ftWideString e gli 
aumento la lunghezza per essere certo che la stringa che gli passo ci stia.
 
Per passare i dati dai campi identificati come ftWideString uso la 
funzione StringToWideChar
Per leggere i dati dai campi uso la funzione WideCharToString
 
Giusto?
 
Grazie a tutti,
David
 

 aumento la lunghezza per essere certo che la stringa che gli passo ci stia.
Aumenti la lunghezza di cosa? Posta un po di codice.
 
A
Newsgroup: it.comp.lang.delphi
Titolo: Uso delle API

Dato che non dispongo attualmente né di manuali del Delphi né di
documentazione su Windows, qualcuno sa indicarmi qualche santo loco in
Internet dove reperire informazioni relative all'uso delle varie API
con Delphi, nonchè un elenco dettagliato e illustrato delle stesse,
possibilmente (equicascalasino) in italiano?
domanda: e perchè non cerchi su 
google.it
?
risposta: se m'appaiono siti porno poi ce metto 20 ore a trovare
qualcosa di decente.
grazie
---------------------------------------------
Io queste cose tecnologiche non le capisco...

qualcosa di decente.
Ti escono siti porno digitando come keyword Win API? Strano, molto
strano...
--
Rhymes
rhy...@myself.com
http://www.foxhound-games.it

possibilmente (equicascalasino) in italiano?
Non so se puo' servirti (non credo parli di Delphi), cmq prova a dare
un'occhiata qui: 
http://www.aleax.it/TutWin32/tc.htm
Ciao!

 possibilmente (equicascalasino) in italiano?
Guarda questo link:
http://www.programmazione.it/index.php?entity=earticle&idArticle=179&idArea=
4
Ciao
Gianni Giusti

Puo' esserti utile: 
www.allapi.net
 ?
Buon lavoro
ilvcclx_!!!
Montella panchinaro <nos...@grazie.ccc> wrote in message
6kfgutgsobu4snb6p...@4ax.com...

Newsgroup: it.comp.lang.delphi
Titolo: Selezionare o copiare in clipboard una stringa con un hotkey (stile  Babylon)

Vorrei sapere se qualcuno conosce un modo o un componente che faccia
quanto scritto in oggetto! Grazie 1000 Caino.

 quanto scritto in oggetto! Grazie 1000 Caino.
Fai una ricerca su Google per l'argomento "hotkey" oppure "hook di 
tastiera"... non dovrebbe essere difficile trovare molte risorse a riguardo.
Per l'utilizzo della Clipboard, aggiungi la unit "ClipBrd" alla clausola 
*uses* e utilizza i membri dell'oggetto di tipo *TClipboard* presente al 
suo interno.
La parte più difficile, ma forse nemmeno più di tanto - se ho ben capito 
ciò che intendi fare - è quella di catturare il testo presente 
all'interno del controllo che ha il focus nel momento in cui premi la 
combinazione di tasti, ma penso che anche qui una ricerca mirata possa 
estrarre molti risultati utili.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

   (
http://www.marco.breveglieri.name
)
Grazie per la risposta..
Mi sono spiegato veramente male..
Allora io vorrei che, passando con il mouse su un qualsiasi testo (che
sia in una label, in un edit, in un memo etc) e usando un hotkey (qui
nessun problema) copiare questo negli appunti per poi poterlo
incollare altrove (e anche qui nessun problema).
Quello che mi manca in effetti è come ottenere l'handle di un oggetto
in un form.
Con 2 sendmessage riesco a ottenere la lunghezza e il testo contenuto
in un controllo (wm_gettext e wm_gettextlength) ma non sò come
ricavare l'handle di quest'ultimo (che serve alla funzione
sendmessage).. con windowfrompoint ottengo sempre l'handle della form
principale e non del componente su cui si trova il mouse.
Grazie

 principale e non del componente su cui si trova il mouse.
Se ne è già parlato.
Esempio:
procedure TForm1.RecuperaTestoDaControllo(NomeFinestraPrincipale,
  NomeControllo: string; var Testo: String);
var
 HFinPrincipale, HControllo: HWND;
 chBuffer: array[0..255] of Char;
begin
 // recupero l'handle della finestra principale dato il titolo
 HFinPrincipale := Findwindow(nil, PChar(NomeFinestraPrincipale));
 // recupero l'handle del controllo presente sulla finestra principale
 HControllo := FindWindowEx(HFinPrincipale, 0, PChar(NomeControllo), nil);
 // invio il messaggio per recuperare il testo nel controllo
 if not (HControllo = 0) then
  begin
   SendMessage
     (HControllo, WM_GETTEXT, SizeOf(chBuffer), Integer(@chBuffer[0]));
   Testo := chBuffer;
  end;
end;
Questo è uno dei metodi più semplici.
Saluti
-- 
ACSH
[TurboDelphi]
Chi fa da se', fatica il doppio

 ha scritto nel messaggio


Newsgroup: it.comp.lang.delphi
Titolo: Ma esiste solo QReport ????

Chi puo' consigliarmi qualche altro strumento di reportitistica da
utilizzare con delphi ?
Gras...

 Gras...
Beh il migliore č senza dubio Report Builder... ma non č gratuito... costa
piů o meno 500 k ma ne vale la pena.
--
saluti
FDA

 wrote in message
89npfq$u32$1...@news.flashnet.it...

Newsgroup: it.comp.lang.delphi
Titolo: Marco Cantu, dove?

Cercavo il sito di Marco Cantu ?

Trovato grazie.

>Cercavo il sito di Marco Cantu ?
http://www.marcocantu.it
Ma anche l'ezine 
http://www.dedonline.com
, da cui vi scrivo grazie al 
gateway per le news che abbiamo messo online ieri.
-Marco
-------------------------------
Message Posted by  <dedGateway>
http://www.dedonline.com/forump
Newsgroup: it.comp.lang.delphi
Titolo: Access Violation continuo a non capire

Hufff allora ancora non ne vengo a capo. Ma questa volta pongo la 
domanda in modo diverso....
E' possibile risalire al pezzo di codice che genera questo tipo di errore
Access Violation at address 004D8C41 in module 'mioprogr.exe'. Read of
address 0163F804
senza sapere quando e come si scatena l'eccezione non avendo il debugger 
di Delphi che traccia l'esecuzione (in quanto programma installato su pc 
utente) ?
In questo gruppo avevo già affrontato l'argomento e avevo pensato di 
inserire un sistema semaforico per basato sulla verifica dello stato di 
una variabile con un pezzo di codice come questo:
While not var = true do begin
	Application.ProcessMessage;
	Sleep(1);
end;
in ogni parte del programma che andava ad utilizzare la stampa con il 
rave che sembrava essere il colpevole della situazione. Gli errori sono 
diminuiti molto ma pur sempre persistono.
Daniele

 diminuiti molto ma pur sempre persistono.
Ciao,
sicuramente non c'entra con il tuo problema ma a me sono capitate cose
strane quando ho aggiornato la versione di Rave: i miei applicativi
andavano spesso in crash durante la generazione dei reports creati
con la versione precedente; anche dopo aver aperto il report con la nuova
versione e salvato nel nuovo formato. Poi ho risolto ricompilando tutte le
parti di codice che avevo inserito negli eventi del report.
Dopo questa esperienza ho cominciato a valutare altri report generators.
Spero possa essere utile. 
Saluti, Giuseppe

 utente) ?
Hai provato MadException?
www.madshi.net
-- 
Lis                   
www.alessandroghezzi.it
Angolo del buonumore  
www.alessandroghezzi.it/ridere
O'Telma Formula 1     
www.snurl.com/otelma
A volte l'uomo inciampa nella verità, ma nella maggior parte dei casi si
rialzerà e continuerà per la sua strada (Wiston Churchill)

 
Grazie ad entrambi per le info ora farò un tentativo e se dovessi 
scoprire qualcosa lo comunico al gruppo...
Newsgroup: it.comp.lang.delphi
Titolo: Indy 9 con Deuestlphi 5


Subject: Prova Allegati 2
To: 
cle...@eriador.it
Cc:
X-Originating-IP: 81.72.49.216
X-Mailer: Webmin 0.90
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="--------1020877668"
.
------ CUT ------
TOP 1 0 indica il recupero dell'header e di 0 linee, ed infatti non c'è
nulla.
Se qualcuno mi sa dire qualcosa gli faccio un monumento nella mia memoria :)
Grazie a tutti
Piero

Sempre io. Una precisazione MOLTO importante.
Avevo sbagliato punto. Andando più a fondo ho trovato che l'errore viene
scatenato da parte della seguente istruzione:
    itm.SubItems.Add(IntToStr(POP.RetrieveMsgSize(intIndex)));
che a sua volta chiama la RetrieveMsgSize:
    function TIdPOP3.RetrieveMsgSize(const MsgNum: Integer): Integer;
    var
      s: string;
    begin
      Result := -1;
      // Returns the size of the message. if an error ocurrs, returns -1.
      SendCmd('LIST ' + IntToStr(MsgNum), wsOk);
      s := LastCmdResult.Text[0];
      if Length(s) > 0 then  begin
        Result := StrToIntDef(Copy(s, IndyPos(' ', s) + 1, Length(s) -
IndyPos(' ', s) + 1), -1);
      end;
    end;
Questo sembra essere un bug già segnalato al team di sviluppo, pertanto mi
sa che dovrò aspettare una prossima release :(
Grazie lo stesso.
Newsgroup: it.comp.lang.delphi
Titolo: problema con colori

devo fare una procedura che mi prenda il colore diun pixel quando ci
si passa sopra con il mouse.
Ho preparato questo codice ma i colori che ne escono fuori sono solo
nella banda di grigio mentre io vorrei tutti i colori, ad esempio se
passo sopra ad una immagine con miglioni di colori non li intercetta
neanche uno.
ecco il codice
{========== INIZIO CODICE =========}
procedure TForm1.Timer1Timer(Sender: TObject);
var
    handle : THandle;
    luogo : HDC;
    mouse : TPoint;
    color : COLORREF;
    R,G,B : BYTE;
begin
     GetCursorPos(mouse);
     handle := WindowFromPoint(mouse);
     luogo := GetWindowDC(Handle);
     color := GetPixel(luogo,mouse.x,mouse.y);
     R := GetRValue(color);
     G := GetGValue(color);
     B := GetBValue(color);
 
     Memo1.color := StringToColor('$00'+ IntToHex(B,2) + IntToHex(G,2)
+ IntToHex(R,2));
end;
{========== FINE CODICE =========}
il Timer1 e settato per intercettare il colore ogni 10 millisecondi
secondo voi ho sbagliato io ho c'è una procedura diversa da seguire ?
grazie
ciao
 
 ---==[ BlacK Bird ]==---
     ICQ#: 14491159
 
 
b...@blackbird.cjb.net
 
 
     Web Site
 
http://www.blackbird.cjb.net

 wrote in message
39152ed8...@news.tiscalinet.it...

Codice un poco contorto... vediamo un poco
var
  oldcoord:tpoint;
procedure TForm1.FormCreate(Sender: TObject);
begin
 getcursorpos(oldcoord);
end;
procedure TForm1.Timer1Timer(Sender: TObject);
var coord:Tpoint;
begin
 getcursorpos(coord);
 if not((coord.x<>oldcoord.x)and(coord.y<>oldcoord.y)) then exit;
 getcursorpos(oldcoord);
 memo1.color:=GetPixel(GetWindowDC(GetDesktopWindow),coord.x,coord.y);
end;
Prova questa cambia il colore del memo solamente quando la posizione del
cursore è cambiata.
Se il mouse rimane fermo la procedura esce subito.
Ciao
Matteo

grazie !




Newsgroup: it.comp.lang.delphi
Titolo: Cerco Resource Workshop

Cerco una utility tipo "Resource Workshop" (distribuita gratuitamente, fino
a qualche tempo fa, da Borland) per la scrittura e la compilazione di file
di risorse, magari freeware o shareware.
Qualcuno può indicarmi un sito WEB dal quale sia scaricabile una simile
applicazione?
------------------------------------------------------------------------
I'm looking for an utility like Borland's "Resource Workshop", for the
writing and compiling of resource files, better if it's freeware or
shareware.
Is there anybody who can say me where, on the WEB, I can download such an
application?

 applicazione?
http://protools.cjb.net
--
by(e) Doriano.
E-MAIL: doria~N~o@skyli~N~
k.it
PS: sostituisci  ~N~ con n per rispondere...

 
http://protools.cjb.net
Dimenticavo, nella pagina: Utilities


Newsgroup: it.comp.lang.delphi
Titolo: [D4] Accedere ai server news

Salve a tutti,
Dove posso trovare documentazione e/o esempi su come si accede ai server
news?
Grazie 1000 a tutti

 Grazie 1000 a tutti
Prego :)
Andrea
Newsgroup: it.comp.lang.delphi
Titolo: Spostare Form

io ho un'immagine di sfondo che simula la grafica di WinXP, e vorrei poter
muovere la form quando trascino via l'immagine, è possibile?

 ha scritto nel messaggio
news:YGtI7.90642$sq5.4...@news.infostrada.it...



mi sono spiegato male, sorry.
Dunque ho una form con un'immagine come sfondo.
ho settato i bordi del form a None per non farli visualizzare.
l'immagine di sfondo ricalca lo stile di finestra di WinXp.
in pratica io voglio ricalcare il movimento della form quando tengo premuto
sulla barra del titolo epr spostarla.
Solo che lo voglio fare con l'immagine di sfondo

 ha scritto nel messaggio
news:wevI7.91369$sq5.4...@news.infostrada.it...


 muovere la form quando trascino via l'immagine, č possibile?
Se non ho capito male vuoi che la tua forma sia tipo winamp che non ha la barra
del titolo giusto? Beh, se il problema č questo lo risolvi mettendo questa
funzioncina...
...
public
    procedure WMNCHitTest(var M: TWMNCHitTest);
      message WM_NCHITTEST;
end;
...
 
procedure WMNCHitTest(var M: TWMNCHitTest);
var
  punto : TPoint; //il punto che clikki col mauz
begin
  inherited;
  punto.X := M.XPos; //prendo le coordinate del punto clikkato e le 
  punto.Y := M.YPos; //riferisco alla posizione relativa della form su schermo
  punto := ScreenToClient(punto);
  // qui tra [] devi indicare il range della title bar, ovvero le coordinate
  // X da a e Y da a cosě da definire un rettangolo, il mio č un esempio
  if (punto.X in [10..300]) and (punto.Y in [1..20]) then
    if  M.Result = htClient then
      M.Result := htCaption;
end;
Bye!
--
Federico "FNX" Nisoli
http://fnxsoftware.rocks.it
-- 
Posted from  [194.185.90.171] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
news:wevI7.91369$sq5.4...@news.infostrada.it...
questo dovrebbe funzionare, e lo puoi applicare a qualsiasi pannello:
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
releasecapture;
TForm(form1).perform(WM_SYSCOMMAND, $F012, 0);
end;

-- 
Posted from  [62.98.116.119] 



no, in pratica voglio spostare la form quando tengo premuto il pulsante del
mouse su un oggetto.

 >
grazie
Newsgroup: it.comp.lang.delphi
Titolo: Passare da un elemento all'altro

Come faccio per far selezionare al programma l'elemento del form che voglio
io, run-time, non rispettando il tab order?
Grazie
Iding

"Iding":
| Come faccio per far selezionare al programma l'elemento del form che
voglio
| io, run-time, non rispettando il tab order?
Componente.SetFocus;
Ciao :)
Alan Solo

Newsgroup: it.comp.lang.delphi
Titolo: [D7 pro] showmessage non visibile.

Lancio una lunga elaborazione alla fine della quale mando un avviso
all'utente con uno showmessage.
Lascio andare e nel frattempo apro altri programmi eccetera.
A volte (non sempre) succede che alla fine , se torno con il bottone sulla
barra delle apllicazioni  al mio programma , lo showmessage non appare ,
vale a dire che sta dietro alle mie maschere (modal). Come posso fare per
essere sicuro che mi vada sempre in primo piano (nella mia applicazione) ?
Gulio


Scusate , mi rispondo da solo...
application.NormalizeTopMosts;

Newsgroup: it.comp.lang.delphi
Titolo: Disegnare su una form

Salve a Tutti !!
Ho un problema con un programmillo in Delphi che sto scrivendo, premetto che
sono alle prime armi con questo linguaggio.
Dopo alcuni calcoli devo disegnare il risultato sulla form del programma,
praticamente disegno solo dei rettangoli, quindi l' unico comando che uso è
Canvas.Rectangle, tutto funziona ma ....
Perchè se nascondo la form con un altra finestra il disegno che ho fatto
sparisce ?
Ho provato ad associare la routine di disegno all' evento OnPaint con il
risultato di generare un casino ...
Ah  dimenticavo ... uso Delphi 6, ed il programma compilato sotto Win2K fa
lo stesso scherzo anche sotto Win98.
--
Gentini Matteo
Off. Mecc. CHIESA ARTORIGE s.r.l.
Via. F.lli Cagnoni, 19
Vigevano (PV) - ITALY
Tel. 
+39 0381-82358
Fax. 
+39 0381-77141
www.chiesaartorige.com

 risultato di generare un casino ...
Devi disegnare su un controllo che si occupa autonomamente di mantenere
visibile il tuo disegno. tipo Timage o similari.
Ad ogno modo, la strada di usare Onpaint è corretto, controlla il tuo
codice... (eventualmente non disegnare direttamente sulla form... disegna su
un componente appiccicato alla form...)
ciao
Matteo

 visibile il tuo disegno. tipo Timage o similari.
Una PaintBox puo' andare bene ?

 Una PaintBox puo' andare bene ?
La guida di TpaintBox dice:
Use TPaintBox to add custom images to a form. Unlike TImage, which displays
an image that is stored in a bitmap, icon, or metafile, TPaintBox requires
an application to draw the image directly on a canvas. Use the OnPaint event
handler to draw on the paint box's Canvas, the drawing surface of the paint
box.
quindi è esattamente come una form, non tiene in memoria il disegno ed è tuo
compito disegnarlo quando parte l'evento onpaint.
prova con un Timage.picture.bitmap
ciao
Matteo

Newsgroup: it.comp.lang.delphi
Titolo: esportare clientdataset calc libreoffice

Ciao
vorrei esportare un clientdataset in un foglio di calcolo libreoffice.
Con excel l'ho fatto ma vorrei farlo anche con libre office.
 
Suggerimenti?
 
Grazie, Giorgio


Esportare in CSV così lo importi sia in Excel sia in Calc.
 
-- 
@WarpTen10
Newsgroup: it.comp.lang.delphi
Titolo: [OT] Turbopower è morta? Lunga vita a turbopower!

Chi di voi non ha, almeno una volta, scaricato e utilizzato gli 
eccellenti tools rilasciati opensource dalla defunta turbopower su sf? 
;-)
Ebbene, la notizia ï¿œ grossa: nick hodges ha assunto l'account di 
amministratore dei progetti su sf.
http://blogs.embarcadero.com/nickhodges/2009/09/28/39317
Forse in futuro vedremo i porting sotto D2010? Sarebbe notevole :-)
Ciao
-- 
Morde

 Forse in futuro vedremo i porting sotto D2010? Sarebbe notevole :-)
Pare sia l'obiettivo attuale, e giï¿œ sarebbe un regalo simpatico. :-)
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

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

Per chi non ha InstallShield per Delphi o C++ Builder (disponibile solo con
le versioni più costose) o è stufo di usarlo a causa delle caratteristiche
che NON ha, può utilizzare l'ottimo INNO Setup di Jordan Russell! Ovviamente
è freeware!
E' perfettamente compatibile con tutte le versioni di Windows.
Qualcuno si è chiesto se è in grado di installare anche il BDE e creare glia
Alias, peculiarità fondamentali per chi lavora con i database, ebbene la
riposta è: SI!
Su 
www.encom.it/sendai
 ho pubblicato una breve guida su come configurare
INNO Setup per installare BDE, creare Alias e registrare OCX!
--
Max Etere
maxe...@infinito.it
www.sendai.it/encom
ICQ#: 129227562

 riposta è: SI!
e in più con ISX supporta lo scripting per una personalizzazione completa
del setup tramite pascal :-)
giuliano

 del setup tramite pascal :-)
Bravo... adesso che lo sai perchè non mi dici qualcosa di più??? :)))))


 Bravo... adesso che lo sai perchč non mi dici qualcosa di piů??? :)))))
http://www.wintax.nl/isx/
ciao
giuliano


Complimenti ottima idea,  peccato che non mi funzioni il sito, mi da
impossibile aprire la pagina. Non è che me ne potresti mandare una copia.
sab...@libero.it

 impossibile aprire la pagina. Non č che me ne potresti mandare una copia.
E' colpa di quel xesso di server che lo ospita
Se me ne consigli uno che funzioni e che non costi molto... :)))
... ritenta, sarai piů fortunato!

Newsgroup: it.comp.lang.delphi
Titolo: Componente per rotazione...

Salve a tutti!
            Mi trovo, con Delphi 4.0, a dover ruotare una immagine di un
certo angolo rispetto al suo centro, e fin qui - teoricamente - nessun
problema (almeno se i punti sono disegnati direttamente sulla form... in
realtà devo ridimensionare il TImage su cui li disegno attualmente!), se non
che, ruotando con un angolo qualsiasi diverso da Pi/2, Pi, 3*Pi/2,
l'immagine visualizzata non è corretta (ovviamente, perchè devo utilizzare
Round o Trunc sulle coordinate...); insomma, ci sono dei pixel vuoti.
            Ora, come posso fare a ruotare di un angolo qualsiasi un
rettangolo di pixel e visualizzarlo in maniera decente? Per caso esiste
qualche controllo che estende il TImage (o che comunque apra e salvi i
Bitmap) che lo fa? Finora ho trovato solo un controllo che ruota di 90°,
180°, 370°, ma quello lo so fare anche io...
            Grazie a tutti...
                    Giovanni Zangrossi
-----------------------------------------------------------------------
La mia homepage: 
http://go.to/gizangro
Le nostre foto dell'eclisse: 
http://go.to/eclisse99
VOTA IL MIO SITO NELLA CLASSIFICA
DEI SITI ASTRONOMICI!
-----------------------------------------------------------------------
Us and them
and after all we're only ordinary men... (PF)
-----------------------------------------------------------------------

 Round o Trunc sulle coordinate...); insomma, ci sono dei pixel vuoti.
Per fare una cosa decente devi farti una funzione che ti legge il valore di
un pixel con coordinate decimali:
il valore di p( 5, 3.2 ) sara'
( p(5, 3) * 0.8 + p( 5. 4) * 0.2 ) / 2
il questo esempio ho usato solo una coordinata decimale ma e' facile
estenderlo a tutte e due decimali.
Unico particolare... facendo la media RGB si ottengono valori diversi che
con sistemi HSL o HSV. Cmq RGB dovrebbe bastare.
A questo punto non dovrebbe essere difficile fare la rotazione e altre
distorsioni...
Ciao Uberto

 l'Amburgo, tristemente noto a me juventino dall' '83...)
HSL sta per Hue Saturation Luminance che e' un altro modo per descrivere un
colore. HSV e' quasi uguale (mi sfuggono ora i dettagli).
Cmq facendo la media di rosso (255,0,0) e verde (0,255,0) in RGB ottieni un
giallo spento (127,127,0) mentre in HSL ottieni un giallo acceso (stessa
saturazione e luminanza). Nel tuo caso pero' credo che usare RGB sia meglio.
Tanto per capire puoi scaricarti il mio programma di frattali
www.logisoft.it/uberto/fforge23.zip
 e fare qualche esperimento con l'editor
di colori.
Ciao Uberto
Newsgroup: it.comp.lang.delphi
Titolo: Delphi S.E.

Chissenefrega, dal momento che delphi e' morto!

 Chissenefrega, dal momento che delphi e' morto!
Perch� morto? Non � pi� possibile creare applicazioni funzionanti col 
Delphi?

Newsgroup: it.comp.lang.delphi
Titolo: [d5 d6] delphi e office, ole automation e campi

ciao a tutti, un cliente ha avuto la necessità di creare di file di word e 
usare testi tipo: %NOME% %COGNOME% per posizionare i campi della mia 
applicazione e tramite oleobject eseguo un REPLACE di %NOME% con il valore 
del campo... avete qualche soluzione migliore per poter leggere in 
automatico i campi dal mio db? io uso mysql o paradox
Simo 

word dovrebbe essere in grado di farlo.
cerca bene nella guida (non quella di vba..)
A.

so che con stampa unione ti permette di leggere fonti tipo excel, csv, ecc. 
però in questo caso dovrei fare un documento di stampa unione master e 
collegarlo ad un csv generato da delphi?
Simo 

 so che con stampa unione ti permette di leggere fonti tipo excel, csv, ecc.
delphi, ihmo, c'entra poco.
Se non ricordo male Word puo collegarsi ad un db.
A

Il Tue, 19 Jun 2007 20:42:31 +0200, Simone P. ha scritto:
questo ti puņ aiutare?
http://ekrtf.code.net.ru/

Alberto Salvati ha scritto:


Nel link che avevo postato c'era proprio un esempio di come fare, però fa
riferimento ad una sessione scaduta :-)
Ecco qua il codice, da rimpolpare secondo le esigenze:
var 
  TblName: string; 
  Connection, SQL: OleVariant; 
begin 
  { Open the customer table } 
  TblName := 'D:DocDatacustomer.db'; 
  Connection := Format('DSN=Paradox Files;DBQ=%s; 
                       DefaultDir=%s;DriverId=538; 
                       MaxBufferSize=2048;PageTimeout=5;', 
                       [AliasPath, AliasPath]); 
  SQL := 'SELECT * FROM customer.db'; 
  Doc.MailMerge.OpenDataSource(TblName, EmptyParam, 
                EmptyParam, EmptyParam, EmptyParam, 
                EmptyParam, EmptyParam, EmptyParam, 
                EmptyParam, EmptyParam, EmptyParam, 
                Connection, SQL, EmptyParam); 
Ciao
ACSH
-- 
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: Aprire un file di Excel

Buongiorno a tutti vorrei sapere come posso aprire un file di excel da
delphi.
Es.
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  cartella.xls
end;
Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

gia visto nelle faq? Sono state postate il 15 ottobre, cioč, 5 gg fa.
gia visto nei vechci post tramite google?
Bye
AS

 gg fa.
Ecco cosa manca nelle FAQ! Aggiungero' il mese prossimo ...
Tamponiamo:
4.16
-DOMANDA:
Come posso aprire un file di Excel (o Word) via codice?
-RISPOSTA
Excel e Word (come tutte le applicazioni Office) sono
"automation server". Le ultime versioni di Delphi
hanno dei componenti per semplificare il lavoro di accesso
e gestione di questi applicativi, ma spesso bastano poche
righe di codice per ottenere cio' che si vuole.
Di seguito si trovano alcuni link dove approfondire l'argomento:
Base:
http://www.blong.com/Articles/Automation%20In%20Delphi/Automation.htm
Avanzato:
http://www.blong.com/Conferences/IConUK2000/DelphiMoreAutomation/More%20Aut
omation%20In%20Delphi.htm
Generalista:
http://www.djpate.freeserve.co.uk/AutoIntro.htm
Ciao.
--
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio

Newsgroup: it.comp.lang.delphi
Titolo: Chiudere Internet Explorer

Premessa:
Apro una pagina web con internet explorer e questa pagina web a sua
volta chiama un activex,
questo activex chiama una funzione in una dll e io in questa funzione
dopo un pň vorrei far chiudere internet explorer.
E' possibile con qualche istruzione o riga di codice fare questo?
Grazie...
Ciao Marco

FindWindow e PostMessage ( o Send Message, non ti spiego le differenze, ci
sono già state discussioni in merito, credo per te siano equivalenti)
il messaggio WM_CLOSE
Ciao

...

Scusa l'ignoranza...,ma non riesco a capire che cosa devo mettere
nella findwindow come puntatore al nome della classe e puntatore al
nome della finestra!!!
Io apro una pagina web cliccandoci sopra e quindi mi parte internet
explorer,ma come posso conoscere i parametri che mi occorrono?
Ciao...

dall'SDK....
"
lpWindowName
Points to a null-terminated string that specifies the window name (the
window's title).
"
Dal mio codice...
FindWindow(Nil,'Titolo della mia applicazione')
dove <Titolo della mia applicazione> in genere è quello che vedi come
caption della form principale (i.e. 'VIRGILIO - Microsoft Internet
Explorer')
CIAOUX
Newsgroup: it.comp.lang.delphi
Titolo: WM_POWERBROADCAST, help me !

Ciao,
ho bisogno di intercettare l'evento che manda il sistema in stand-by, mi
sembra di aver capito che si può fare utilizzando appunto WM_POWERBROADCAST.
Mi potreste dire come posso chaiamare ed utilizzare questa funzione ?
grazie 1000
    Roberto

"Roberto"  ha scritto nel messaggio
| ho bisogno di intercettare l'evento che manda il sistema in stand-by, mi
| sembra di aver capito che si può fare utilizzando appunto
| WM_POWERBROADCAST.
| Mi potreste dire come posso chaiamare ed utilizzare questa funzione ?
|
Fai qualcosa del genere (non e' una funzione, e' un messaggio):
type
  TForm1 = class(TForm)
  public
    procedure WMPOWERBROADCAST(var M: TMessage);
       message WM_POWERBROADCAST;
  end;
<...>
procedure TForm1.WMPOWERBROADCAST(var M: TMessage);
begin
  showmessage('Buone Feste')
end;
--
Ciao.
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio

Newsgroup: it.comp.lang.delphi
Titolo: Lunghezza stringa

Salve a tutti.
Ho un piccolo problemino con iun file di testo.
Ho una applicazione che prebde i dati da un archivio paradox e scrive un
file di testo con un determinato tracciato record.
Fin qui nessun problema.
Il tracciato record di tale file di testo è composto da una riga di testata
una di chiusura e tra l'una e l'altra ci sono altri 8 righe  da scrivere.
Questo righe da scrivere in tale file devono avere tutte la lunghezza di 120
caratteri.
Contandoli io a manina sembra tutto ok , ma purtroppo un software non mio
deve leggere tali dati da questo file di testo, segnalando la lunghezza come
errore.
C'è modo di controllare la lunghezza di tutti i buff scritti in tale file ?
Salve a tutti.

> C'è modo di controllare la lunghezza di tutti i buff scritti in tale file
?
Certo con la funzione Length Trovi la lunghezza di una stringa
...
Var
  s : String ;
  L : Integer ;
Begin
  S := 'mariopiva' ;
  L := Length (s) ; // qui L vale 9
...
Con i componenti memo dovresti fare :
Memo.Lines.Add ( 'Stringa da aggiungere' ) ; // le Lines sono le stringhe e
Add è il metodo
per aggiugere stringhe al memo ( che tra l'altro è componsto da queste
stringhe).
Ti allego questo frammento di codice che dovrebbe esserti utile
...
TForm1 = class(TForm)
    Memo1: TMemo;
    procedure Memo1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    i : Integer ;
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Memo1Click(Sender: TObject);
Var
 s : String ;
begin
  Inc ( I ) ;
  S := 'ciao ' + IntToStr ( i ) ;
  If Length ( S ) <= 6 Then
    Memo1.Lines.Add ( 'ciao ' + IntToStr ( i ) )
  Else
    Showmessage ('non la aggiungo') ;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
  i:=0 ;
end;
end.
Ciao
Mario - (
mari...@inwind.it
)
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


wrote:

Usi le routine standard di I/O (reset, assignfile, writeln etc)?
Prima del writeln(F, Linea) prova a controllare la lunghezza con
Length(Linea).
-- 
Ore 18.30: premo invio.

 ha scritto nel messaggio
news:41ec...@x-privat.org...

Newsgroup: it.comp.lang.delphi
Titolo: Intercettare Outlook e altro

Ciao a tutti, ho visto oggi la pubblicita' di un programmino che spia le
e-mail che vengono spedite e ricevute in outlook express e mi sono chiesto:
come funzionera'? Dove si aggancia? :)
Altra domanda: esiste una qualche api per poter accedere ad un file pst di
outlook per avere accesso alle e-mail contenute?
Grazie in anticipo, Chris

 pst di outlook per avere accesso alle e-mail contenute?
Ms Outlook esporta oggetti Com per la gestione.
-- 
I'am what I'am, I do what I can

 outlook per avere accesso alle e-mail contenute?
I pst sono usati da Outlook NON express, Outlook si può gestire con Ole
Automation, VBA, oppure si possono scrivere degli addon (per esempio c'è un
filtro antispam eccezzzzionale e totalmente free - SpamBayes  - che funziona
così). Outlook Express usa i MBX fino alla 4, i DBX dalla 5, i formati sono
stati più o meno documentati, visto che in giro si trovano utilità di
esportazione e/o ripristino file danneggiati..
Newsgroup: it.comp.lang.delphi
Titolo: [D5] Malfunzionamento di FindFisrt con e faDirectory ?

io ho bisogno di conoscere tutte le subdirectory da un certo punto del
albero generale
ho fatto questa procedura
Procedure TForm1.AddFolderTree ( Root : String );
  var SR : TSearchRec;
    Function FolderCheck : Boolean;
    Begin
      Result := ( Sr.Attr = faDirectory ) AND
           ( Sr.Name <> '.' ) AND
           ( Sr.Name <> '..' );
    End;
  Begin
    Memo1.Lines.Add ( '"' + Root + '"' );
    If FindFirst( Root + '\*.*', faDirectory, sr) = 0
      Then Begin
        If FolderCheck
          Then AddFolderTree ( Root + '\' + Sr.Name );
        while FindNext(sr) = 0
          do If Check
            Then AddFolderTree ( Root + '\' + Sr.Name );
        FindClose ( SR );
      End;
  End;
funziona ma non so perke FindFirst/FindNext mi restituiscono oltre
alle directory vere e proprio anche i comuni cosi da costringermi a
ralentare parecchio ( specialmente se la directory ha parecchi file )
come vedete io ho messo solo faDirectory... allora perke mi da anche i
file normali costringendomi a testare da me ( Sr.Attr = faDirectory )
cmq non credo che sia tanto un errore di Delphi 5 ma tanto di windows
visto che FindFirst e FindNext sono delle api di windows 
come si vede nei sorgenti della SysUtils infatti usa le due api:
FindFirstFileA e FindNextFileA
c'è un modo per ovviare al problema? qualcuno c'è riuscito?
Il Razziatore,
The Only Good Windows is an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
ICQ     : 67552596
-----------------------------------------------
Founder of MediaPlayer Project
http://mpp.iwebland.com

Si, avevo riscontrato anche io lo stesso problema: ignora l'attributo
specificato per la ricerca. Soluzione: cerchi comunque tutti i file (usando
faAnyFile, per sicurezza), quindi li filtri, utilizzandoli o ignorandoli,
all'interno del loop.
Ciao, Sandro

 ralentare parecchio ( specialmente se la directory ha parecchi file )
Dall'help: "The Attr parameter specifies the special files to include in
addition to all normal files. ". Cosa c'e' di oscuro?
Puoi vedere magari la documentazione di FindFirstFileEx.
Saluti
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: catturare un errore

ciao vi espongo il problema. Supponiamo di avere una form con un pulsante,
la pressione del pulsante attiva una query che aggiunge semplicemente un
nuovo campo ad una tabella. il mio problema è che vorrei fare in modo che
alle successive pressioni del pulsante non mi venga dato nessun messaggio
d'errore... in pratica come catturo l'errore????
Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Quale delphi ?
Quale Db ?
Quale tecnologia di accesso ?
Come lanci la query ?
Comunque, generalmente un bel try ... except
Oppure disabiliti il bottone dopo la prima volta ....   :-)
Giulio 

Non sarebbe meglio controllare se il campo esiste gia' prima di eseguire la
query?
Ciao Giorgio
"GiulioC" <giulio.c...@SPAMunisoft-net.it> ha scritto nel messaggio
news:xANkd.309955$35.14...@news4.tin.it...


                    Il 11 Nov 2004, 18:47, "GiulioC" <giulio.c...@SPAMunisoft-net.it> ha
scritto:

Sorry: allora... Delphi7, Db Firebird e non posso disabilitare il bottone
poichè mi deve confermare che effettivamente i dati sono stati aggiornati...
mi basterebbe sapere come catturare siffata eccezione ed eventualmente
nell'except mandare tale messaggio di errore.

Newsgroup: it.comp.lang.delphi
Titolo: screensaver

Ciao, vorrei costruire uno screensaver interno ad un'applicazione. In altri
termini vorrei che se trascorso un certo tempo non schiaccio nessun tasto,
parte uno screensaver, chessņ una schermata nera che mi dia un'informazione.
Qualcuno sa dirmi se c'č qualcosa in giro per farlo o se ha qualche idea su
come farlo?
Grazie mille.
Giuseppe

 Giuseppe
Prego
Giorgio

 o se ha qualche idea su come farlo?
vedi alla guida di Win32 SDK alla voce: "Screen Saver Library" (ma è un 
argomento piuttosto complesso, ti avviso)
-- 
Mauro Falzari ( 
http://digilander.libero.it/mauro.falzari
 )
"Se guardi nell'abisso, anche l'abisso guarda in te." (Friedrich Nietzsche)

 argomento piuttosto complesso, ti avviso)
Grazie mille, magari proverò prima con le form visto che vorrei fare
qualcosa di semplice.
Grazie mille ad entrambi.
Giuseppe
---------------------------------------------------------------------------
Messaggio inviato attraverso 
http://www.trucchiperpc.it
 - sezione newsgroup

Ciao, vorrei costruire uno screensaver interno ad un'applicazione. 
all'interno??? cioè una classe della tua applicazione?
come già detto puoi fare un form e gestirlo come una screen saver
un'altra via:
comunque gli screen saver sono dei file 
(di estensione .scr credo ... vere e proprie applicazioni)
potresti crearti uno screensaver (ci sono vari tool per farli)
e poi aprirlo con un comando tipo shellExecute
e sia attiva lo screen-saver
questa via ti permette di poter usare anche gli screenSaver
del sistema operativo o di terze parti ... scaricarli da internet
e così via
se vuoi costruire uno screen saver con delphi
GLScene (una libreria per il 3D) 
www.glscene.org
ha un componente screenSaver che alla compilazione
ti compila la tua applicazione come .scr
la potenza di GLScene sul 3D/Sprite2D è grande
quindi ti troverai anche in un bell'ambiente per
creare i tuoi ScreenSaver ... ;)
	Ciao
	MassimoB
 

 ha scritto nel messaggio
news:P_N2b.267088$lK4.8...@twister1.libero.it...


 giuseppe
  Ciao
  MassimoB

Newsgroup: it.comp.lang.delphi
Titolo: Filtro delle date

Come si f con una TTable a filtrare una data?
-- 
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

 Come si f con una TTable a filtrare una data?
puoi filtrare quello che vuoi. Basta che i tipi di dato nella condizione
siano ovviamente compatibili !!
Utilizza l'evento OnFilterRecord ( facendo riferimento alla proprietą
Filtered del componente TTable ) e poi all'interno del metodo associato
all'evento stesso, scrivi qualcosa del tipo:
if Campo_Data.Value = Data_che_vuoi_filtrare then
 Accept:=True
else Accept:=False;
ok ?
Poi basta cambiare lo stato della proprietą Filtered da True a False o
viceversa per applicare o togliere il filtro.
Ti saluto....ciao !!
Antonio Tarolla

var datainizio,datafine:tdatetime;
..
begin
 tabella.filter:='Data>='''+datetostr(datainizio)+''' and
Data<='''+datetostr(datafine)+'''';
 tabella.filtered:=true;
end;
Newsgroup: it.comp.lang.delphi
Titolo: Checkbox&Listview

Scusate,
qualcuno sa come faccio a capire quando viene selezionato un checkbox in una
listview? Non trovo nessun evento adatto!

 checkbox in una listview? Non trovo nessun evento adatto!
Infatti nun ce stà... devi trovare un'altra via... l'unica mi sembra testare gli item
checkati ad ogni OnClick, ma occhio ai tempi di risposta se hai molti items e se devi fare
qualche operazione/calcolo particolari.
--
Jax

E' impensabile pensare di controllare tutti gli item ad ogni click: pensa di
avere qualcosa come 5000 item e te ne renderai conto...
Deve per forza esserci un modo più efficace!
"Jax" <rispo...@newsgroup.grazie> ha scritto nel messaggio
news:RMuv8.54588$m41.1...@twister2.libero.it...


 Deve per forza esserci un modo più efficace!
Non essendoci un evento all'uopo, l'unica cosa che sono riuscito a fare (e che
poi tu implementerai come ti serve) è questa
procedure TForm1.ListView1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
 if ([htOnStateIcon] * ListView1.GetHitTestInfoAt(X, Y)) <> [] then
   Showmessage('E'' stato selezionato/deselezionato un checkbox');
end;
Non saprei cos'altro tirare fuori dal cilindro altrimenti :)
Fammi sapere.
--
Jax

 poi tu implementerai come ti serve) č questa


 checkbox ma non puoi sapere quale!
Caspita, ma allora dillo che vuoi la pappa pronta!!!!
  if ([htOnStateIcon] * ListView1.GetHitTestInfoAt(X, Y)) <> [] then
  begin
   Showmessage('E'' stato selezionato/deselezionato un checkbox');
   iItem := ListView1.GetItemAt(X, Y);
   if iItem <> nil then ShowMessage(iItem.Caption);
  end;
Spero non ti serva sapere anche il nome dell'utente che ha cliccato ^___^
--
Jax
Newsgroup: it.comp.lang.delphi
Titolo: Chiudere connessione TCP/IP

Ciao a tutti,
vorrei sapere se è possibile e come (chiaramente in delphi) chiudere una
connessione a Internet (in altre parole fare quello che faccio quando clicco
su DISCONNETTI durante una connessione remota....)
Ciao
Jack

 su DISCONNETTI durante una connessione remota....)
Se la connessione avviene tramite modem allora scaricati (guarda su
www.torry.net
) un componente che sia in grado di gestire le connessioni RAS
e a quel punto sarai in grado di avviarle, chiuderle, crearle, ecc....
The.GKR

Newsgroup: it.comp.lang.delphi
Titolo: intercettare il tasto ingrandisci del mouse intellinet

ciao a tutti, mi č stato chiesto di usare il tasto INGRANDISCI (lato 
sinistro basso) del mouse microsoft, come posso fare per intercettarlo? 
l'alternativa che ho trovato č quella di configurare che quel tasto esegua 
CTRL+TASTO cosě io intercetto l'evento tastiera, perň mi sembra poco fine 
come soluzione, visto che devo pure prevedere un setup e non posso far 
configurare a mano questa impostazione
Simone 

TForm1 = class(TForm)
private
  procedure WMXButtonDown(var Message: TMessage); message WM_XBUTTONDOWN;
  procedure XButtonDown(x,y: integer; XButtonNumber: Integer); //1 oder 2
//  ...
end;
//...
procedure TForm1.WMXButtonDown(var Message: TMessage);
begin
  if (Message.wParam and MK_XBUTTON1) = MK_XBUTTON1 then
    XButtonDown(
      Message.lParam and $FFFF,             //*low-order word -> X
      Message.lParam and $FFFF0000 shr 16,  //*high-order word -> Y
      1                                     // XButton1
    )
  else
    XButtonDown(
      Message.lParam and $FFFF,             //*low-order word -> X
      Message.lParam and $FFFF0000 shr 16,  //*high-order word -> Y
      2                                     // XButton2
    );
  Message.result:= 1;
end;
procedure TForm1.XButtonDown(x,y: integer; XButtonNumber: Integer);
begin
 SHOWMESSAGE('tasto 3');
end;

Newsgroup: it.comp.lang.delphi
Titolo: Creare ClientDataset

Perdonate l'ignoranza!!!
Ho fatto un salto di 2 generazioni passando con notevolissimo ritardo
a Delphi 7. Ho notato in vari esempi di Cantų l'utilizzo dei ClientDataSet.
Avrei Bisogno di qualche chiarimento:
La Prorietā FileName di ClientDataSet prende solo file *.xml e *.cds
ma questi .cds come me li creo?
Un tempo ero abituato a crearmi le mie belle tabelline com
DataBaseDesktop...
ed ora???
Grazie a tutti

 ha scritto nel messaggio
news:rGRec.48158$hc5.2...@news3.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: dbexpress e mysql

Salve!
Ho visto che l'argomento in subj è gia stato trattato, ma purtroppo
non sono riuscito risolvere il mio problema di connessione.
Ho mysql 4.0.13-nt installato e funzionante, per la precisione con
snort come ids che ci butta dentro i dati. e fin qui tutto funziona.
pensavo di scrivere un applicaziuone in delphi che mi legge sta roba,
ed usare i componenti dbexpress... ma :
il delphi 7, avendo installato la patch per mysql 4.0.1, che mi
permette la connessione, mi da sempre invalid username/password, sia
che metto root, sia uno degli altri utenti che invece si loggano
tranquillamente su mysql.
Inoltre vedo che se lascio vuoto hostname lui sembra non accorgersene,
come se mettto databasename ad un nome che non esiste...
qualche suggerimento?
graazie 10000
Matteo
----------------------------------------
mailto:
nyarlathot...@libero.it
http://www.genhome.org/genhome

 qualche suggerimento?
Ciao premetto che non ho mai utilizzato Mysql
ma stasera mentre giravo per la rete ho trovato questo link magari
può esserti utile:
http://www.thedelphimagazine.com/Samples/1540/1540.htm
ciao
gabriele

purtroppo l'articolo siggerito l'avevo già letto, senza nessun
risultato.
continuo a non riuscire ad accedere al database, che mi dice
user/pwd errati...
Matteo


Propenderei per provare il MyOdbc 3.51 per mysql 4 in questo modo nella
stringa di connessione puoi utilizzare il dsn generato dal myodbc. Questa
soluzione č valida e funzionante al 100 % con altri linguaggi come asp e
visual basic e dato che in delphi č presente il componente ado credo che non
dovresti incontrare altri problemi.
Spero di essere di aiuto.
Dani

Newsgroup: it.comp.lang.delphi
Titolo: RMI sta a java come ?? sta a Delphi...

Salve,
Qualcuno conosce RMI per JAVA? E' un insieme di classi per gestire la
chiamata di metodi appartenenti a oggetti remoti, tipo RPC. Esiste qualcosa
di analogo in delphi?
grazie 1000 a chi mi rispondera....
maz

 di analogo in delphi?
Con Delphi puoi usare DCOM e CORBA o, ancora meglio, SOAP.
--------------------------------
Inviato via 
http://usenet.libero.it

Con Delphi puoi usare DCOM e CORBA o, ancora meglio, SOAP.
domanda: in questa bolgia di standard uno sviluppatore come si deve
muovere?
--
Rhymes (
rhymes_...@myself.com
)
http://www26.brinkster.com/rhymes
" ride or die "

 muovere?
Dipende da quello che devi fare e dagli strumenti che hai a tua
disposizione.


disposizione.
che differenza c'è tra DCOM, CORBA e SOAP?
io non conosco nessuna delle tre tecnologie


io non conosco nessuna delle tre tecnologie
SOAP: 
http://pro.html.it/articoli/id_177/idcat_33/pro.html
CORBA: 
http://www.omg.org/gettingstarted/corbafaq.htm
DCOM vs CORBA in delphi : 
http://www.itportal.it/developer/delphi/database/
C'e' roba sufficente per iniziare.
Ciao
Morde

C'e' roba sufficente per iniziare.
grazie
