mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Cambio immagine

Salve,
vorrei fare in modo che un pulsante si avvii con una bmp e quando ci passo 
sopra con il mouse l'immagine cambi....pensavo ci fosse un componente 
apposito per questo scopo nelle component palette, ma non lo trovo...è una 
cosa che devo fare manualmente??... TSpeedButton pensavo fosse il componente 
giusto per te, ma non riesco a fare ciò che vorrei, in particolare non 
riesco a capire il funzionamento della proprietà NumGlyphs che può avere 
valore 1;2;3;4 ....qualcuno di voi può dirmi a cosa serve e come si usa??
Thx
Max 


Sinceramente ora non ho guardato questa proprietà, ma mi sembra che per
quello che hai chiesto tu sia del tutto innocua ;-) ciao.
--- posted by geoForum on 
http://www.delphiedintorni.it

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

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

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

esista nessuna funzione che si chiami SetSize in Glyph....sai perchč??..
Impossibile. Se guardi il tipo della proprietą Glyph vedrai che č un
TBitmap e poichč la classe TBitmap ha un metodo che si chiama
SetSize....Cerca meglio, magari ti sarą sfuggito. Se hai bisogno chiedi
pure, sono sempre disponibile ;-) ciao.


 SetSize....Cerca meglio, magari ti sarà sfuggito. Se hai bisogno chiedi



Invece qualche aiuto te lo potrà dare. Sicuramente quel sito non conterrà
molto materiale come dici tu, ma il professor Camuso ha messo a
disposizione delle videolezioni su Delphi e fà riferimento proprio alla
versione 7. Al giorno d'oggi è raro trovare qualcuno che mette a
disposizione le sue conoscenze gratuitamente. Ti consiglio di scaricarti e
seguire tutte le videolezioni, che non sono sicuramente per
professionisti, ma per cominciare sono ottime(per questo te l'ho
consigliato). Di nuovo, se hai bisogno chiedi ciao.


>di setsize....
Mi è venuto in mente ora :-).......invece di usare SetSize che dici che
non è presente nella tua versione, allora settale tu da codice le
proprietà della Bitmap così: Bmp.Width := 30; Bmp.Height := 30;
N.B.: Leggi il messaggio delle ore 21:26 che ti ho risposto alle altre
domande e quindi sostituisci queste due istruzioni di assegnamento al
posto di quella "maledetta SetSize" :-) ciao.



Pardon...... Glyph.Width := 30; Glyph.Height := 30; ciao.


>proprietà della Bitmap così: Bmp.Width := 30; Bmp.Height := 30;



Lo so, il fatto è che quasi nessuno la pensa come me. Spesse volte quando
chiedi una cosa(parlo per esperienza personale e non mi riferisco a questo
news group ma in generale), sembra che chi te la debba dire ti debba fare
un favore ENORME come se si trattasse di vita o di morte....ANDATE AL
DIAVOLO SOFISTICATI DI MERDA, CHI CAVOLO VI CREDETE DI ESSERE? Scusa, ma
dovevo sfogarmi un po' :-). Ciao alla prossima.


 ha scritto nel messaggio 
news:6o43nrF...@mid.individual.net...

Newsgroup: it.comp.lang.delphi
Titolo: [OT]Nome FK

Vi sono problemi ad assegnare nomi delle foreign_key a piacimento
invece di usare quelli proposti dal particolare DB.

 invece di usare quelli proposti dal particolare DB.
In questo gruppo si parla di Delphi, sei pregato di attenerti al topic.
Grazie.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie.
E' segnato [OT]... Sei il moderatore ?
Ciao

 E' segnato [OT]... Sei il moderatore ?
Questo gruppo non è moderato e in ogni caso segnare [OT] un messaggio non
autorizza ad essere off-topic. Come già detto, c'è un argomento di
discussione, rispettalo.


 discussione, rispettalo.
Grazie in ogni caso per i precedenti contributi.
Ciao

Nessun problema in ambito della propria applicazione se il DB lo
permette.
Ciao

Newsgroup: it.comp.lang.delphi
Titolo: Chiusura Applicazione

Vorrei fare in modo che la mia applicatione se viene chiusa dalla form non
viene chiusa ma minimizzata, perň se la chiusura viene richiamata da un
CHIUDI SESSIONE venga terminata !
Come posso fare a sapere "chi" cerca di chiudere l'applicazione?
GRAZIE


wrote:

Puoi intercettare il messaggio "WM_QUERYENDSESSION" (magari usando
l'evento OnMessage del TApplication). Per il resto, ti basta impostare
la variabile passata per riferimento "Action" all' "OnClose" del form,
perche' sia "caMinimize" e non "caFree" (che e' il default).
In realta', quello che dovresti fare e' possedere una variabile di
default privata della classe TForm1 (del tipo "TipoChiusura" di tipo
TCloseAction), che per default imposti a "caMinimize".
Se intercetti "WM_QUERYENDSESSION", la imposti a "caFree".
Attento, comunque, al fatto che l'evento "OnMessage" del TApplication
non riesce ad intercettare i "SendMessage" che vengono spediti
all'applicazione, ma solo quelli che subiscono il "PostMessage", cioe'
solo quelli che vengono effettivamente introdotti nella coda dei
messaggi.
--
Andrea Laforgia (UIN 87230455)
----------------------------------------------------------
Non scrivetemi per e-mail, se non richiesto espressamente.
No replies in private e-mail, unless explicitly requested.
----------------------------------------------------------
Newsgroup: it.comp.lang.delphi
Titolo: Aiuto novellinocon tanta voglia di imparare

sono ancora vergine nel campo,
nel senso che è il mio approccio con il mondo della programmazione.
vorrei iniziare con il Delphi e cercavo dei manuali semplici ( tanto per
capirci , quelli per imbranati )
che mi aiutassero ad introdurmi in questo mondo,
qualcuno di voi mi puo' consigliare dei titoli reperibili (in italiano),
possibilmente con allegati CD o Floppy con esempi pratici.
Il classico corso da 0 esperienza,
ho sentito parlare molto di Marco Cantù
i suoi libri vanno bene o per un novellino sono troppo complicati ?
grazie a tutti
(p.s. ho Delphi 5)
--
-------------------------------------------------------
Sono tante le cose che vorrei dire,
sono tante le cose che vorrei fare.
In un mondo falso e corrotto auguro a tutti tanta serenità e tanta allegria.
---------------
Il bello della vita, è che senza saresti morto.
( by ignoto )

i suoi libri vanno bene o per un novellino sono troppo complicati ?
Ti consiglierei il manuale del Delphi 3 o del Delphi 4 di Cantù. Io ho
iniziato con quello per la versione 3 e mi ci sono trovato bene. Non
ero un novellino in campo di programmazione, ma lo ero in quanto a
programmazione ad oggetti (conoscevo C, Turbo Pascal, Basic, ma nulla
di più). Ti dico che sono 2 mondi completamente diversi, è stato come
"rinascere" imparare la programmazione ad oggetti (e non è stato un
parto facile :) ). Ora però, che sono entrato nella mentalità, trovo
tutto molto più semplice :)
Evita il manuale del Delphi 5, presuppone che il lettore abbia già
delle conoscenze di base ed esso stesso consiglia per un principiante
le precedenti edizioni.
CIAO.
/|/|/ Bozzy \|\|\

>i suoi libri vanno bene o per un novellino sono troppo complicati ?
Io ti consiglierei il manuale di Xavier Pacheco - e Steve Teixeira in
Italiano e con cd rom allegato : DELPHI 4.
All'inizio sembra difficile, e non ti nascondo che ti da la sensazione
che sia molto difficile, ma pian piano se riesci ad entrare lo
troverai ottimo. Io (che non sono certamente un asso) ho capito alcuni
capitoli solo dopo tempo, ma ti assicuro che il libro non è certo
banale e quello che insegna è davvero buono.
Ciao

Italiano e con cd rom allegato : DELPHI 4.
C'e' gia' la versione per Delphi 5, ma non so se ne esista la
traduzione in italiano (io ho la versione inglese).
--
Andrea Laforgia (ICQ 87230455)
http://www.geocities.com/AndreaLaforgia
"ci sono tre tipi di persone nel mondo : quelli che
 sono bravi in matematica e quelli che non lo sono."

 ha scritto nel messaggio
news:8ko04t0mop186mug1...@4ax.com...


Newsgroup: it.comp.lang.delphi
Titolo: quali funzioni su delphi 7

per aprire un file, modificarne i bytes (o i caratteri) e richiuderlo?
Grazie
 
 

Che ne dici di *TFileStream*, tanto per cominciare? :)
http://docwiki.embarcadero.com/VCL/en/Classes.TFileStream
 
 
-- 
Marco Breveglieri
   (
http://www.marco.breveglieri.name
)
Newsgroup: it.comp.lang.delphi
Titolo: TabSheet

Ho notato un comportamento strano dei tabsheet
Ho due tabsheet su un pagecontrol, ognuno di essi ha un dbgrid associato
allo stesso datasource ma campi diversi,
Cosě all 'Hide del primo tabsheet setto
dbgrid1.datasource:= nil;
e allo show del secondo tabsheet
dbgrid2.datasource:= datasource;
Con mia sorpresa mi sono accorto che l'evento show del secondo tabsheet
viene processato prima dell'evento hide del primo tabsheet
Cosě ho lavorato sugli eventi del pagecontrol, voi come fareste?
Ciao
AC

 Cosě ho lavorato sugli eventi del pagecontrol, voi come fareste?
Potresti scrivere il tuo codice negli eventi OnChange e OnChanging del
PageControl per esempio...
Acqua
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:Br%Nb.257654$vO5.10...@twister1.libero.it...


PageControl per esempio...
Mitico Acqua:
procedure TForm1.PageControl1Changing(Sender: TObject;
  var AllowChange: Boolean);
begin
   // PageControl1.ActivePage contiene la pagina *dalla quale si sta uscendo* 
   if PageControl1.ActivePage = Primo then dbgrid1.datasource:= nil
   else if PageControl1.ActivePage = Secondo then dbgrid2.datasource:= nil;
End;
Poi, nell'evento Show il nostro amico puo' assegnare il datasource al tabsheet
che lo ha scatenato.
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

Newsgroup: it.comp.lang.delphi
Titolo: [d5-ado-msaccess] Elenco tabelle e campi

Salve, come è possibile in delphi 5 tramite le ADO connesse ad un 
database di tipo Access sapere quanti e quali tabelle e quanti e quali 
campi sono presenti in un determinato file? E' possibile farlo anche 
solo con una particolare stringa sql di una tadoquery?
Grazie, ciao! :)

Grazie, ciao! :)
Niente
	Ciao
	MassimoB
 

 in più ti suggerirei di spulciarti i post passati del NG 


 in più ti suggerirei di spulciarti i post passati del NG 


di mysql; come posso sostituirlo?
prova con "SELECT TOP n FROM tabella1"
dove n e' il numero di record che vuoi fetchare.
Ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

provato e il programma consuma tantissime risorse) . Soluzioni?
Premesso che non conosco il limit di Mysql.
Oltre al metodo di Morde che non ho mai provato, ma
che mi propongo di provare al più presto,
sempre da HELP DI DELPHI su TAdoDataSet
c'è la proprietà MaxRecords che stando a quello che c'è
scritto fa quello che vuoi tu, amche se non l'ho mai 
provato e non conosco l'ottimizzazione SQL (se c'è)
di cui fa uso. Vediti un pò l'Help.
	Ciao
	MassimoB
 

L'istruzione "TOP" limita il fetching ai n numeri a partire dal primo 
nel recordset, quindi non risolve la situazione. Neanche il maxrecords a 
quanto pare, poichè comunque è impossibile prendere i recordset da n a m 
(e non da 0 a m).
MassimoB ha scritto:

Newsgroup: it.comp.lang.delphi
Titolo: Mailto & allegati

Ho la necessità di attivare dalla mia applicazione il gestore di posta di
default installato
sul PC (Eudora, Outlook Express, ecc.) e creare un messaggio con allegato,
come in Excel/Word quando si sceglie il comando
FILE\INVIA A\DESTINATARIO DI POSTA ELETTRONICA (COME ALLEGATO...)
So come attivare la form di compilazione del messaggio, ma non so come fare
ad agganciare
gli attachments. Con il codice riportato sotto attivo la form di
compilazione:
procedure TForm1.Button1Click(Sender: TObject);
var
  x : String;
begin
  x:= 'mailto:?Subject=&cc=&bcc=';
  ShellExecute(0, nil, PChar(x), nil, nil, SW_SHOWDEFAULT);
end;
Qualche idea? Grazie a tutti
Fabio

 ha scritto nel messaggio
news:0Uii6.10154$mD1.2...@news.infostrada.it...


come in Excel/Word quando si sceglie il comando
Credo che MAILTO non gestisca gli allegati (non ne sono sicuro).
--
Andrea Laforgia (ICQ 87230455)
http://www.geocities.com/AndreaLaforgia
"ci sono tre tipi di persone nel mondo : quelli che
 sono bravi in matematica e quelli che non lo sono."

    Di sicuro non gestisce gli allegati!
    George.
Andrea Laforgia wrote in message ...


Newsgroup: it.comp.lang.delphi
Titolo: Aiuo BDE





Ragazzi di tutto il Web, aiuto!!!!!!


Ho un grosso problema. Ho un programma completo ma 
non entra in esecuzione. Ho un alias con delle Tabelle. Mi richiede il Dbe, ma 
come devo fare per recuperare il Bde dall'esterno, inserirlo in CD-rom con il 
file di installazione? Aiuto ragazzi. Mi rimangono solo 24 ore. Dopo ciò posso 
ritenermi esoneraro dall'incarico.



Crea un setup dell'applicazione con InstallShield e tra le opzioni
dell'installer metti un check su BDE, che verra' quindi installato insieme
ai tuoi file.
Ciao, Sandro

Ho un grosso problema. Ho un programma completo ma non entra in esecuzione.
Ho un alias con delle Tabelle. Mi richiede >il Dbe, ma come devo fare per
recuperare il Bde dall'esterno, inserirlo in CD-rom con il file di
installazione? Aiuto ragazzi. >Mi rimangono solo 24 ore. Dopo ciň posso
ritenermi esoneraro dall'incarico.
se non ci riesci come ti ha detto Zortek ( ti ha detto bene ), prendi il CD
di Delphi, mettilo nel PC dove deve girare il tuo programma e fai
un'installazione "CUSTOM" ( personalizzata ).
Da qui scegli di installare solo il BDE. Vedrai che risolvi !! Ciaooo !!!!
Antonio Tarolla
Newsgroup: it.comp.lang.delphi
Titolo: Componenti per Interbase / Firebird

Mi sto avvicinando al mondo RDBMS , e ho trovato dei componenti
free (ZeosDatabase Object 6.5) , per Delphi.
Questi pero' si fermano a D7 , per D8 e 2005 cosa si dovra' usare ?
Ho trovato i componenti di valutazione della IBSurgeon IBO 4_5.
Per l'accesso con ZeosLib uso ZeosConnection e ZeosQuery per le operazioni;
durante le prove non hanno mai dato rogne.
Per creare Database , Trigger, Domini, Sotred procedure, Generator ,
ho usato IBAdmin 4.
Cosa devo aspettarmi in piu' dai componenti a pagamento (oltre il supporto
per D2005 che ho visto esserci in IBO 4_5) ? , migliore affidabilita' ?
Usate dei componenti non gratuiti diversi e/o migliori o economici di
IbSurgeon , ma ugualmente affidabili ?
grazie Maurizio 

 IbSurgeon , ma ugualmente affidabili ?
fibplus
ciao f
-- 
====================================
Coltiva linux, che tanto windows si pianta da solo!
Linux registered user: 364664 (
http://counter.li.org
)

Newsgroup: it.comp.lang.delphi
Titolo: Qreport e cassetti stampante

Qualcuno potrebbe darmi una mano?
Il componente QReport di Delphi 5 contiene al suo interno un ormai noto baco:
quando si effettua la preview del report, se si setta un cassetto diverso dal
predefinito nel pulsante di setup della stampante, questo non viene mantenuto.
Ho gią provato a scaricare dopo aver pagato la licenza la versione 3.5 dal sito
www.qusoft.com
 ma il problema sussiste.
Qualcuno ha trovato una alternativa a riguardo?
Sono sicura che il QReport non comunica in alcun modo con i settaggi del
componente TPrinterSetupDialog o TprinterDialog che invece comunicano tra di
loro.
Grazie a chi mi vuole dare una mano
Alessia Mazzeo
-- 
Posted from 
ccs-technologies-gw.customer.itgate.net
 [213.254.2.30] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 
Su questo non ci giurerei.
Sappiamo motlo poco di come queti roba di terze parti lavora...
Saluti e buona fortuna
AS
-- 
Posted from  [212.177.19.163] 


 Ho già provato a scaricare dopo aver pagato la licenza la versione 3.5 dal


 predefinito nel pulsante di setup della stampante, questo non viene
mantenuto.
-----
Prova un po' a guardare TQRPrinterSettings
unit
QRPrntr
Description
TQRPrinterSettings store printer specific setup information and can
communicate these settings into a TQRPrinter object. Users should not create
instances of this class, this is handled internally by QuickReport.
Properties Methods
Copies Create
Duplex ApplySettings
FirstPage
LastPage
Orientation
OutputBin
PaperSize
PrinterIndex
Title
-----
--
Emilio Panozzo
mailto: 
emip...@tin.it

Newsgroup: it.comp.lang.delphi
Titolo: catturare una bmp da un avi

esiste un componente che mi permetta di catturare e salvare in un file una
bmp da un filmato avi?
grazie a tutti
ciao
Pier


Ciao Pier,
http://www.swissdelphicenter.ch/torry/showcode.php?id=1180
dovrebbe fare al caso tuo.
Ciao da Enrico Giudici c/o Icograf
ico...@tiscali.it
--- posted by geoForum on 
http://www.delphiedintorni.it

grazie mille adesso provo subito!!!
grazie ancora e ciao
Pier
Newsgroup: it.comp.lang.delphi
Titolo: treeview: mi fate un esempio

Ciao,
ho queste stringhe che mi rappresentano il percorso di un file (non presente
sul Pc):
Str1=Dir1
Str2=Dir2
Str3=Dir3
Str4= Nomefile1
.......poi mi arriva ad esempio
Str1=Dir1
Str2=Dir2
Str3=Nomefile2
non riesco a metterle in una treeview,mi si aggiungono creando altri
nodi...insomma un pasticcio.
 Mi fate un esempio di come ricavare la treeview senza ripeterela creazione
dei nodi??
Grazie.

 dei nodi??
Devi cercare il nodo specificato nella TreeView e modificare il suo
contrnuto.

 Grazie.
se il tuo indirizzo email č valido, ti ho postato un esempio che avevo fatto 
tempo fa.
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

 ha scritto nel messaggio
news:Xns942A7C8A78...@130.133.1.4...


 iterazione tra tutti gli item presenti?
direi che non esiste (ma potrei anche sbagliarmi), perņ č piuttosto semplice 
implementarla. 
Se per esempio t'interessa sapere se esiste gią un Item con un certo Text, puoi fare 
cosģ:
function IndexOf(const AText: string; TreeView: TTreeView): Integer;
var
  i: Integer;
begin
  Result:= -1;  //indica una condizione di errore, o che non č stato trovato
                //nulla
  with TreeView do
    for i:= 0 to Pred(Items.Count) do
      if Items[i].Text = AText then
      begin
        Result:= i;
        Break;
      end;
end;

Newsgroup: it.comp.lang.delphi
Titolo: Password database Access

  |
|  Use manually this address!!   |
|  ICQ#: 19577419                |
+--------------------------------+

...


...


Newsgroup: it.comp.lang.delphi
Titolo: FTP file .doc

Saluti a tutto il NG.
Ho questo problema: vorrei fare via codice l'ftp di un file di Word su una
cartella del mio sito web, ma tutti gli esempi che ho trovato fanno
riferimento ad un file di testo.
In particolare utilizzo la seguente routine
procedure TFormMain.bPubblicaDocClick(Sender: TObject);
var
    f: File;
    fsize: Integer;
    sitedir: string;
    filedoc: string;
begin
    if not OpenDialog1.Execute then
        Exit;
    filedoc := OpenDialog1.FileName;
    sitedir := 'pippo';    // directory del sito che esiste
    try
        if not IdFTP1.Connected then
        begin
            IdFTP1.Host := 'ftp.miosito.tip';
            IdFTP1.UserName := 'miousername';
            IdFTP1.Password := 'miapassword';
            IdFTP1.Connect;
        end;
    except
        MessageDlg('Connessione fallita', mtError, [mbOk], 0);
    end;
    if IdFTP1.Connected then
    begin
        IdFTP1.TransferType := ftBinary;
        AssignFile(f, filedoc);
        Reset(f);
        fsize := FileSize(f);
        CloseFile(f);
        IdFTP1.Allocate(fsize);
        IdFTP1.Put(filedoc, sitedir + ExtractFileName(filedoc));
    end;
end;
Quando arriva alla Reset(f) il programma si blocca (file access denied). Ho
provato anche ad impostare il tipo di file a ftASCII ma con gli stessi
risultati.
Se qualcuno ha già provato e può darmi qualche dritta gliene sarò grato per
parecchio.
Saluti (e auguri).
        Marco Bortolani
 
in...@marcobortolani.it

Ancora una volta l'help in linea mi è stato vitale: la routine di apertura
deve essere modificata come segue:
        IdFTP1.TransferType := ftBinary;
        AssignFile(ftext, filedoc);
        FileMode := 0;
        Reset(ftext);
        fsize := FileSize(ftext);
        CloseFile(ftext);
        IdFTP1.Allocate(fsize);
        IdFTP1.Put(filedoc, sitedir + ExtractFileName(filedoc));
impostando cioè l'accesso al file in sola lettura.
Saluti (e auguri) a tutti.
        Marco Bortolani
 
in...@marcobortolani.it
Newsgroup: it.comp.lang.delphi
Titolo: Windows 10

Ho avuto la malaugurata idea di accettare l'update a Windows 10 che ho 
installato e adesso ho ogni genere di problemi. Il primo è che in Delphi 
Win32 non riesco ad aprire nessun progetto.
Ricevo un lungo messaggio di errore:
'Unable to load project d:\....   progetto importato 
"C:\Windows\Microsoft.NET\..Borland.Delphi.Targets" non trovato. Verificare 
che il percorso <import> sia corretto e che il file sia presente sul 
disco...
AIUTO!! 
 
 
---
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus
 
 

 Ho avuto la malaugurata idea di accettare l'update a Windows 10
 
Ovviamente immagino che l'hai fatto DOPO aver fatto un backup/immagine 
del sistema precedente..vero?
 
Io tengo sempre un'immagine dell'ambiente di sviluppo (Python Anaconda, 
Octave, Qt 5) in un macchina virtuale (VBox): l'accendo, poi con SVN mi 
riallineo all'ultima modifica e posso ricompilare.
 
No waste of time.
 
PS: Win10 è figo, mi piace molto e dopo l'upgrade tutto lo sviluppo mi 
continua a funzionare (ho solo dovuto reinstallare i driver del 
touchpad, ho un asus 550XL).
 
 
-- 
Morde

Ho trovato la soluzione. Vedi questo link:
http://stackoverflow.com/questions/31745712/delphi-2007-x-windows-10-error-on-opening-project/31745908#31745908
 

Newsgroup: it.comp.lang.delphi
Titolo: RTF e BITMAP

Riciao, oggi mi sento molto presente :-))))
Ho una bella applicazione che permette di disegnare e stampare etichette 
prendendo i dati da database...
Tutto bello ma...
devo stampare il contenuto di campi RTF che a video tutto ok, sono riuscito a 
passare il contenuto del mio DBRichEdit attaccato al mio campo FormattedMemo in
un RichEdit semplice attraverso i MemoryStream ...
non so come passare il contenuto di un TRichEdit che mi fa l'anteprima a video
su un TBitmap in quanto 
- Il TRichEdit è sprovvisto di TCanvas
- Non posso usare la TWinControl.PaintTo perchè esce per forza su un
DeviceContext e io devo prima disegnare tutto su un TBitmap di appoggio per poi
poter memorizzare il tutto invece di stamparlo subito
- Ho provato a fotografare il contenuto a video della form che contiene
l'anteprima del RichEdit accedendo alla sua proprietà Canvas e usando il Metodo
Copyrect del TCanvas ma... viene fotografato tutto ma proprio dove si trova il
RichEdit viene un rettangolo bianco.....!!!!!!!!!!!!
Non so come fare quindi a posizionare il mio richedit sul bitmap di appoggio
che uso per stampare.. AIUTOOOOOOOOO!!!
Grazie in anticipo , ciao ragazzi !!!
-- 
Posted from  [213.82.192.70] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

"David Marcucci" ha scritto nel messaggio
| devo stampare il contenuto di campi RTF che a video tutto ok, sono
| riuscito a passare il contenuto
| del mio DBRichEdit attaccato al mio campo
| FormattedMemo in
| un RichEdit semplice attraverso i MemoryStream ...
| non so come passare il contenuto di un TRichEdit che mi fa l'anteprima a
| video su un TBitmap
Vediamo se ho capito quello che hai bisogno
e la procedura che ti posto ti puo' servire (non e' mia
ma di Peter Below - un nome, una garanzia):
Uses Richedit;
...
procedure TForm1.Button1Click(Sender: TObject);
var
  imagecanvas: TCanvas;
  fmt: TFormatRange;
begin
  imagecanvas := image1.canvas;
  with fmt do begin
    hdc:= imagecanvas.handle;
    hdcTarget:= hdc;
    // rect needs to be specified in twips (1/1440 inch) as unit
    rc:=  Rect( 0, 0,
                imagecanvas.cliprect.right * 1440 div pixelsperinch,
                imagecanvas.cliprect.bottom * 1440 div pixelsperinch
                );
    rcPage:= rc;
    chrg.cpMin := 0;
    chrg.cpMax := richedit1.GetTextLen;
  end;
  SetBkMode( imagecanvas.Handle, TRANSPARENT );
  richedit1.perform( EM_FORMATRANGE, 1, integer( @fmt ));
  // next call frees some cached data
  richedit1.perform( EM_FORMATRANGE, 0, 0 );
  image1.refresh;
  // refresh is necessary since the control only refreshes automatically
  // if a canvas method is used to change its content.
end;
Per provarla:
metti su una form un TRichedit, un TImage e un TButton, lascia i loro nomi
standard e associa l'evento al TButton. Se fa quello che ti serve,
sistemala secondo le tue esigenze.
Ciao.
ACSH
---------------------------
Why doesn't DOS ever say:
"EXCELLENT command or filename!"?

Adesso la provo ti ringrazio moltissimo ti faccio sapere ciao!!!

 wrote in message
news:9oc4n0$s6l$2...@newsreader.mailgate.org...

Newsgroup: it.comp.lang.delphi
Titolo: aiuto principiante

Ciao a tutti,
sono alle prime armi con delphi e con la programmazione ad oggetti. Come ho
già specificato in un paio i messaggi precedenti, avrei bisogno di
implementare un sistema che mi disegni dei poligoni (per ora mi bastano
quadrati) in run time, cioè in pratica una cosa tipo autocad ma molto molto
più semplice e per ora con una visuale solo dall'alto (in pianta). Solo che
ancora non ho capito bene come fare.. c'è qualcuno che gentilmente potrebbe
postarmi un codice in grado di fare ciò con i relativi passi da fare
nell'editing della form principale ? A me serve solo questo per ora, solo
per capire un po il funzionamento, poi visto l'esempio penso di riuscire a
continuare da solo...anche perchè il libro che ho acqyuistato di delphi di
marco cantù non sembra farne riferimento...
vi ringrazio
Daniele

Crea un form
metti un oggetto di classe TImage (vedi la palette)
metti la proprieta align a client.
La classe TImage ha una proprieta Picture di classe TPicture
Ora, in tpicture puoi:
caricare un file immagine
accedere a TPicture.Canvas. Vedi la classe TCanvas,
Essa cotine metodi per linee cerchi etc etc etc.
Saluti
AS
"Se è Microsoft non  funziona"
Newsgroup: it.comp.lang.delphi
Titolo: installare un pakage

ho scaricato un pakage free "4thGUILibVCLv037" e lo voglio installare.
Per delphi 7 ci sono 4 files: dclFth70.cfg,  dclFth70.dof, dclFth70.dpk, 
dclFth70.res.
Ho fatto doppio click sul file dclFth70.dpk, si è aperto delphi, è apparsa 
una finestra che mi ha chiesto se Compilare, Installare il pakage. Io ho 
cliccato su Compila, ma mi da errore, su installa ma mi da errore lo stesso.
Mi mette in evidenza questa riga:
 FthSpin in '..\Source\FthSpin.pas';
Come diavolo si fa a installare un pakage?
Ho provato anche facendo Component->Install Pakages ma quando faccio Add mi 
chiede di selezionare un file in un formato che non c'è nel mio pakage. Pare 
che non accetti il formato *.dpk. 

 Come diavolo si fa a installare un pakage?
Hai messo il percorso nei path di ricerca delle librerie ?
Tools -> Environment Options , Linguetta library , add ?
Giulio

ho inserito nella library path il percorso in cui si trovano i sorgenti: 
niente, stesso errore.
allora ci ho messo anche il percorso del pakage: idem. 

 Come diavolo si fa a installare un pakage?
è spiegato molto bene nella guida.
-- 
Alberto Salvati
A NEAPOLITAN Delphi Developer who is studying c# and .net
"Dicette 'o pappece 'nfaccia 'a noce dammi 'o tiempo che pure te spertoso"

in effetti c'è anche un pakage runtime, FthGUI70.dpk.
ho provato ad installare prima quello. Fa uguale.
sia che faccia compile che install.
Mi dice: [fatal error] FthGUI70.dpk(41): file not found FthListBox.dcu.
p.s.
posso fare subito install o devo fare prima Compile?

 è spiegato molto bene nella guida.
ho guardato la guida ma quando mi chiede di selezionare il file conenente il 
pakage mi blocco in quanto il file che ho io ha il formato *.dpk mentre lui 
accetta file solo in formato *.bpl o *.dpc. 

 p.s. posso fare subito install o devo fare prima Compile?
La procedura che devi seguire è questa: compila prima il package 
"runtime" (FthGUI70) e in seguito il package "designtime" (dclFth70.dpk) 
che probabilmente dal primo; esegui "Install" solo sul secondo, che è 
l'unico a poter essere installato nell'IDE.
Questa è la procedura corretta. Se ottieni un errore, come ad esempio 
"File not found", evidentemente i riferimenti ai file sorgente nel 
progetto del package non è corretto, oppure si fa riferimento a 
componenti esterni (e quindi alle unit corrispondenti) che non sono 
state precedentemente installate ed appartengono eventualmente ad un 
altro package, anche se non mi sembra il tuo caso.
Controlla le opzioni dei progetti dei package per verificare che non 
ricerchino i file sorgenti in percorsi assoluti errati.

Newsgroup: it.comp.lang.delphi
Titolo: Delphi, problema di stabilità di un programma multi thread

 Salve. Ho scritto un programma che gestisce connessioni in rete. Esso
interroga mediante il compomente IdHttp alcuni apparati collegati in rete.
A lungo andare il programma continua a funzionare ma ottengo degli errori
stranissimi, associati a librerie e codice esterno. Ad esempio:
1) Access violation at address .....
ntdll.dll RtlEnterCriticalSection
2) Access violation at address .....
FastMM4Messages.pas (Dubito che questa libreria sia bacata. Errori di
access violation comparivano comunque anche senza usare questa libreria)
3) Access violation at address ...
TIdComponent BeginWork
Non so piů cosa andare a controllare, voi che mi potete consigliare?
--- posted by geoForum on 
http://www.delphiedintorni.it

 --- posted by geoForum onhttp://
www.delphiedintorni.it

 Non so più cosa andare a controllare, voi che mi potete consigliare?
In questa situazione critica ti conviene annegare nel codice dei log 
piazzati strategicamente in modo da avere un flusso chiaro dei vari 
thread.
L'unico modo per sapere cosa succede all'interno di un thread è quello 
di tracciare il suo comportamento tramite tracing.
Si parte dall'outputdebustring per arrivare a librerie ad hoc 
espressamente dedicate a qeusto tipo di diagnosi critiche.
Cerca delphi +tracing, +logging.. su torry o google.
-- 
Morde

 Non so più cosa andare a controllare, voi che mi potete consigliare?
Prova a postare un pò di codice e a descrivere meglio il problema e la
soluzione che hai trovato nella costruzione dei thread.
E' abbastanza difficile che possano esserci dei problemi in quelle
librerie, quanto piuttosto la stessa natura volatile dei thread che,
come dice Morde, ti portano ad un difficile debug.
Generalmente, violazioni di accesso di questo genere avvengono per la
distruzione prematura del thread ed il codice di ritorno solleva
l'eccezione di AV
Antonio

Newsgroup: it.comp.lang.delphi
Titolo: dichiarazione di una matrice come costante.

Ciao a tutti.
recentemente ho scoperto che si possono dichiarare gli array come
costanti e specificare i valori nel momento della dichiarazione ad
esempio
const
cArry: array[0..3] of string = ('ciao1',
    'ciao2',
    'ciao3',
    'ciao4');
Visto che la cosa la trovo molto utlie e ordinata, mi chiedevo se la
stessa cosa si potesse fare per le matrici, perň non capisco come si
fanno a specificare i valori che la matrice deve contenere... qualcuno
saprebbe illuminarmi :)
Graize

 saprebbe illuminarmi :)
 cArry: array[0..3, 0..1] of string = (
   ('ciao1', '1'),
    ('ciao2', '2'),
    ('ciao3', '3'),
    ('ciao4', '4')
    );
--
Jax
====
Non c'č rimedio per il sesso, se non ancora piů sesso.
Newsgroup: it.comp.lang.delphi
Titolo: AprireChiave

Salute a Tutti
Oh fatto un prog che mi dice i minuti che sono in connectione con delphi 2,
e adesso mi sono messo con delphi5.
Ma cio un piccolo problema non riesco piu a aprire la chiave di connetione
Io scrivo
RegOpenKey(HKEY_LOCAL_MACHINE,'System\CurrentControlSet\Services\RemoteAcces
s',phkResult);
mi mette che la chiave c'é un errore, ma non trovo la risposta nel aiuto di
delphi5.
Che con delphi 2 funzionavabene;
Grazzie a tuuti

 [...]
usi winXP? win2000? NT? win98? win95? win3.1? dosshell?
se con delphi2 non ti dava errore è perche' probabilmente, visto che con
delphi 2 correva l'anno 1996-97, hai cambiato SO e sei passato a win2000...
che diritti di login hai? HKEY_LOCAL_MACHINE ha bisogno di diritti di
administrator.
prova con regedit, vai nella chiave e vedi cosa ti dice...
_____________________________
mente_libera
"where no man has gone before"
mente_li...@yahoo.it

Newsgroup: it.comp.lang.delphi
Titolo: POP3 con le Indy

Possibile che il componente Indy90 POP3 si blocchino alcune mail in
formato html?
Gianluca
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Gianluca, mi sembra strano chiedere proprio a te che kakkio vuol dire "si
blocchino alcune mail", di che tipo sono queste "alcune mail" etc etc etc
Bye
A

Newsgroup: it.comp.lang.delphi
Titolo: Delete di un record?

Come si fa?
Non sembri esistere la delete di un record di una tebella. So benissimo di
sbagliarmi ma come si fa?
Non posso mica usare SQL per questo?
Grazie.
Davide

 wrote in message
8dn1r0$mg8$2...@nslave2.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: icone

Salve!!
come si fa a cambiare l'icona di un exe creato in delphi? lo si fa
dall'ambiente o in un secondo momento?
grazie
Alex

Alex
	Ciao
	MassimoB
 
---------------------------
http://www.massimobeschi.it/


http://www.massimobeschi.it/
Ciao
Alex

Newsgroup: it.comp.lang.delphi
Titolo: Duplicati in tabelle

Ho la necessiata di riempire un dblookupcombo con i dati di una tabella, ma
vorrei che i campi duplicati non venissero visualizzati.Qualcuno sa
sugerirmi un modo per farlo?

>vorrei che i campi duplicati non venissero visualizzati.
Non ho capito.
Saluti
AS
"Se è Microsoft non funziona"


CRedo tu debba usare una query SQL con:
SELECT DISTICT * FORM etc etc.....
Robin

Newsgroup: it.comp.lang.delphi
Titolo: Form che non si muove

Salve a tutti.
La mia applicazione è formata da un FORM main e da tanti Form Child.
Fin qui nessun problema.
Quando lo faccio partire parte la form madre e poi in base alla scelta 
dell'utente parte la form figlia.
La form figlia in questo momento la faccio apparire al centro della form 
madre, però dovrei impostare qualcosa che non la faccia spostare.
E' possibile impostare tale proprietà ?
Il problema si viene a creare perchè come è impostata graficamente la form 
principale se sposto la form figlia  non ho + modo di riprenderla. 

 E' possibile impostare tale proprietà ?
"Torry Delphi's Pages"... se non ci fosse... ;-)
http://www.swissdelphicenter.ch/torry/showcode.php?id=1069
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 ha scritto nel messaggio 
news:44f7eda7$1...@x-privat.org...


 comunque una proprietà nella form non esiste vero ?
Direi di no. :-|

Newsgroup: it.comp.lang.delphi
Titolo: Incolonnare testo TRichEdit

salve
Devo caricare un trichedit con degli item, ognuno dei quali è composto da 3
campi (codice articolo,descrizione,quantità), rappresentanti un ordine
articoli.
Vorrei incolonnare i 3 campi o a limite giustificare il tutto.
Non posso usare un TStringGrid xkè poi devo spedire l'ordine via mail(non sò
ancora con quale formato..).
Ho provato a costruirmi una funzione che riempie di spazi le varie voci ma
l'effetto visivo non è quello sperato.
Come posso risolvere?
Grazie
Andrea

 articoli. [cut]
Ciao,
io riempirei/costruirei semplici tabelle html. Dato che devi inviare il
tutto per email potresti usare poi un content-type "text/html".
Se non conosci già la struttura di una tabella, basta guardare un po' di
pagine html, le trovi dappertutto, per capire il gioco.
Ciao
Giuseppe

 > articoli. [cut]
Se usi un fixed-font tipo Courier e ti formatti le colonne
dovresti riuscire ad avere l'effetto sperato.
function FormattaStringa(s:string; Lunghezza:Integer):String;
var i:Integer;
    sBuffer:String;
//Rende la stringa di Lunghezza caratteri per allineare la colonna
begin
  sBuffer := s;
  for i:= length(s) to Lunghezza do
        sBuffer := sBuffer + ' ';
  result := sBuffer;
end;
Hope this help
          miyomo

 ha scritto nel messaggio
news:QIKDb.3879$0w.1...@news2.tin.it...

Grazie mille
era proprio quello che avevo fatto, purtroppo con un altro font e quindi non
si allineava e non capivo...
Ciao

 Come posso risolvere?
a) Non usando il TRichEdit (ma ad esempio un ListView)
b) Impostando opportunamente le tabulazioni (v. sotto)
{\rtf1\ansi\ansicpg1252\deff0\deflang1040{\fonttbl{\f0\fswiss\fcharset0
Arial;}}
\viewkind4\uc1\pard\tx568\tx1988\tx3976\b\f0\fs24\tab Campo1\tab
Campo2\tab Campo3
\b0\par
\fs20\tab 120\tab 1054\tab Descrizione\par
\pard\par
}
Saluti
Paolo Arosio
-- 
"La dimostrazione dell'esistenza di specie intelligenti nell'universo
 e' che non ci vengono a trovare"
Newsgroup: it.comp.lang.delphi
Titolo: *.mdb VS *.dbf

Ho commissionato un programma per la gestione simultanea di un DB per
immettere dati nell'ordine di 60.000 anagrafiche clienti con una media di 3
interventi/manutenzioni annue da "agganciare" ad ogni cliente.
Mi hanno prospettato un programma da creare con Delphi che usa le query
dirette ad un *.mdb gestito da un M$ sql server (se non erro quando si usa
sql l'estensione cambia in *.md?).
Essendo certificati M$ abbiamo tutte le licenze possibili dei loro prodotti
compreso quindi M$ sql server oltre alle varie licenze di s.o. e su ogni
client mi hanno detto che devo avere installato access; ho provato a buttar
li' una richiesta di *.dbf ma... mi è stato detto che su ogni client
dovrebbe girare bde (da acquistare quindi...) oltre a sentire in giro
opinioni discordanti sull'uso di tale db.
Ogni consiglio è ben accetto anche perchè ancora il progetto è in fase molto
iniziale !
GbMax

Dove ti trovi? Se sei in Toscana........ ho una tecnologia simpatica che
potrebbe fare al caso tuo.....
Ciao

 potrebbe fare al caso tuo.....
Interessante... una tecnologia che funziona solo in Toscana... adesso mi hai
incuriosito...
Ciao,
   Luca

No :))) non funziona solo in Toscana :PPPP
E' che la abbiamo sviluppata con un team di Toscani in Toscana e fargliela
conoscere e utilizzare sarebbe stato senz'altro + semplice se lui fosse in
Toscana.
Miiii che pignoooolo :))))
CIAOUX

 opinioni discordanti sull'uso di tale db.
Non mi sembra una buona motivazione non utilizzare *.dbf solo perchè è
necessario installare il DBE, che oltretutto è GRATUITO e distribuito da
Borland insieme a Delphi.
Semplicemente non è consigliabile perchè le performance degradano
notevolmente sia in una rete, sia con una certa mole di dati.
Gianluca.

 GbMax
Ciao, Antò.

Newsgroup: it.comp.lang.delphi
Titolo: Microsoft lancia OPA su Yahoo

..finalmente si e' accorta che il fututo e' web.......
quando capira' che non sara' dotnet ?????
...pesrto...presto....
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!
HAAHAHAHAHAH!!!



TROLL!!!
-- 
Morde

 TROLL!!!
per dotnet ? o per l'opa ?
l'opa e' vera  : 45 milioni/rdi di dollari

 per dotnet ? o per l'opa ?
Per l'OT totalmente OT... ;-)
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Newsgroup: it.comp.lang.delphi
Titolo: show/hide all icons on desktop in delphi applicaton.

Hello.
 On Desktop , When I click mouse right Button ,  I can see "Active
DeskTop -> Show desktop Icon".
  Check sign with Show desktop Icon  ==> show all icons on desktop.
  deselect "Show Desttop icons" ==> hide all icons on desktop.
   I'd like to make this kind of program by delphi. just show/hide all icons
on desktop by in my application.
   Where Should I start?

 all icons on desktop by in my application.
I don't know, but pay attention to the fact that this option is available
only when using Web Active Desktop, and only a few users activate it.
Anyway, this is IT.comp.lang.delphi.
--
Jax
====
Eletti sono coloro per i quali le cose belle non hanno altro
significato che di pura bellezza. (Wilde)

"rambo88" nel precedente post ha scritto:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/programmersguide/shell_adv/activedesktop.asp
	Ciao
	MassimoB
 
---------------------------
http:\\
www.massimobeschi.it

 ha scritto nel messaggio
news:ceabmu$ct3$1...@news.hananet.net...


Newsgroup: it.comp.lang.delphi
Titolo: Help! Bottoni di testo e grafici in Delphi...

Scusate, ma come faccio a scrivere un testo su un bottone in più righe?
Ringrazio anticipatamente anche solo a chi fa finta di pensare a una
soluzione! ;-)
Paolo

 wrote:

Style owner draw e lo disegni tu a mano :)
-------------------------------------------------
Kirys <Remove DELTHIS from the address to reply>
 /|// /____/ Kirys Tech 2000: 
http://www.kt2k.com
/_|\\  // 2000

Newsgroup: it.comp.lang.delphi
Titolo: [D7] + Fast Report 3.18

Qualcuno sa indicarmi perchè la funzione 
[FormatFloat(('###,##0.000'),[[Sum([JDSMOV."VERDE"])])] 
(Formatta la Somma di un campo con 3 decimali)
in Free report Funziona mentre in  Fast-Report non Funziona?
 
Sapete indicarmi se c'e' qualcaosa di analogo?
Grazie
--- posted by geoForum on 
http://www.delphiedintorni.it

 Sapete indicarmi se c'e' qualcaosa di analogo?
Seleziona il memo in cui andrà stampata la somma, premi F11 e guardati 
la proprietà "displayformat" ed imposta numero, poi guarda questa 
proprietà "displayformat.formatstr"
Ciao
Gianni


Ok cosi funziona.
Pero' io vorrei passare il nr di decimali atraverso una variabile, ed in
questo modo non funzia.
Sull'evento beforPrint del memo ho inserito :
       TotPar.DisplayFormat.kind := fkNumeric;
       TotPar.DisplayFormat.FormatStr := %2.2n '%2.' + <dec> + 'n';
dove <dec> e' il valore dei deciamli che passo 
Altri suggerimenti?
grazie



Grazie 
Gianni Ho risolto!!!
Ciao

Newsgroup: it.comp.lang.delphi
Titolo: Selezionare un componente tramite codice

Vorrei sapere se e come si può selezionare un componente da codice. Mi 
spiego meglio: con il tab (a run-time) posso selezionare i vari 
componenti, ho la necessità di farlo alla pressione di un pulsante.
In pratica ho il pulsante "reset" che mi azzera tutti i valori immessi (e 
qui non ci sono problemi) e mi dovrebbe portare il cursore su una 
combobox...
--- posted by geoForum on 
http://www.delphiedintorni.it

 su una combobox...
Dai un'occhiata al metodo SetFocus di TWinControl.
guastatore

 su una combobox...
combobox.setfocus ?
Giulio 

Giulio
Ottimo consiglio!
setfocus è quello che cercavo
Caio
Daniele



Mi permetto di aggiungere una cosa al consiglio più che corretto, io
ho l'abitudine di utilizzare per settare il focus di un componente
l'istruzione seguente:
ActiveControl:=<nome_componente>;
tipo ad esempio:
ActiveControl:=edtNome;  // edtNome è un TEdit
Il vantaggio rispetto al sistema:
edtNome.SetFocus;
è che se per qualche motivo il componente non può ricevere il focus
non si genera un eccezione.
Ciao
Alf

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

Mostro un  pannello con tanti edit con enabled=false per evitare problemi 
con l'utente che ha un pannello analogo per l'editing degli stessi dati. 
Per� i caratteri negli edit sono a malapena leggibili!
Come rimediare ? 


Se invece di enabled, ReadOnly := true  ?
Andrea

 wrote:

Soluzione piu' pulita: derivi il componente Edit in modo che la
visualizzazione
del testo disabilitato usi un colore piu' visibile. Oppure cerchi un
componente
che faccia gia' questo lavoro e lo installi.
Soluzione meno pulita: lasci Enabled=True ma rendi gli edit non
modificabili
ReadOnly=True e TabStop = False, magari mettendo anche Color=clBtnFace
in modo
che sembrino disabilitati.
ciao
Giacomo

 ha scritto nel 
messaggio 
news:0fa2d12f-d008-4842...@q11g2000yqi.googlegroups.com...


 questo suo comportamento ?
Esattamente. Dunque, la propriet� Enabled ha un setter method virtuale
nella sezione protected:
//questa � la sua dichiarazione
procedure SetEnabled(Value: Boolean); virtual;
//questa � la sua implementazione
procedure TControl.SetEnabled(Value: Boolean);
begin
  if FEnabled <> Value
  then begin
    FEnabled := Value;
    Perform(CM_ENABLEDCHANGED, 0, 0);
  end;
end;
Dopo averlo disattivato invia a s� stesso un messaggio CM_ENABLEDCHANGED
il quale metodo chiama Invalidate.
// Implementazione di CMEnabledChanged
procedure TControl.CMEnabledChanged(var Message: TLMEssage);
begin
  Invalidate;
end;
Invalidate � ancora un metodo virtuale che a sua volta ne chiama uno non
virtuale che esegue il compito. Potresti fare l'override del metodo
Invalidate del tuo nuovo controllo evitando di chiamare inherited,
altrimenti ti esegue la stessa implementazione che non vuoi e ti
modifichi il carattere come ti pare. Oppure, chiami inherited se non
capisci il codice che c'� sotto, e subito dopo cambi il carattere, il
font, la visibilit� ecc..
Antonio
Newsgroup: it.comp.lang.delphi
Titolo: TadoQuery e ordinamento

In una TadoQuery su tabelle Access ho la seguente sql che da errore
sconosciuto:
'Select * From Tabella Order by Cast(Inventario As Long)'
dove Inventario purtroppo e' un integer convertito in stringa, quindi di
tipo String.
Scusate l'OT ma ho cercato invano senza trovare il modo di ordinare la
Select come se Inventario fosse un Integer.
Grazie, Giorgio

 'Select * From Tabella Order by Cast(Inventario As Long)'
In effetti sarebbe una domanda piu' adatta a it.comp.software.database..
Direi che il tuo problema e' che JET non digerisce il cast e devi usare
qualche altra funzione per convertire i dati.
 > Scusate l'OT ma ho cercato invano senza trovare il modo di ordinare la
 > Select come se Inventario fosse un Integer.
Hai provato su google con "access convert string to integer"?
ciao
Giacomo

 Giacomo
Ho provato con simili richieste ma ottengo risultati validi per VB a che in 
Delphi danno errore, Grazie cmq 

 ha scritto nel 
messaggio news:XfIOk.93808$Ca.2...@twister2.libero.it...

Si deve usare la funzione VB.
Order By CInt(N_INVENT),
Giorgio

Newsgroup: it.comp.lang.delphi
Titolo: Stampare etichette !!

Ciao a tutti,
        esiste qualche componente per la stampa di etichette ????
Grazie di tutto
Daniele 

 ha scritto nel messaggio news:46e94f7a$0$17941$4faf...@reader1.news.tin.it...

Si, QuickReport, che stai già usando
e ..... naturalmente il manuale d'uso o l'help in linea  !
Ciao
C. 

 
GmPrintSuite.
Prego,
MM

 GmPrintSuite.
grazie per la segnalazione.
Ho provato a collegarmi alla home page.... ma nulla di fatto, sai per caso 
se l'autore ha fatto un sito dedicato ??
Grazie
Ciao, Daniele 

 e ..... naturalmente il manuale d'uso o l'help in linea  !
Ho solo il quickreport fornito con delphi 6.0 ovvero la versione 3.0 non 
PRO, qindi senza mailinglabel.
Qualche altro suggerimento??
Grazie
Ciao
Daniele

 
Io lo uso da un po' e sinceramente l'avevo perso un po' di vista.
Da quello che ho capito cercando un po' in rete ora il pacchetto è 
diventato freeware, quindi non dovresti avere problemi a recuperarlo.
Ciao,
MM

 diventato freeware, quindi non dovresti avere problemi a recuperarlo.
Trovato e prelevato, pero' mancano gli esempi su come usarlo correttamente.
Se hai fatto un lavoro che stampa etichette e non e' riservato lo puoi 
mandare ??? Se invece hai la documentazione che in origine era compresa nel 
file .zip non la rifiuto :-)))
Grazie e ciao
Daniele