mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: File di testo

Salve a tutti,
avrei bisogno di un aiuto/consiglio. Partendo dalla lettura di un file 
di testo A, devo creare un file di testo B sostituendo i primi 40 
caratteri di ogni pagina (che sarebbero un'intestazione...) con spazi 
vuoti. Il problema e' che spesso non mi legge i caratteri che terminano 
la riga, ossia chr(13)+chr(10), o mi legge addirittura male l'intera 
riga. Ho provato con la funzione ReadLN che mi legge tutta la riga, 
senza risultato ed ora anche leggendo carattere per carattere con Read, 
ho lo stesso esito. Ovviamente non sono un esperto di Delphi (provengo 
dal Clipper...) e avrei bisogno di un aiuto.
Da notare che non sono pero' files di testo puri, ma file .prn con 
terminatori Ascii. Il mio codice e' questo:
var
   FileIN, FileOUT: TextFile;
   sText: AnsiString;
   cLetter: char;
   nLinePAG: integer;
begin
   nLinePAG := 1;
   try
     AssignFile(FileIN, 'source.prn');
     AssignFile(FileOUT, 'target.prn');
     Reset(FileIN);
     ReWrite(FileOUT);
     // Leggo tutto il file di partenza
     while not Eof(FileIN) do
     begin
       sText := '';
       // Leggo carattere per carattere
       repeat
         Read(FileIN, cLetter);
         sText := sText + cLetter;
       until Eoln(FileIN);
       // Cancello l'intestazione
       if (nLinePAG > 1) and (nLinePAG < 5) then
         sText := StuffString(sText, 1, 40, '                      ');
       // Cambio pagina (chr(12))
       if AnsiPos(Chr(12), sText) <> 0 then
         nLinePAG := 1
       else
         Inc(nLinePAG);
       Write(FileOUT, sText);
     end;
   finally
     // Commit del file di destinazione
     Flush(FileOUT);
     // Chiudo i files
     CloseFile(FileIN);
     CloseFile(FileOUT);
   end;
end;

 ha scritto nel messaggio
news:ev2hjp$2bv$1...@newsreader1.mclink.it...


 terminatori Ascii. Il mio codice e' questo:
Potresti utilizzzare i TMemoryStream ed analizzare carattere per carattere, 
oppure anche anche i TFileStream,
Giorgio
Newsgroup: it.comp.lang.delphi
Titolo: [D6] I file del Help

ciao,
di recente ho installato alcuni componenti e librerie TurboPower e fin qui
tutto bene,
vorrei chiedrvi come fare per installare correttamente i file del help *.HLP
non so se è possibile, ma mi piacerebbe selezionare un componente e poi
premere il tasto F1 per visualizzare l'help, un po' come avviene per i
normali componenti di delphi.
ho provato a mettere i file *.hlp nella directory
C:\Programmi\Borland\Delphi6\Help (ci ho provato) ma non funziona.
allora o cercato nel menu delphi [Enviroment Options]->[Enviroment
Variables] qualcosa riguardante i file HLP ma non ho trovato niete,
qualcuno sa dirmi come fare o se è possibile?
grazie
Roberto
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.537 / Virus Database: 332 - Release Date: 06/11/2003

 vorrei chiedrvi come fare per installare correttamente i file del help
*.HLP
Dall'IDE di D6 selezione la voce Customize del menu Help, ti si apre
l'OpenHelp da cui tramite il menu Edit | Add Files... opui aggiungere i
files di help che vuoi.


Molte grazie!
ciao
roberto
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.544 / Virus Database: 338 - Release Date: 25/11/2003

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 7 Professional e InstallShield

Qualcuno saprebbe dirmi se in delphi 7 Professional è incluso InstallShield
Express e quale versione??
Grazie in anticipo
Giorgio

 Express e quale versione??
Ciao io ho D7 pro e ci ho trovato la seg. versione di IS (che in effetti non
uso quasi mai, francamente mi trovo molto meglio con Inno Setup :-)
InstallSheiled Borland Limited Edition
version 3.5 service pack 4
Per confronti fra le versioni
http://www.installshield.com/products/express/features/le_compare.asp
un saluto
Newsgroup: it.comp.lang.delphi
Titolo: Disegnare albero

 
          ciao a tutti,
sto facendo un programma il cui risultato finale è il disegno di un albero.
E' possibile fare a programma un qualcosa di simile a quello che fa Esplora
risorse???
Per intenderci, vorrei emettere i "Padri" con di fianco un segno "+" se
hanno figli. Se l'utente clicca sul "+" esplodere i "figli".
E' possibile fare qualcosa del genere o devo pensare ad altre strade?
Grazie, Mario
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

risorse???
Vai nella pagina Win32 della component palette!!!! c'è il componente 
TreeView scoprirai un nuovo mondo!!!!!!!! :-)
Bye!
--- posted by geoForum on 
http://www.delphiedintorni.it

 risorse???
Esiste il componente TTreeView.  Se vuoi qualcosa di più sofisticato
guarda l'ottimo TVirtualTreeView (
http://www.soft-gems.net/
).
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Bye!
Sai consigliarmi qualche link dove posso capire come si utilizza?


> Sai consigliarmi qualche link dove posso capire come si utilizza?
La cosa migliore per te è l'help di Delphi! è chiarissimo!
prova a mettere il componente sulla form e fai doppio click ti fa 
inserire a designtime gli item padre e figlio!!!
Se devi inserire items a runtime...allora l'help di Delphi ti darà 
sicuramente una mano!
bye!


 sicuramente una mano!
E' proprio quello che devo fare, ma non ho l'help in quanto uso Lazarus. Ho
trovato qualcosa stamattina in rete e per il momento sono riuscito ad
inserire il primo livello dell'alberatura. Ora sto cercando di capire come
si fa a "sprofondare" nei sottolivelli. La parte complicata sembra quella di
capire qual'è il padre a cui attaccare il figlio. Spero di riuscirci !!!!
P.S. Grazie comunque per l'aiuto


 riuscirci !!!!
Non ho mai usato Lazarus ma x inserire un item figlio in Delphi si fa 
cosě :
TreeView.Items.AddChild( TreeView.Selected, 'Testo del nuovo Item' );
Cioč per l'item selezionato ti inserisce un item figlio col testo 
indicato nel secondo parametro.
Passo la palla a chi conosce Lazarus!!!


 Passo la palla a chi conosce Lazarus!!!
L'istruzione č la stessa. Il problema era che il mio programma, per fare
l'inserimento, non interagisce con l'utente, quindi dovevo selezionare a
programma il Padre per potergli collegare il Figlio e non capivo come
farlo..
Ora ci sono riuscito anche se in una maniera un po' macchinosa.
Grazie ancora per l'aiuto, Mario


una richiesta, anzi due:
vorrei visualizzare in una shomessage il nome del figlio selezionato;
come faccio a sapere se un nodo esiste o no?
grazie a chi mi aiuterà!!!
"Andrea Laforgia" <z...@xx.xx> ha scritto nel messaggio 
news:d5ngim$fko$1...@news.newsland.it...

Newsgroup: it.comp.lang.delphi
Titolo: Componente per le connessioni seriali RS232 funzionante con D2009

Ciao a tutti,
Sto provando Embarcadero, e devo dire che sono abbastanza ben impressionato.
Ho un problema, ho sempre usato un componente per gestire la comunicazione con la connessione seriale.
Con D2009 sembra che questo componente NON funzioni più, si compila ed installa ma apparentemente NON funziona.
Qualcuno può suggerire alternative o se se la sente "riparare" il componente in questione ?
Da qui è possibile scaricarlo.
http://www.gianlucavivenzi.com/download/cdd4.zip
Grazie..
Gian

 installa ma apparentemente NON funziona.
Che cosa succede quando lo utilizzi? Definisci "non funziona"... :-)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 
Ciao Marco.
Il componente espone un evento, sulla ricezione dei dati.
Non si attiva mai, nemmeno quando i dati "dovrebbero" essere arrivati.
La medesima applicazione compilata con D2007 funziona, con D2009...no.
Giusto per essere sicuro, dato che sull' onrecieve effettuo del parsing sul dato ho commentato tutto e messo solo un 
memodebug.lines.add('datoricevuto');
Ma niente...è morto.
Ciao e grazie dell'interessamento.

Newsgroup: it.comp.lang.delphi
Titolo: Sintesi vocale

Qualcuno conosce qualche componenete o dll che esegua la sintesi vocale
(cioè io gli do un testo (es. una stringa) e questo mi fa il parlato)?

 ha scritto nel messaggio
news:7gny6.14174$Oz4.3...@news2.tin.it...



Ti serve l'sdk della Microsoft (cerca su msdn speach sdk) e un engine.
Io ho provato digalo -  
http://www.digalo.com
E.

 (cioè io gli do un testo (es. una stringa) e questo mi fa il parlato)?
se voui c'e' anche MS Agent, che oltre a parlare di esce un omino tipo
l'assitente di office ;)
ovviamante sul sito di microsoft
Ciao,
Alan Solo

 Io ho provato digalo -  
http://www.digalo.com
non funziona il link, e' corretto?
ps: conosci(ete) anche un text recognition in italiano?
Ciao e grazie,
Alan Solo

ps: conosci(ete) anche un text recognition in italiano?
Se vai sul sito della Microsoft e cerchi TTS o speech engines ti danno
un elenco di produttori di engine. Quello della digalo era il piú
economico e soprattutto ti danno una licenza developer free. Altri
nomi sono: L&H oppure Elan (non ho gli URL).
E.

nomi sono: L&H oppure Elan (non ho gli URL).
Quello MS stesso credo che si basi su tecnologia Lernout & Hauspie.
Io ho utilizzato l'sdk di questi ultimi, di cui, credo, esista una
versione free.
Newsgroup: it.comp.lang.delphi
Titolo: MySQL e Delphi

Ho comprato il libro dell'Apogeo "MySQL Guida Completa" per imparare
a gestire MySQL per utilizzarlo con Delhi.
Nel CD allegato c'è anche il programma stesso sia per Linux che per Windows.
Io ho Windows 2000, ma l'inizio non è stato dei migliori.
Ho seguito le istruzioni del libro, ho installato il software, ma
non sono nemmeno riuscito a farlo partire.
Qualcuno potrebbe aiutarmi e dirmi come fare per far partire il tutto ?
Quali sono le operazioni iniziali ?
Ciao e grazie a tutti.
Enrico

 Quali sono le operazioni iniziali ?
1) collegati al sito 
http://www.firepages.com.au/phpdev4.htm
 e scarica il
pacchetto con mysql (gia configurato per win2000)
2) Quando lo hai installato lo lanci e vai all'indirizzo
http://localhost/phpmyadmin/index.php
 , ti verrà mostrata una pagina di
amministrazione per mysql con la quale amministrare tabelle e database
3) Se hai Delphi 6 hai gia i componenti giusti, altrimenti collegati al sito
http://zeoslib.org/
 e scaricati i componenti per delphi, in alternativa vai
sul sito 
http://www.mysql.com/downloads/index.html
 e scaricati i driver ODBC
per windows
Ciao
Gianni Giusti

Ho scaricato il pacchetto dal sito come mi hai indicato per la
configurazione Windows 2000, ma non riesco ad
aprire l'indirizzo 
http://localhost/phpmyadmin/index.php
 dove dovrebbe
esserci mostrata la pagina di amministrazione per
mysql.
Non ho capito se amministro i database da remoto o se posso farlo dalla mia
macchina ?
Ho provato a lanciare il file phpdev_start.bat che dovrebbe tra le cose far
partire MySQL.
Parte la finestra dos ed IE e si ferma alla partenza di Aphace.
Cosa dovrei fare ?
Io ho Delphi 6 quindi credo che la cosa migliore con MySQL, se riesco a
farlo partire, sia usare dbExpress ?

Io ho installato winMysqladmini 1.0 e funziona perfettamente. Cercalo
o nella directory bin di Mysql o sul sito. Altrimenti scrivimi che te
lo mando. E' un tool freeware che gestisce il servizio e i parametri
per farlo funzonare in ambiente win


Saluti
Andrea
----------------------------------------------
<< Dubito, quindi potrei essere >>
-----------------------------------------------

 per farlo funzonare in ambiente win
Sono riuscito a trovare WinSQLAdmin della Artronic e MySQLWinAdmn.
Entrambi vogliono alcuni parametri per connettersi e sono :
Friendly Name
Host Name
Login
Port : 3306
Password
Cosa devo mettere per connettermi ?
Qual'č il piů valido dei due o ce ne sono altri migliori ?

 farlo partire, sia usare dbExpress ?
......immagino di sě
Se Apache non ti interessa, modifica il file batch di partenza
(phpdev_start.bat ) e scaricati un client per windows (io ti consiglio
http://zeoslib.org/zeos_zia_main.php
     -  "ZED 1.1.4.zip")
Ciao
Gianni Giusti
Newsgroup: it.comp.lang.delphi
Titolo: SQL... somma di varie righe

Non sono molto bravo con SQL (anzi per nulla dicendo la verità).
Ho un database di documenti emessi fatture/preventivi ecc. ogni riga è tipo:
SIGLA-NUMDOC-CODART-PREZZO
FT-1-PIPPO-12,2
FT-1-PLUTO-13,5
FT-2-PAPERINO-5,2
e così vià.
Sono riuscito a fare una select per mostrarmi un report con sigla documento
e numero documento ma come fare a sommare delle varie righe ?
Insomma il report dovrebbe essere tipo:
SIGLA-NUMDOC-TOTALE
FT-1-25,7
FT-2-5,2
ecc.
Grazie a chiunque mi dà una mano !


wrote:

select distinct SIGLA,NUMDOC, (select sum(PREZZO) from TableName b
where a.NUMDOC=b.NUMDOC) from TableName a
Ciao
Duilio

 FT-2-5,2
prova questa:
select sigla, numdoc, sum(Totale) from tabella group by sigla, numdoc.
Bye
AS
Newsgroup: it.comp.lang.delphi
Titolo: Help on Delphi

Sarò breve. La copia che ho in possesso del delphi 4, purtroppo, è sia
priva di help che di esempi (e spero non manchi altro). E' poco che sono
approdato a questo linguaggio ma avevo già una sufficiente esperienza di
visual basic e di pascal. Purtroppo ancora non sono riuscito a capire
come si usano alcuni controlli: che qualche anima gentile mi invii
delphi4.hlp penso sia una speranza vana, comunque mi accontenterei che
qualcuno mi spiegasse il funzionamento dei seguenti oggetti NMURL, HTML,
ClientSocket. In poche parole il programma che avevo in mente si
sarebbe anche dovuto connettere e salvare su file la pagina html
specificata, funzioni che non riesco ad implementare.Ringrazio
anticipatamente chiunque sia in grado, o meglio abbia voglia di
aiutarmi.

Description
The TNMURL component decodes URL data into a readable string, and encodes
standard strings into URL data format.
FastNet URL Encode/Decode Help
Porpietą:
Applies to
TNMURL component
Declaration
property Decode: String;
Description
The Decode property contains the decoded string, based on the encoded string
in the InputString property. If InputString is not an encoded URL, then
Decode is the same as InputString.
Scope: Public
Accessibility: RunTime, ReadOnly
FastNet URL Encode/Decode Help
***********************
Applies to
TNMURL component
Declaration
property Encode: String;
Description
The Encode property contains the URL-encoded copy of the InputString
property.
Scope: Public
Accessibility: RunTime, ReadOnly
FastNet URL Encode/Decode help
**********************
Applies to
TNMURL component
Declaration
property InputString: String;
Description
The InputString property contains either the encoded data to be decoded, or
a standard string to be encoded.
Scope: Published
Accessibility: DesignTime, RunTime
FastNet URL Encode/Decode Help
Eventi:
Applies to
TNMURL component
Declaration
property OnError: TOnErrorEvent;
Description
The OnError event is called when there is an error in the encoding or
decoding of a URL. The ErrMsg string contains the error encountered.
Called By: Reading the Encode or Decode property
FastNet URL Encode/Decode Help
*****************************
Tasks:
Purpose
The purpose of the TNMURL component is to encode strings into URL format for
HTTP transmission, and to decode URL data into readable strings.
Tasks
Using the TNMURL component is easy. Simply set the InputString property, and
then the Encode property will contain the URL encoded string, and the Decode
property will contain the decoded string. If an error occurs, then the
OnError event will be called.
FastNet URL Encode/Decode Help
George.

Porpietà:


Wow, grande!!!!!! Grazie di tutto!!!!!

Newsgroup: it.comp.lang.delphi
Titolo: Deploy Turbo Delphi  .Net

Volevo  fare il deploy di una prova fatta in Turbo Delphi .net,
ma non capisco dove trovare il "
ASP.NET
 Deployment Manager "
L'help indica:
Deploying 
ASP.NET
 Applications Developer Studio 2006 includes the 
ASP.NET
 Deployment Manager to assist you in deploying 
ASP.NET
 applications. You can use it to deploy to a remote computer by using a share or an FTP connection, or to your 
local computer.
***When you add a Deployment Manager to your project*** , an XML file (.bdsdeploy) is added to the project directory and 
a Deploy tab is added to the IDE. You provide destination and connection information on the Deploy tab and optionally 
modify the suggested list of files to copy, then the Deployment Manager copies the files to the deployment destination.
Non riesco a trovarlo, 'sto Deployment Manager...!
Grazie a chi puň aiutarmi.
GP 

 ma non capisco dove trovare il "
ASP.NET
 Deployment Manager "
Solo per edizioni Enterprise/Architect di BDS 2006. ;-)
Il deploy con "Turbo Delphi.NET" o con "BDS 2006 Professional" va 
effettuato con un altro tool o manualmente.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)


In effetti il titolo nell'help č: The Developer Studio 2006 
ASP.NET
 Deployment Manager
Sono un pň stupidini a lasciare in TurboExplorer l'hlp di D2006.
Perň č ag.gratis......
Grazie
Ciao
GP

 Sono un pò stupidini a lasciare in TurboExplorer l'hlp di D2006.
Quello è l'unico help che c'è. :-)
Presumo vi sia la stessa dicitura anche nell'help di BDS 2006 Professional.
Dovrebbe esserci un argomento della Guida in linea con cui sono 
identificati comunque gli strumenti presenti in ciascuna edizione 
specifica, oltre che nella "feature matrix", ma non posso verificarlo al 
momento. :-|


Newsgroup: it.comp.lang.delphi
Titolo: Ridurre un'applicazione ad icona

come posso fare per far si che una mia applicazione si riduca ad
icona?
se premo il trattino nella FORM PRINCIPALE va tutto ok, se premo il
trattino in una form non principale l'aplicazione si riduce, ma si
"appoggia" sopra il tasto di avvio.
Spero che abbiate capito, grazie.


Puoi fare in modo che ogni volta che provi a ridurre una qualsiasi
delle finestre dell'applicazione, venga automaticamente ridotto il
form principale.
Controlli sull'evento OnResize se lo stato della tua finestra
WindowState) è wsMinimized. Se è così assegni alla medesima proprietà
del form principale il valore wsMinimized (o usi i metodi del form per
minimizzarla).
Ciao!!!
 _-= deep inside =-_
-                              -
Newsgroup: it.comp.lang.delphi
Titolo: Riconoscimento toni DTMF

Salve a tutti,
ho una richiesta un pò strana:
Esiste un componente, o una procedura, o qualsiasi altra cosa che mi
permetta di analizzare un file audio con registrati dei toni DTMF (Tastiera
del telefono) e me li dia sotto forma di stringa o altro?
Grazie dell'aiuto,
Paolo.

 del telefono) e me li dia sotto forma di stringa o altro?
Non x sapere i fatti tuoi, ma puoi dare almeno una indicazione
di massima di quello che dovresti realizzare?
"Altro" cosa, poi?
Bye
AS
"Se è Microsoft non funziona"
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 A dir poco. :)))
Perche' ? 
L'intercettazione dei toni relativi ai tasti telefonici e'
tipica nelle applicazioni di risposta interattiva vocale.
In aiuto del nostro amico ci sono le TAPI, ma bisogna 
vedere che tipo di hardware utilizza (scheda vocale ? modem ?)
e se e' TAPI-compatibile (con tanto di TAPI Service Provider).


 e se e' TAPI-compatibile (con tanto di TAPI Service Provider).
Come lo vedo?
Grazie per l'interessamento.
Ciao ciao.
Paolo.

 Come lo vedo?
Avvio/
  Impostazioni/
    Pannello di Controllo/
      Telefonia/
        Driver di telefonia
Controlla che sia installato un TAPI Service Provider.


 Controlla che sia installato un TAPI Service Provider.
Scusa il ritardo sulla risp.:
sě, č TAPI-Compatibile... e ora?
Grazie dell'interessamento,
Paolo.
PS: Scusa il ritardo della risposta ma il lavoro pressa...

 sě, č TAPI-Compatibile... e ora?
Allora puoi utilizzare le TAPI (vedi MSDN per maggiori 
dettagli) per gestire tutta la parte telefonica (chiamare,
rispondere, catturare digits, ecc...).


 ha scritto nel messaggio
news:d82bc20c9a84e1715c3...@mygate.mailgate.org...

Newsgroup: it.comp.lang.delphi
Titolo: TITLEBAR popup menu

Ciao a tutti
Dovendo creare un'applicazione senza bordo (senza la finestra classica di
windows) ho impostato a bsNone la proprietà Borderstyle della form
principale.
Ho necessità, però, di accedere al menù popup che spunta schiacciando il
tasto destro del mouse sulla TITLEBAR.
Non avendo più la titlebar ma una semplice immagine (che mi fa da
titlebar)... come faccio??
Help!!
PluG

Si tratta di una TImage?
Un occhio agli eventi dell'immagine che ti fa da titlebar l'hai data?
Bye
A.

Si... č un componente Timage.
Ma come fare per far visualizzare il menů che mi interessa?
Devo spedire un messaggio a windows?
Se si... quale?
PluG
"Alberto Salvati" <x@x.x from office> ha scritto nel messaggio
news:anrid0$rut$1...@newsreader1.mclink.it...


ma  hai visto quali eventi possiede  TImage o no?
A.

Inoltre, hai dato un occhio alle prop di TImage?
magari verso la lettera "p"....
A.

Forse non mi sono spiegato bene...
Il mio problema è visualizzare QUEL menù popup... non uno fatto da me
Quello dove c'è ripristina, sposta, ridimensiona, riduci ad icona ecc...
(quello stesso che appare quando faccio click con il tasto destro del mouse
sulla TITLEBAR...)
Non posso farmelo da me perché ci sono alcune funzioni che non so
ricostruire (tipo il menù esteso della mia scheda video)
"Alberto Salvati" <x@x.x from office> ha scritto nel messaggio
news:ans2gg$1k6l$1...@newsreader1.mclink.it...


 ha scritto nel messaggio
news:URio9.59663$Eu.13...@twister1.libero.it...


 Il suo prototipo č il seguente:

Newsgroup: it.comp.lang.delphi
Titolo: DBGrid

Ciao a Tutti,
ho inserito in una form un componente DBGrid e vi ho inserito diversi dati
ma vorrei cambiare l'ordine di visualizzazione.
Es.: Nella prima colonna ho questi dati:
ID .. .. ..
3  .. .. ..
2  .. .. ..
1  .. .. ..
0  .. .. ..
Se volessi visualizzarli al contrario cliccando sul titolo della colonna
(in questo caso ID):
ID .. .. ..
0  .. .. ..
1  .. .. ..
2  .. .. ..
come devo fare?
Grazie.

Mljet Dubrovnik wrote:

Un po' lungo da spiegare.
Nell'evento OnMouseDown devi determinare dove viene cliccato il mouse 
(si dovrebbe poter fare senza derivare il componente, ma non ne sono 
sicuro).
Nel DataSet da cui stai prendendo i dati devi cambiare l'ordinamento di 
conseguenza (devi aver pronto un ORDER BY per ogni evenienza se usi una 
TQuery).
Tra una modifica e l'altra dell'ordinamento devi bloccare 
l'aggiornamento dei componenti a video dipendenti dal dataset, 
altrimenti vedi sparire i dati, un po' di sfarfallamenti, e comparire i 
dati nell'altro ordine.
Ciao.
Mimmo.


prego

 come devo fare?
vedi l'evento OnTitleClick della dbbgrid.
Se usi una query dovresti avere + sintassi sql, una per ogni colonna
che vuoi usare x l'ordinamento.
Bye
AS
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

> Nell'evento OnMouseDown devi determinare dove viene cliccato il mouse 
Non ti serve.
Esiste l'evento OnTitleClick.



Esatto.
E se uso un TClientDataset non devi neanche rieseguire la query. Sfrutti
IndexFieldnames e tutto ti si ordina secondo la colonna. Ad esempio:
procedure Form.GrigliaTitleButtonClick(Sender: TObject; AFieldName: string);
begin
  if FDM.Clientdataset.FieldByName(AFieldName).FieldKind in [fkData,
fkInternalCalc] then
      FDM.cdsInTimbrature.IndexFieldNames := AFieldName;
end;

 che vuoi usare x l'ordinamento.
E sperare, nel caso usi Paradox e i record sono tanti, che
non te li mostri dopo 6 giorni ;)


 Esiste l'evento OnTitleClick.
Chiedo scusa ad "io".
Ecco perchè non le usavo, ed usavo solo componenti di terze parti 
(Orpheus, ecc...): ero rimasto a D2 dove mi pare che non ci fosse...
Vabbè: incrementiamo di uno il numero delle figuraccie... ;)
Ciao.
Mimmo.
Newsgroup: it.comp.lang.delphi
Titolo: DBGrid che non scorrono col tema di XP...

Salve,
sono giorni che cerco su google senza riuscire a trovare la soluzione al mio 
problema.
dunque, premetto che programmo con delphi 7.0 su un sistema operativo di 
windows XP sp3.
Ho sviluppato diverse applicazioni e tutte risultano correttamente 
funzionanti.
Il problema e' relativo allo scorrimento delle DBGrid collegate tramite un 
datasource e una query  ad una atbella sql.
Se sul pc dove installo il mio applicativo tengo sul desktop il tema di 
windows classico tutto funziona perfettamente, se viceversa si imposta il 
tema di windows xp tutte le DBGrid smettono di funzionare correttamente, 
ovvero non scorrono piu.
Ho notato che il problema riguarda il refresh dei dati visualizzati in 
quanto spostando il puntatore con le frecce o con le scrollbar la DBGrid non 
si aggiorna, ma rimane tutto congelato con i dati visualizzati all'apertura.
Solo la cella selezionata si aggiorna col dato reale....
Non penso di essere l'unico ad avere questo problema, ma non riseco a 
risolverlo........
C'e qualcuno che e' a conoscenza di questo "bug" ed eventualmente sa come si 
puo fare per risolverlo?
Grazie...
SkyRaid
sky...@email.it

Nessuno che abbia trovato questo problema?
Non ci credo... :-(

 Non ci credo... :-(
Devi abilitare l'uso del manifesto nella tua applicazione
Hai presente l'xp manifest?
Vedi:
http://www.opensc.ws/tutorials-articles/285-make-your-delphi-applications-compatible-xp-manifest-theme-delphi-4-5-6-a.html
http://delphi.about.com/od/toppicks/tp/aatpxpthemes.htm
http://cc.embarcadero.com/Item/24021
Facci sapere
ciao
-- 
Morde

 ha scritto nel messaggio 
news:49eedf5d$1...@news.x-privat.org...


 Devo passare a DElphi 2009??? :-(
Maddï¿œi... ;-) Io programmo ancora in D5 per certi software e i soldi 
per il 2009 l'azienda non ha proprio intenzione di sborsarli, 
ovviamente.
Posta un codice minimale della tua griglia e vediamo se ricompilando 
sulla mia macchina il problema persiste.
Credo che la maggior parte di noi abbia XP SP3 installato.
Che tipo di griglie sono??
Ciao
-- 
Morde

Newsgroup: it.comp.lang.delphi
Titolo: [OT] Su Python


Saluti
Paolo Arosio

 it.comp.lang.python
Spero proprio che lo aprano quel NG.. Trovo che python sia un linguaggio
molto valido.. Speriamo bene!

Newsgroup: it.comp.lang.delphi
Titolo: Occupazione di un TDataset

Come faccio a sapere quanto occupa in un dato istante un componente 
derivato da Tdataset come Tclientdataset, Tquery, TTable, TAdoQuery ... 
etc ?
Per intenderci, sappiamo che se se apriamo una tabella o una query o un 
Clientdataset non è detto che vengano fetchati subito tutti i record.
Se utilizzo xxx.recordsize * xxx.RecordCount mi dovrebbe tornare la 
dimensione di tutta la tabella / query effettuata
in alternativa, come calcolare l'occupazione di tutta un'istanza di un 
DM e degli oggetti contenuti ?
Grazie !
(risposte sul NG o per mail togliendo "CANCELLAMI" da 
maca77CA...@libero.it
 )

InstanceSize ritorna solo la dimensione dell'istanza, la dimensione dei
dati la devi calcolare...
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.delphi
Titolo: per GHIRI - StringGRID selezione come EXCEL OK OK OK !!!

Scusa la procedura che ti avevo inviato è un ridondante alla grande.
SOTTO OK, funziona bene. CIAO !
 procedure TForm1.SGDrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var R : TRect; C : boolean;  D : TGridRect;
begin
C:=false; R:=Rect; D:=SG.Selection; SG.Canvas.Brush.Color:=SG.Color;
if ACol=D.Left     then R.left:=Rect.left+1;
if ACol=D.Right    then R.Right:=Rect.Right-1;
if ARow=D.Top      then R.Top:=Rect.Top+1;
if ARow=D.Bottom   then R.Bottom:=Rect.Bottom-1;
if (ACol<>D.Left)and(ACol<>D.Right)and(ARow<>D.Top)and(ARow<>D.Bottom) 
then
begin
SG.Canvas.Brush.Color:=SG.Color;
SG.Canvas.FillRect(R);
end;
SG.Canvas.FillRect(R);
SG.Canvas.TextOut(Rect.Left+2,Rect.Top+2,SG.Cells[ACol,ARow]);
end;
procedure TForm1.SGMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
if SG.TAG=1 then SG.Repaint;
end;
procedure TForm1.SGMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
SG.Tag:=1;
end;
procedure TForm1.SGMouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
SG.Tag:=0;
end;
--- posted by geoForum on 
http://www.delphiedintorni.it

Ancora qualche problemino con EDITING.
CMQ va bene, da mettere a posto con i controlli. facendo disegnare il 
positivo anzi che il negativo.
Ciao.


Newsgroup: it.comp.lang.delphi
Titolo: String e substring

Esiste un comando che mi sostituisca una substring con un'altra in una data
stringa considerando però la substring cercata come parola intera? Ho
provato le varie ANSIREPLACE..... ma tutte mi sostituiscono qualsiasi
sequenza trovata nella stringa, vanificando il mio prog. esempio:
stringa: 'La vita della modella'
substring da cercare: sono 'La' e  'della' e sotituire con '(F)'
con i comandi che ho provato il risultato della stringa è '(F)vita(F)mo(F)'
invece di '(F)vita(F)modella'
Grazie a tuttui e Buona Pasqua

Io non conosco 'tuttui' ma comunque buona pasqua anche a te.
Non è che cerchi il comando _Copy_ per stringhe.
Guarda sul Help on line.
Ciao
Mario
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Grazie a tuttui e Buona Pasqua
auguri anche a te
	Ciao
	MassimoB
Newsgroup: it.comp.lang.delphi
Titolo: Uso commerciale Delphi 5 Std

Sotto quali condizioni č legalmente possibile, in Italia, vendere
un'applicazione creata con Delphi 5 Standard Edition?
Grazie.
         BedBaol

La std ed e' la meno costosa delle 3 edizioni.
Se hai acquistato da Borland (o rivenditore) il paccheto con i relativi
manuali puoi vendere tutti i progammi che vuoi.
Ciao
Mario (
mari...@inwind.it
)
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio
news:Rq4Ed.383098$b5.18...@news3.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: Problem Regarding TDoCmd

Risham,
I am currently facing problem with TDoCmd class its giving me amessage
of
"Class not register" nothing like name of the class.
Can any one help me out...
Thanks

this is a italiang ng.
Write in italian, pls.
A.
Newsgroup: it.comp.lang.delphi
Titolo: Virtual Desktop RULEZ !!!!

Ciao!!
Allora... ti dico subito ke ci sono buone notizie (sembra ...)!!
La Eurobar utilizza un metodo totalmente diverso dalle altre barre
(kankari!) : infatti
è una "volgare" finestra ke però si tiene traccia di tutte le finestre
presenti sul desktop
e le sposta se queste si trovano sopra di lei (fa + o - quello ke io faccio
alle altre barre !!).
Saltando tutta la storia successiva (ci interessano i risultati, no?) :
beccati sto linkozzo !!! :
http://www.enablesoftware.com/VirtualDesktop2.1s.zip
E' una versione demo (o sw... non ho guardato) ... ma ovviamente
1) o si trova il crack/keygen
2) o si trova una pwd
3) provo a krakkarlo io (mi diletto ogni tanto!!)
4) si vede quanto costa...
Cosa fa ?
Ti permette di avere dei desktop virtuali (quanti ne vuoi!) completamente
indipendenti
nei quali puoi mettere le finestre!!
Senza ke mi sto troppo a dilungare ... skarikatelo & Check it Out !!!
P.S.: Funziona solo con barre "tipo" la PrizeWindow o la EuroBar (cioè che
non si
"installano" come la barra di explorer ... per quelle c'è il mio !!!
AHAHAH!!! )
Bene bene ... sono sicuro che sta notizia ti allieterà !!!
PPSS: Io sto per abbonarmi (... tra 2 mesi ...!) ad ADSL ... tu hai qualche
"dritta" in merito ?
Ci SSSentiamo, ciao !!!                     Davide DG

4) si vede quanto costa...
Ah- ha ! Ti dai al cracking eh  ? :)))

> Ah- ha ! Ti dai al cracking eh  ? :)))
ognitanto ... :)  approposito di questo ... non c'è per caso una sezione
dedicata a questo argomento per delphi da qualche parte ?
Ciao!!  Davide DG

dedicata a questo argomento per delphi da qualche parte ?
Umm non credo.. Anche perchè non è che un linguaggio sia molto utile per
crakkare.. penso basti un uso intensivo del SoftIce o simili :o)

MUHAMUHAHAHA... (risata vagamente satanica...:) )
questa notizia mi allieta lo spirito.. downloading.. :)
in verità la barra che mi sposta le finestre e mi taglia i menù mi aveva
letteralmente stressato...
Thanks 100000000000 della info...
--
/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
|()|===================|()|
|()|                                           |()|
|()|        .-=] ExTrEmE [=-.      |()|
|()|                                           |()|
|()|          ICQ#12987528        |()|
|()|   MailTo : 
extr...@tin.it
  |()|
|()|                                           |()|
|()|===================|()|
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/


Sbaglio o si parla di barre che "pagano"? =)
In un modo o nell'altro le freghi tutte... =P
Ciao
Daigo
Newsgroup: it.comp.lang.delphi
Titolo: Debug allocazioni di memoria

Ciao a tutti,
mi chidevo se esiste qualche tool o qualche metodologia per debuggare 
problemi di memoria.
se da qualche parte nel codice faccio un
MyObj := TMyObj.Create;
da qualche altra parte faccio un
MyObj.Free
e per ultimo (dopo il free!!)
MyObj.Member := xxx
in pratica faccio un'assegnamento su un oggetto deallocato (la cui 
memoria piu' essere quindi allocata da qualcun'alro).
Se l'oggetto e' nullo c'e' un'EAV e me ne accorgo, ma ma se punta a una 
zona di memoria valida ..... e' un vero incubo...
Seconda domanda. Delphi.NET sfruttando le proprieta' intrinseche dell 
l'infrastruttura .NET e' un po' meglio di Delphi per Win32 in questo 
aspetto specifico ?
Grazie
Ing Giuseppe "Geppo" Monteleone

la metodologia è essenzialmente il buon senso mentre il tool è il
debugger di delphi.
Gia quello della v7 ha un bel po di strumenti utili, dalla callstack
ai watch.
Prova a dare un occhio dal menu dell'ide a View-Debug windows e vedi
cosa contiene..
A.

 problemi di memoria.
Esistono diversi tool. Uno che ho usato con successo è MemCheck:
http://v.mahon.free.fr/pro/freeware/memcheck/
-- 
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: ODBC

Can I connect my Delphi 3 program with ODBC Data Base?
I'm trying by specify the database into connection but it's return a driver
error

 wrote in message
8aogb6$cou$1...@nslave1.tin.it...


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

qualcuno mi saprebbe dire se le applicazioni create con delphi 6 oltre a
esser compilate con kylix 2 vengano compilate anche con kylix 3 dato che il
kylix tre è stato sviluppato con Delphi 7 .Net?
Grazie mille.

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

Come faccio ad utilizzare i puntatori(le immagini naturalmente) da me creati
in una mia
applicazione?si possono usare anche quelli animati?
Grazie.
Neo
ICQ     :  146381266

Per aggiungere i tuoi cursori vedi TScreen.Cursors.
Per usare quelli animati nelle applicazioni vi sono vari tips
sparsi sui vari siti dedicati a delphi.
Prova a cercare ad esempio su 
delphi3000.com
Bye
AS
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Grazie Mille fuziona che č una meraviglia.
Neo
ICQ     :  146381266
Newsgroup: it.comp.lang.delphi
Titolo: MS Flight Sim

Dovrei (visto che sulla rete non ho trovato niente, no č detto che ci si 
riesca) acquisire informazioni da 2 o piů Flight Sim in rete. 
Qualscuno sa dove posso trovare materiale di know-how ???
Grazie a chiunque.
Giovanni Brambilla
AtcBrambo
--- posted by geoForum on 
http://www.delphiedintorni.it

 Qualscuno sa dove posso trovare materiale di know-how ???
E dovresti farlo con Delphi? :-O
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 E dovresti farlo con Delphi? :-O
Questo ng sta diventando progressivamente il ricettacolo di tutti i
peggiori troll dementi della rete. Buon Anno Marco e Buon Anno a tutti i
non-troll ;-)
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 non-troll ;-)
Speriamo che il 2008 porti una maggiore fantasia anche a loro... ;-)
Buon anno nuovo!
   Marco



AtcBrambo


 chiesto di valutare la fattibilità....
Più che una ricerca su Google, non saprei che dirti data la peculiarità 
del problema. Per questo motivo, credo che ti debba accontentare di 
qualsiasi informazione trovi a riguardo, anche se riferita ad altri 
linguaggi.
Ciao,
   Marco.


 Sei senza parole ?
Ecco i risultati dell'opera del troll e di chi gli dà da mangiare.
Si finisce per vedere troll dappertutto...
-- 
Jax

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

Come posso fare per decidere con che risoluzione (e quindi con che
dimensioni) un immagine bitmap deve essere salvata su file??
Grazie.

 Grazie.
La tua richiesta implica (stamattina mi sento molto vocabolario) che tu debba
ridimensionare un bitmap prima di salvarlo.
Purtroppo non è così semplice, non puoi dire ad un bitmap "rimpicciolisciti!", non lo fa
automaticamente.
Ci sono molte funzioni di "resampling" per ridimensionare un file bmp, la più semplice è
usare la funzione BitBlt, standard, veloce ma cessosa ;)
Se vuoi fare una cosa un po' più professionale, cerca "resample" su torry, troverai un
ottimo componente (o meglio, ottime funzioni) per ridimensionare le tue immagini, poi sta
a te quale funzione scegliere, ovviamente più sono veloci, peggiore è il risultato.
--
Jax
Newsgroup: it.comp.lang.delphi
Titolo: Problemino sulla visualizzazione di una Caption

Salve a chi legge
Il mio problema e che ho nel mio codice:
Procedure ButtonClick;
begin
StaticText.visible:=True;
....
Sleep(500);
StaticText.visible:=False;
end;
il problema e che della statictext che ha lo sfondo giallo e la scritta
rossa  si vede solo lo sfondo ....
ho anche provato a cambiare la statictext con una label ma addirittura non
si vede niente ...
mentre un panel fa lo stesso ... penso che il problema sia che Il programma
metta troppo poco tempo ad eseguire i puntini .... ma non so come fare a
risolverlo ...
Spero di essere stato chiaro ...
grazie in anticipo

risolverlo ...
Puoi forzare il repaint del form con il metodo Update, oppure utilizzi
Application.ProcessMessages, tutto dipende dal codice rappresentato
dai "puntini".
 
-- 
Andrea Laforgia
#exclude <windows.h>

Grazie ho risolto semplicemente forzando la reapint dello statictext subito
dopo il comando che la rende visible a true


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

Buongiorno a tutti. 
Sono un utilizzatore di Delphi3 e 4. Ho un problema di questo tipo. Devo 
trasferire il valore di una stringa TDataTimePicker in un campo di una 
tabella, ma il compilatore mi dice che sono di tipo incompatibile.
Table1Campo.AsString:=DataTimePicker1; <- dà errore
Come si può fare?
Vi ringrazio anticipatamente per la collaborazione.

 Come si puņ fare?
Prova con qualcosa di simile.
Table1Campo.AsString:=DateToStr(DateTimePicker1.Date);
Ti saluto....ciao !!
Antonio Tarolla

"Grifis":
| Table1Campo.AsString:=DataTimePicker1; <- dà errore
Table1Campo.AsDateTime:=DataTimePicker1.DateTime;
è il metodo + 'diretto',
cosi' non hai problemi di formattazione della
data (mm/gg/aaaa o gg/mm/aaaa)
Ciao,
Alan Solo

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

Come faccio a lanciare un eseguibile esterno da un programma Delphi?
Precisamente:
nella mia form, una editbox legge il nome di un file di testo
(inserito dall'utente) e questo, dopo aver premuto un bottone, desidero si
apra con il Notepad di Windows.
Con quali righe di codice posso realizzare cio'?
Se e' una cosa "troppo complessa" per spiegarla in 2 minuti,
prego lo stesso di rispondermi.
Grazie.
--
Nick

Vedi la funzione shellexecute.
Saluti.
AS


GRAZIE!!!
          Nick


La cosa piu' semplice e' usare la funzione ShellExecute della unit
winapi.
ciao
-- 
[][][][][][]      Franco Spera running linux 2.2.14     [][][][][][] 
[][][][][][] real e-mail: f(dot)spera(at)mclink(dot)it  [][][][][][]    

 ciao
Grazie!!!
          Nicolo'

Newsgroup: it.comp.lang.delphi
Titolo: D5: Come copiare i contenuti di una tabella in un'altra tabella con la stessa struttura?

Come copiare i contenuti di una tabella in un'altra tabella con la stessa
struttura?


Esiste il componente BATCHMOVE che tramite
le tre proprietą SOURCE DESTINATION e MODE
permette di fare ciņ che tu richiedi.
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.lang.delphi
Titolo: Undo su db?

Salve a tutti, ecco l'ennesimo quesito:
Ho un database paradox (costituito da più tabelle) e dei componenti
TDBCombobox, TDBEdit, ecc., ed avrei la necessità di creare una funzione
undo, o meglio, vorrei che le modifiche fossero applicate solo dopo la
pressione di un pulsante "SALVA", mentre premendo un tasto "ANNULLA" si
dovrebbero ripristinati i dati originali.
Come fare?
Ho pensato che si potrebbe operare sugli eventi BeforePost ma come memorizzo
i dati precedenti?
Utilizzo Delphi3 e Delphi5.
Ogni suggerimento sarà prezioso e perciò vi ringrazio in anticipo :-).
Silvio


Sul tasto salva devi mettere MiaTabella.Post;
e sul tasto annulla MiaTabella.Cancel;
poi dovresti controllare anche la sul close della form mettere il
MiaTabella.Cancel in modo che se chiude la form non salva le modifiche!
ciao
gabriele

 precedenti? Utilizzo Delphi3 e Delphi5.
potresti usare le transazioni:
DB.StartTransaction
DB.Commit    //"salva"
DB.Rollback  //"annulla"
non so se si puo' fare con pdox, ma penso di si'..
Ciao,
Alan Solo
Newsgroup: it.comp.lang.delphi
Titolo: procedura Centralizzata x color

Salve a tutti,
vorrei creare una procedura centralizzata che mi possa gestire il color nei 
campi della form in entrata e in uscita.
Potete suggerirmi qualcosa su come fare tale procedura ? o del codice che 
poi posso ritoccare ?
grazie e scusate. 

erediti tedit/tdbedit e crei dei componenti tuoi nei quali gestisci
OnEnter e OnExit.
A.

Potete suggerirmi qualcosa su come fare tale procedura ? o del codice 
che 
Nella Unit principale, di avvio del progetto, puoi inserire due 
procedure Public, fuori del Type di dichiarazione della Class TForm (e 
dopo il suo end;): 
procedure EntColor(var Campo: TEdit; Tipo: integer);
begin
  case Tipo of
    1: Campo.Color := clYellow;
    2: Campo.Color := clAqua;
    ...
  end;
end;
procedure UscColor(var Campo: TEdit; Tipo: integer);
begin
  case Tipo of
    1: Campo.Color := clWhite;
    2: Campo.Color := clSilver;
    ...
  end;
end;
In ogni campo TEdit (ma anche TMaskEdit, e devi cambiare i riferimenti o 
creare altrettante procedute con Campo: TMaskEdit) sul Form, clicchi sul 
metodo OnEnter e nel codice ci scrivi
procedure Edit1Enter(Sender: TObject)
begin
  EntColor(Edit1,2);
end;
procedure Edit1Exit(Sender: TObject)
begin
  UscColor(Edit1,1);
end;
con possibilità di cambiare in ogni momento i colori collegati ad un 
codice Tipo.
Ciao e divertiti.
NioBi
--- posted by geoForum on 
http://www.delphiedintorni.it

 codice Tipo.
Una via più breve e comoda è questa:
- aggiungi la unit "TypInfo" nelle uses
- dichiara due procedure nella parte principale della form:
   TForm1 = class(TForm)
     <...>
     procedure OnCustomEnter(Sender: TObject);
     procedure OnCustomExit(Sender: TObject);
   private
   public
   end;
- scrivi queste due procedure
procedure TForm1.OnCustomEnter(Sender: TObject);
var
   pp: PPropInfo;
begin
   pp := GetPropInfo(Sender.classinfo, 'Color' );
   if not assigned (pp) then Exit;
   if pp.PropType^.Name = 'TColor' then SetOrdProp(Sender, pp, 
clMoneyGreen);
end;
procedure TForm1.OnCustomExit(Sender: TObject);
var
   pp: PPropInfo;
begin
   pp := GetPropInfo(Sender.classinfo, 'Color' );
   if not assigned (pp) then Exit;
   if pp.PropType^.Name = 'TColor' then SetOrdProp(Sender, pp, clWindow);
end;
A questo punto, per tutti i componenti che vuoi che cambino colore, 
devi solo linkare, dall'Object Inspector, gli eventi OnEnter e OnExit a 
queste due procedure.
Funziona con tutti i componenti derivati da TWinControl, compresi i vari 
DB-Aware.
-- 
Jax
Newsgroup: it.comp.lang.delphi
Titolo: Convertire test Unicode in ANSI

Salve,
ho provato a dare un occhiata su google ma non ho trovato quanto
desiderato...
Qualcuno saprebbe consigliarmi un metodo rapido ed efficace per
convertire un file di test txt codificato in Unicode nel formato ANSI?
Una procedura sarebbe il massimo, se no un componente free o una utility
da lanciare in dos sarebbero opzioni accettabili.
Grazie,
-- 
Poochie©

 Salve,


Dall'help di D7:
WideCharToString converts the given null-terminated Unicode string to a
string made up of single- or multi-byte characters.
Vedi anche la sezione Character set conversions.
Tutto il resto vien da se'.
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Tutto il resto vien da se'.
Il vero problema era leggere il file prima ancora di avere le
stringhe... ad ogni modo ho dato un'occhiata in HEX e ho notato che
prendendo un byte sě e uno no ho esattamente il file come se fosse in
ANSI, quindi penso che procederň cosě.
-- 
Poochie©

 string made up of single- or multi-byte characters.
[CUT]
Il problema sta a monte
-- 
Poochie©

 Il problema sta a monte
Pardon, mi č scappato in uscita incompleto...
-- 
Poochie©

 ANSI, quindi penso che procederň cosě.
Be', allora guarda qui:
Fast & Flexible Access to Unicode Text  
DIUnicode provides Unicode Reader and Unicode Writer classes 
for for Delphi 4/5/6/7.
DIUnicode is available for Delphi 4/5/6/7. DIUnicode is fully functional
without restrictions. It comes with the source code for many of the
utility units. 
http://www.zeitungsjunge.de/delphi/unicode/


Newsgroup: it.comp.lang.delphi
Titolo: Emulatore PC sviluppato in Delphi in grado di far girare Linux ...

...lo trovate all'indirizzo 
http://sourceforge.net/projects/bochs2delphi/
 e 
fa girare anche Windows.
Chissà chi è quel malato di mente che si è messo dietro a fare una cosa del 
genere....
Ciao
max 

Max ha scritto:

Già, chissà :)
-- 
Jax

 ha scritto nel messaggio 
news:47c85320$0$17944$4faf...@reader1.news.tin.it...

E' un port da C a Delphi, quindi si tratta "solo" di un lavoro 
(esercizio?) di traduzione, non di programmazione vera e propria.
Newsgroup: it.comp.lang.delphi
Titolo: hook tastiera e mouse

Qualcuno di voi ha già provato ad intercettare la pressione di un
tasto della keyboard e uno del mouse insieme?
E' una cosa che ho visto fare su Babylon dove cliccando
contemporaneamente il tasto ctrl e il tasto destro del mouse  si
ottiene la traduzione del testo selezionato....mi interesserebbe
ottenere un effetto simile. Purtroppo le ricerche su google mi hanno
portato a soluzioni di hook su tastiera o su mouse ma non su eventi
contemporanei sui due input device.


Premesso che non si capisce il contesto in cui vuoi applicare la cosa.
Premesso che "contemporaneamente" e "windows" nella stessa frase sono
un ossimoro.
Premesso che ctrl e' un tasto particolare come shift ed alt
Quale parte di "Shift : TShiftstate" nella dichiarazione di
OnMouseDown non e' chiara?
ciao
S

 S
E' abbastanza chiara...il fatto è che mi servirebbe un global hook. Ti
faccio un esempio....immagina di selezionare del testo su word e di
lanciare una funzione che calcoli il numero di parole selezionate...il
numero lettere e altre cose...ecco mi piacerebbe che il lancio di
questa funzione avvenisse , ad esempio, con la pressione del tasto
Control e la pressione del tasto destro del mouse così come fa
babylon.
ciao a te.

 S
Non capisco dove avrei usato  "contemporaneamente" e "windows" nella
stessa frase.

 wrote:

Premesso che non si capisce il contesto in cui vuoi applicare la cosa.


 babylon.
Quello che cercavo di dirti e' che non ti serve che la funzione si
scateni se i due eventi sono contemporanei (ti ci voglio a farlo
davvero in contemporanea).
Fai un hook sul mouse, quando viene chiamato controlli se anche ctrl
e' premuto, in tal caso prosegui con il tuo codice altrimenti esci.
ciao
S

Fai un hook sul mouse, quando viene chiamato controlli se anche ctrl
e' premuto, in tal caso prosegui con il tuo codice altrimenti esci.
Volevo solo aggiungere che per controllare la pressione di CTRL puoi usare 
GetAsyncKeyState delle API Win32.
Ciao Giorgio 


è proprio la via che stavo seguendo....se ci riesco ti faccio
sapere...
grazie 1000 e ciao

Newsgroup: it.comp.lang.delphi
Titolo: Stream write error

Ciao
Ho un'applicazione che durante il preview di un quickrep mi genera l'errore
Stream Write Error
Ho provato con il debug: l' errore viene generato prima del preview di una
groupband, ma mai della prima groupband del form. L'errore arriva tra il
beforepreview e l' afterpreview della quarta o quinta groupband, che è
collegata ad un query.
Il bello è che a volte la stampa è visibile, altre il report è completamente
grigio o con pezzi mancanti.
Non so proprio di cosa si possa trattare
Chi mi dà una mano ?
Il progetto è stato fatto originariamente in Delphi3 adesso l'ho ricompilato
in Delphi5, c'entra qualcosa???
Grazie mille
Andrea

La cosa è strana.
Ti consiglio prima di tutto di verificare se hai installate
tutte le fix/update sia di d5 che di quickreport.
Inoltre, hai provato a eseguire la stessa applicazione
su + macchine, magari con sistemi operativi diversi?
Bye
AS
"Se è Microsoft non funziona"
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG