mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: TInifile e dubbi sulla lettura delle chiavi

Scusate la domanda un po' stupida...ma una cosa del tipo:
FServizio:= FIni.ReadBool('Sezione', 'Servizio_Attivo', False);
FReminder:= FIni.ReadBool('Sezione', 'Reminder_Attivo', False);
Perchè non mi carica i valori corretti in FServizio e FReminder
entrambi boolean ? Ottengo sempre False, False.
Il file è presente ed altri metodi tipo readString funzionano bene su
questo file.
File ini utilizzato:
[Sezione]
Servizio_Attivo=True
Reminder_Attivo=True
Ho provato anche banalmente a scrivere TRUE o true, ma senza
risultato.
W2000Pro; D6 Ent;
Grazie
Jx

Servizio_Attivo=1
Reminder_Attivo=1
Bye
A.


Grazie... effettivamente non ci avevo pensato anche perchè il tipo
boolean in object pascal è true o false.
Grazie della rispostae mi scuso per la mancanza di "elasticità" nei
miei ragionamenti.
ciao
Jx

Newsgroup: it.comp.lang.delphi
Titolo: [OT] mysql e delphi

salve a  tutti, so già di essere OT però vorrei rivolgervi a voi "colleghi" 
delphi...
è possibile usare mysql in modo da avere più database anche in path diversi? 
un cliente ha necessità di avere 2 db uno su server mysql locale e uno su 
path esterno (es. hard disk removibile)
Simone 


Penso che piu' che i colleghi delphi ti possano essere di
maggior aiuto i colleghi di it.comp.software.database ;)
ciao
Giacomo
Newsgroup: it.comp.lang.delphi
Titolo: Aiuto compilazione

Premetto che sono alle prime armi con Delphi5,comunque ho sviluppato una
semplice applicazione con una Form di inserimento dati collegata ad una
tabella dbf,ho compilato l'applicazione e tutto funziona perfettamente sul
mio computer,su cui ho installato Delphi5.
Il problema e' che quando installo su un altro computer il file exe e la
tabella dbf,all'avvio mi da' codesto errore:
"An error occured while aftemoting to initialize the borland database
engine" (error $2109).
Credevo che con Delphi la compilazione allegasse tutti i files
necessari,chiedo gentilmente che file mancano (dll ??).
Vi ringrazio per la risposta.
Luigi

 wrote in message
news:Br2f9.1253$6O4....@twister1.libero.it...

Devi ridistribuire il BDE insieme alla tua applicazione, cerca su google,
troverai molte informazioni al riguardo.


Caro amico ti ringrazio per la risposta,
ho provato a ridistribuire il BDE e su un altro computer ora tutto
funziona,pero' ci son voluti ben quattro floppy di installazione,quello che
vorrei sapere e' se e' possibile ridurre al minimo questi floppy,installando
i files necessari,oppure i quattro floppy sono proprio il minimo necessario.
Se fosse cosi' ritorno al VisualBasic5 dal momento che il Delphi si tira
dietro tutti codesti files,tanto vale programmare con un linguaggio
(VisualBasic) che gia' conosco.
Ti ringrazio ancora per una eventuale risposta,comunque faro' delle ricerche
su Internet.
Luigi


 (VisualBasic) che gia' conosco.
Proverbio Talebano:
Chi lascia la vecchia per la nuova
non sa quello che trova!
Scherzi a parte, VB sembra che porta poche librerie con sè,
in realtà ne usa diverse del sistema operativo.
Comunque se il problema è la quantità dei floppy usati,
allora masterizza tutto su cd.
Ciao
Toni

 i files necessari,oppure i quattro floppy sono proprio il minimo
necessario.
Se usi ADO con un DB Access non ti serve il BDE e tutto funziona da Win 98
in su distribuendo il semplice exe.
Ciao

 i files necessari,oppure i quattro floppy sono proprio il minimo
necessario.
Se usi InstallShield fornito con il CD di Delphi puoi scegliere il motore da
distrubuire.. (se non ricordo male)
Se devi per forza usare i DB DBF cerca su torry o DSP sicuramente trovi
componenti del tutto Free che ti evitano l'uso del BDE
Altrimenti prova con ADO e Access
^_Goblin_^

 (VisualBasic) che gia' conosco.
...e che i file se li tira dietro lo stesso...
Vorrei farti notare che l'uso del BDE e' ormai "deprecated", nel senso che
Borland non continua piu' a supportare questo motore e ha sviluppato la
tecnologia DBExpress (Delphi 6), che non richiede *alcun* supporto esterno.
D'altronde, devi pensare che il BDE e' nato nell'era dei server file-based.
Comunque, con *qualsiasi* db (anche i C/S) c'e' la parte client da
installare. Regredendo al VB non risolvi, quindi, il problema.
--------------------------------
Inviato via 
http://usenet.libero.it

 *Regredendo* al VB
Mi piace questo termine :)))
--
Jax
Newsgroup: it.comp.lang.delphi
Titolo: Problema con DataBase Desktop

DataBaseDesktop (di Delphi 4) all'uscita mi dice (in inglese) Errore
generale di protezione.
L'ho reinstallato venti volte ma sempre uguale (fino ad un mese fa
funzionava bene) che potrà essere?
Grazie

formattone?


Lo fa anche a me. Stranamente lo ha iniziato a fare a partire da quando ho
cominciato a usare la FAT32 (su Win 98, prima, su Win 2K ora).
In ogni caso si tratta di un bug, e pure piuttosto datato, ma la Inprise non
pare lo abbia risolto.
Ciao, Sandro

Newsgroup: it.comp.lang.delphi
Titolo: Messaggio assurdo di Delphi 7

Ciao a tutti...
Io e un amico abbiamo acquistato una collezione di componenti, la
Suipack 5 (per ki non la conosce, consente di cambiare l'aspetto
grafico delle form e altre amenità). L'abbiamo installata e
utilizzata, e tutto e' andato ok. Successivamente, abbiamo dovuto
formattare la macchina per motivi che non sto a spiegarvi, e abbiamo
reinstallato Delphi, ovviamente la stessa versione di prima. Quando
abbiamo tentato di reinstallare il suddetto package e' accaduta una
cosa strana...Abbiamo fatto prima il compile del package, e quando
abbiamo fatto "install" Delphi ha dato un messaggio tipo "il package e'
stato compilato con una precedente versione Trial di Delphi che e'
scaduta" con conseguente errore di memoria e chiusura automatica di
Delphi. E non c'e' verso di riuscire a reinstallarlo! Il problema e'
che abbiamo dei progetti con all'interno alcuni componenti in
questione...che puo' essere successo? Qualcuno si e' mai trovato in
situazioni analoghe?
Grazie a chi vorra' aiutarmi

 "il package e' stato compilato con una precedente versione 
 > Trial di Delphi che e' scaduta"
Che versione di Delphi avete installato?

 Delphi. 
Cancella tutti i dcu ed i bpl nella cartella dove li salva Suipack,
riavvia Delphi e riprova a compilare.
-- 
I am what I am, I do what I can
Vuoi supportarmi? 
http://url.repository.biz/go/3E
Do. Or do not. There is not try.

Amici miei, ho provato a nstallare tutto su un'altra macchina, e non ci
sono stati problemi. La versione di Delphi e' la 7, e il package della
suite e', ovviamente, quello per D7. Mi sembra strano che la prima
macchina abbia problemi, perche' tutte le altre installazioni relative
a delphi sono andate a buon fine. Ho provato a cancellare i "rimasugli"
della precedente installazione...niente. Forse va a finire qualcosa nel
registro che da' fastidio?
Newsgroup: it.comp.lang.delphi
Titolo: Webbroser e focus

 Ciao a tutti sto utilizzando l'oggetto webbrowser per fare l'anteprima 
di documenti avendo ilndirizzo url.
La visualizzazione funziona correttamente ma non riesco a reimpostare il 
focus sull'elenco dei file. 
Questo č il codice che utilizzo ogni volta che mi sposto dalla mio 
datasource:
 procedure TFraEnt.DsQryLisAllDataChange(Sender: TObject; Field: TField);
 begin
  WebBrowser1.Navigate(QryLisAll.fieldByName('DOCURL').AsString);
  repeat
   Application.ProcessMessages;
  until WebBrowser1.ReadyState >= READYSTATE_COMPLETE;
 end;
Come posso fare?
Grazie in anticipo
Ciao
Manuel
--- posted by geoForum on 
http://www.delphiedintorni.it

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

Newsgroup: it.comp.lang.delphi
Titolo: Backup database

Salve,
come faccio per fare il backup dei database, magari su uno iomega zip
?
Basta copiare le tabelle ?
Esiste gia' qualche comando di esportazione / importazione ?
GRAZIE 1000
faf...@tiscalinet.it



Che TIPO di tabelle?
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"

>Che TIPO di tabelle?
In particolare quelle standard del Delphi, Paradox, e Interbase,
Access.
In generale tutte quelle che conosci.
GRAZIE 1000
faf...@tiscalinet.it



Per Paradox è sufficiente copiare tutti i file (che sono una
vagonata). 
Per gli altri formati che mi hai detto non saprei aiutarti.
Ciao,
Massimo.


Access.
vale la stessa cosa che con ib, non so se c'è una specie di API come
in ib per fare il backup, cmq, in generale, se nessuno è connesso al
db, ti basta copiare il file (.gdb, .mdb, .ecc)
Ciao,
Alan Solo
Newsgroup: it.comp.lang.delphi
Titolo: D2005 WebControl proprieta' cursore x Button

sto cercando di capire come funzionano gli Style su un controllo,
cosi' cerco qualche esempio e trovo onmouseover
<asp:Button id="Button1"
  style="Z-INDEX: 10; LEFT: 374px; POSITION: absolute; TOP: 398px"
  runat="server" text="Button">
---> parte aggiunta al Button
  <P>onmouseover="this.style.color='black';"</P>
</asp:Button>
che pero' da errore.
e' corretto applicare un InLine Style oppure un foglio CSS
tra <asp:Button .... > e </asp:Button> ?
qualunque banale esempio mi sara' prezioso.
grazie
questo il codice completo, se onmouseover e' una funzione il
codice non era pubblicato.
<DIV>
<P onmouseover="this.style.color='red'"
   onmouseout="this.style.color='black'">
Move the mouse pointer over this text, then move it elsewhere in the
document. Move the mouse pointer over this text, then move it
elsewhere in the document.
</DIV> 

</DIV> 
Come detto sopra questo codice è funzionante, e se noti
bene anche diverso dal codice che hai riportato tu, in
quanto onmouseover e onmouseout sono definiti
all'interno del tag <p> ed intercettano gli eventi over
ed out del cursore sul testo contenuto nel paragrafo di
cui il tag <p> è contenitore.
Ti consiglerei di darti una lettura a questo corso di
base per avere un'infarinatura di html
http://www.w3schools.com/html/default.asp
E questo per quanto riguarda, nello specifico, gli
eventi
http://www.html.it/javascript/corso/js_10.htm
	Ciao
	MassimoB
 
---------------------------------
http://www.massimobeschi.it/
---------------------------------
Se tu pagare come dici tu ...
Io lavorare come dico io ...
Se tu pagare come dico io ...
Io lavorare come dici tu ...
---------------------------------

> [...]
ho trovato questo semplice modo per cambiare forma al cursore
ovvero basta mettere Cursor: <forma> all'interno dello Style
invece ero convinto che si dovesse dichiarare Button1.Style ...
ma dato che la proprieta' Style non e' disponibile, non poteva funzionare.
<body ms_positioning="GridLayout">
    <form runat="server">
      <asp:Button id="Button1"
        style="Z-INDEX: 1; LEFT: 86px; CURSOR: hand; POSITION: absolute; 
TOP: 38px"
        runat="server" width="75px" text="Button"></asp:Button>
      <asp:Button id="Button2"
        style="Z-INDEX: 2; LEFT: 190px; CURSOR: wait; POSITION: absolute; 
TOP: 38px"
        runat="server" text="Button"></asp:Button>
    </form>
  </body>
grazie per le tue indicazioni.
ciao Maurizio

Newsgroup: it.comp.lang.delphi
Titolo: Problemi con la ricerca in Delphi

Buongiorno!
Ho un problemino con il mio Delphi 3...
A volte non riesco ad utilizzare il Find Text per cercare una stringa
all'interno del progetto.
Mi spiego meglio:
Se cerco una stringa nel PROGETTO va tutto bene mentre se la cerco
all'interno della UNIT mi viene fuori il seguente messaggio: TRIED TO
SEARCH MARKED BLOCK BUT IT IS INVALID.
Come mai?
Grazie!
Stefano M.

Ho risolto.
Nella finestra di ricerca c'è una sezione SCOPE, se è selezionato
SELECTED TEXT non mi consente di effettuare la ricerca nella unit,
quindi basta selezionare GLOBAL.
Ciao a tutti!
Stefano M.

Come mai?
http://tinyurl.com/b26d7
Newsgroup: it.comp.lang.delphi
Titolo: Video Dephi PHP

Per chi fosse interesasto seganlo il seguente filmato Flash
dimostrativo per creare la prima applicazione "Hello World".
http://dn.codegear.com/article/34068
C. 

 ha scritto nel messaggio news:1VeFh.9131$zG1.1...@twister2.libero.it...

Miglioro il link precedente con:
http://dn.codegear.com/php
dove è possibile trovare TRE video dimostrativi di D-PHP
Delphi for PHP quick start
Database access and creating a database dictionary with VCL for PHP
Delphi for PHP introduction
C.

Newsgroup: it.comp.lang.delphi
Titolo: da VB a Delphi

esiste qualche tool che permette di convertire un'applicazione (avendo i
sorgenti) da Visual Basic in Delphi o C++ Builder???
--
Massimiliano Etere
massimili...@programmando.org
http://www.programmando.org

 sorgenti) da Visual Basic in Delphi o C++ Builder???
Dio ce ne scampi! :)
--
Jax

 sorgenti) da Visual Basic in Delphi o C++ Builder???
si esiste, tempo fa era pubblicizzato sul sito borland, non garantisce
una traduzione del 100 %...


riscrivilo da zero .... è un ottimo modo x imparare Delphi e x capire che
con Delphi fai cose che con VB sono impensabili...
bye
Leo :)

 ha scritto nel messaggio
news:vjs29.158271$Jj7.3...@news1.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: Campi Data

Ciao a tutto il NG,
vorrei prospettarmi un paio di problemini........................
1. Ho unatavola di un database acess definito come DateTime. Questa tavola
e' gestita con un oggetto TQuery, ma non
    riesco a scrivere condizioni, nella riga WHERE, associate a questo
campo.  Come posso risolverlo...?
2. Cosa deve essere abilitato per poter modificare i dati risultanti da una
query su un oggetto TDBGrid?
3. Cosa devo fare per poter utilizzare una funzione (ex. Pos o definita da
me) nella condizione del filtro (riga di WHERE)
Vi ringrazio in anticipo,
  Giancarlo

query su un oggetto TDBGrid?
Bella domanda.
Generalmente i risultati di una query non sono modificabili.
I risultati di una query possono essere di due tipi : Live (vivi),
Not-Live (non vivi).
Sento gia' molti insorgere dicendo : impostare la proprieta'
RequestLive a true.
Non e' detto, pero', che anche in questo caso tu riesca a modificare
il dataset ottenuto (anche perche' sei molto limitato nella sintassi
degli statement).
Per questo scopo si usa allora il componente TUpdateSQL congiuntamente
alla TQuery, che raccoglie tre tipi di query in una e che ti consente
di impostare gli statement a seconda che tu voglia cancellare o
modificare i record.

 wrote in message
390d54b3...@news.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: [OT] tabella dei comuni per codice fiscale

Chiedo scusa per l'OT.
Per tutti coloro che fossero interessati al calcolo del codice
fiscale, comunico che dal mio sito e' possibile scaricare la tabella
in formato DBF (quindi leggibile anche da Excel) dei comuni italiani
con i relativi codici del M.D.F.
Mi e' stata offerta, non ne ho controllato l'integrita', se ci sono
problemi fatemelo sapere.
--
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."

problemi fatemelo sapere.
Da chi ?
;-)
Massimo
----------------------------------------------------------
Il vero problema non č tanto sapere se le macchine pensano
bensě se gli uomini pensano. B.F. SKINNER (1904-90)
----------------------------------------------------------

Da chi ?
Da uno di cui c'e' da fidarsi poco :)


se andate sul sito del ministero delle finanze vi potete scaricare un
programma (un po' grossetto ci vorrà pazienza) che vi permette di ricercare
i codici nazione e comune ufficiali. La sua installazione vi installa anche
i dei file che contengono i codici in questione, non mi ricordo bene, ma mi
pare che siano in formato paradox.
http://www.finanze.it/territor/dati/xcodicinaz.htm
Qualcuno ha dei componenti che fanno il controllo del codice fiscale?
Newsgroup: it.comp.lang.delphi
Titolo: [delphi] panico... dover scegliere come sviluppare l'applicazione

ciao a tutti, devo sviluppare un applicazione che deve girare in parte su pc 
e in parte su pocketpc
che soluzioni mi proponete (non mi interessa visual studio), vorrei capire 
se con delphi o con delphi php posso fare qualcosa
Simo 

Simone P. ha scritto:

Con BDS 2006 e alcuni "add on" specifici (vedi "Compact Framework Build 
Helper" di JED, 
http://www.jed-software.com/cf.htm
), è possibile 
sviluppare abbastanza tranquillamente applicazioni per il .NET 
CompactFramework.
In alternativa, puoi sviluppare un'applicazione Web con "IntraWeb" 
scegliendo come "target" un dispositivo mobile e producendo quindi 
pagine, fruibili attraverso un Web Server (in cui la tua applicazione 
andrà ad inserirsi), adatte alla visualizzazione su questo dispositivo.
Non conosco soluzioni specifiche basate su "Delphi for PHP", ma posso 
ipotizzare che sia possibile costruire qualcosa di analogo all'ultima 
soluzione descritta, basandosi pure su un linguaggio specializzato per 
il Web (PHP).
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

io attualmente di disponibile ho solo delphi3,4,5,6 delphi x php e un 
pocketpc da testare... in realtà la soluzione web è quella che pensavo, però 
se mi metto a far codice php a mano diventa lunga, delphi x php l'ho provato 
ma su ie del palmare non apre la pagina (forse per incompatibilità o per 
java diverso immagino)
Simo 

 java diverso immagino)
Cosa c'entra Java?


mi pare di aver capito che per generare grid o simili php for delphi usi 
java

 java
No, sono pagine (X)HTML, che fanno uso di JavaScript (che non è Java) 
per compiere operazioni lato client che coinvolgono, solo in alcuni 
casi, il server (sono implementazioni AJAX).
Non c'è alcun riferimento a Java, a meno che tu non inserisca un'applet 
all'interno della pagina, è chiaro. ;-)
Ciao,
   Marco.


avevo provato un demo e tramite pocketpc wireless avevo provato ad aprire la 
pagina, però explorer pocket mi restava bloccato con pagina bianca senza 
errori
era un esempio con una dbgrid
Simo

Newsgroup: it.comp.lang.delphi
Titolo: Lavorare con 128 bit

Ho necessità di lavorare con "parole" di 128 bit, sulle quali fare
operazioni logiche XOR, AND, ecc...
In Delphi la parola più grande disponibile è word, di 32 bit.
Conoscete qualche libreria che implementa parole di 128 bit?
Grazie
Ciao!

Grazie
Spero di eserti utile
Il Razziatore,
The Only Good Windows is an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
ICQ     : 67552596

 ha scritto nel messaggio
news:aqc0fh$7qb$1...@newsreader.mailgate.org...

Delphi ha anche gli Int64 a 64 bit... per i 128 credo tu debba risolvere
come ha suggerito il razziatore.
ciao
Matteo

> Spero di eserti utile
Grazie (anche a Matteo)

 ha scritto nel messaggio
news:aqdk1k$93492$1...@ID-99656.news.dfncis.de...

Newsgroup: it.comp.lang.delphi
Titolo: Modificare i nomi dei campi

Buondi',
ho avuto la pessima idea di chiamare un campo di un database Paradox
"città", e Windows versione giapponese non ha gradito la "a"
accentata. Il programma pertanto parte ma con il database non attivo.
Ora, cambiare il nome di un campo usando il database desktop e'
questione di pochi secondi (e il problema giapponese e' risolto), ma
per mantenere la compatibilita' con le versioni dei software
installate altrove, vorrei fare in modo che tutti i field name "città"
cambino nome in "citta" una volta installato l'aggiornamento.
Il mio sogno di fare qualcosa tipo:
MyTable.Fields[x].FieldName := 'citta'
oppure di usare FieldDefs e simili ovviamente si e' rivelato... un
sogno. ;-)
Qualcuno sa come fare e, soprattutto, se e' possibile farlo?
Ringrazio anticipatamente,
saluti,
Andrea.
_Logan - Andrea Donati __________________
__per scrivermi via e-mail ToGLiQuEsTo. __

 ha scritto nel messaggio
news:3ba76359...@news.inwind.it...


sorry ... all'inizio ho scritto uno strafalcione ... non il nome dei
database ... in realtà intendevo, come dice il subject, nome dei cambi di un
database
:)
BYEZ
Alessio

meno chč la tua applicazione sia proprio banale banale banale
La mia applicazione non e' banale, ma l'accesso al database lo e'
(tanto piu' che il db NON e' sql perche' le uniche cose che faccio
sono semplici inserimenti-eliminazioni). Purtroppo l'Interbase lo devo
studiare, nel senso che i prossimi programmi li faro' con l'Interbase.
Ma convertire il database attuale e' (credo) improponibile, specie
perche' decine di programmi in giro sono in Paradox.
Mi sa che l'unica cosa che mi rimane da fare e':
1) Creare un nuovo db (MyTable2) con il campo "citta"
2) Fare un check all'inizio del programma se i componenti puntano a
MyTable o MyTable2
3) Nel primo caso copio tutti i campi su MyTable2, cancello MyTable, e
faccio puntare i miei componenti a MyTable2.
Sperando salti fuori prima una soluzione meno macchinosa. ;-)
Grazie per i consigli!!!
Ciao,
Andrea


TQuery credo ti permetta di fare solo SELECT
Falso.
--
Andrea Laforgia - walkietalkie(at)
libero.it
http://www.geocities.com/AndreaLaforgia

 cambino nome in "citta" una volta installato l'aggiornamento.
...
dovrebbero bastare 2 query DDL + 1 di update (o un ciclo di update)
1) aggiungi la colonna
ALTER TABLE "Nometabella.db"
  ADD COLUMN Citta VARCHAR(25);
2) copia i dati da citta' a citta
// della query qui sotto non sono affatto sicuro: eventualmente un bel
ciclo while not eof
UPDATE "NomeTabella.db" T1
  SET T1.Citta = (
  SELECT T2."Citta'"
    FROM "NomeTabella.db" T2
    WHERE 
T1.ID
 = 
T2.ID
  )
  /* WHERE 
T1.ID
 = 
T2.ID
 */
3) droppa citta'
ALTER TABLE "NomeTabella.db"
  DROP COLUMN "Citta'"
Ovviamente con la tabella aperta in modalita' esclusiva e supponendo che
citta' non compaia in indici etc etc.
Saluti
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: pulire un Timage

 The Follet
Ne sei sicuro?? Io con questo metodo ci ho fatto un gioco di carte
completo... sembra che sia tutto ok.. (e di Timage ce ne sono 5-6, e vengono
riazzerati e ri-riempiti almeno una ventina di volte)..

riazzerati e ri-riempiti almeno una ventina di volte)..
Il fatto che tu abbia utilizzato questo metodo con successo,
senza avere alcun errore, non vuol dire necessariamente che
sia corretto.
E' sbagliato : Object Pascal non e' Java.
Quando si alloca memoria per un oggetto, per liberarla, non
basta porre a nil il puntatore, bisogna deallocarla.
Quando si compiono un paio di centinaia di allocazioni il
sistema potrebbe non lamentarsi dei memory leak, ma, ripeto,
quei memory leak ci sono e ci sono per uno sbaglio del
programmatore.
-- 
The Follet

Newsgroup: it.comp.lang.delphi
Titolo: Finestre figlie che rimangono nella client area

Come si puň ottenere che una Form rimanga sempre dentro
alla Form principale della applicazione, o piů in generale dentro
la Form che l'ha generata???
Grazie Gianmarco 

 Grazie Gianmarco
form principale: MDIForm
figlie: MDIChild
proprietà FormStyle
ciao
V 

 proprietà FormStyle
Sospettavo che ci volesse una MDIForm, ma in cuor mio speravo
ci fosse qualcosa di alternativo.
pazienza mi adatterò 

 ha scritto nel messaggio 
news:elpa5g$o7a$1...@tdi.cu.mi.it...

io non conosco altri modi...ma se aspetti forse qualcuno ha qualche altro 
suggerimento

 ci fosse qualcosa di alternativo.
Leggi anche questa discussione:
http://masl.to/?J1E125D5E
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
     Non hai la possibilità di scaricare Turbo Delphi Explorer?
     Te lo spedisco io!! [
http://www.marco.breveglieri.name/?p=48
]

 la Form che l'ha generata???
Usando i frame e non le form.
Evita il modello MDI, č obsoleto e malfunzionante.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Cercherò di approfondire, Vi ringrazio  gianmarco
Newsgroup: it.comp.lang.delphi
Titolo: Usare Dbexpresses x as400

Come posso utilizzarlo senza installare client access 

Non conosco AS/400, ma per gli altri il dbx fa solo da "ponte" e non 
sostituisce il client del database.
-- 
Alberto Salvati
A *Neapolitan* delphi developer who is studing c# & .Net

 ha scritto nel messaggio 
news:clqj43$30ee$1...@newsreader2.mclink.it...


 "autosufficiente" :-)
E la risposta credo proprio che sia no.
-- 
Jax
====
Nessuna donna farebbe un matrimonio d'interesse : prima di sposare un
miliardario, se ne innamora ! (Cesare Pavese)

 Come posso utilizzarlo senza installare client access
Io non sono riuscito a trovare nulla di gratuito per accedere al db2 di
OS400 in maniera nativa, a parte il solito componente (distribuito anche
come dll) che ha bisogno del Client Access installato.
Però in alternativa potresti utilizzare una connessione di tipo ADO. Io l'ho
utilizzato con successo, lunico problema è che, non essendo un sistema di
accesso nativo, si presenta più lento rispetto al componente utilizzato
insieme a Client Access.
Per estrarre 8000 record con ADO ho impiegato 4 secondi in più.
Se per te questo questo non è un problema utilizza pure ADO perchè funziona.
Diversamente devi comprare, per esempio, Delphi400, ma so che costa un bel
po'.
Se hai bisogno di sapere come funziona il collegamento attraverso ADO
fammelo sapere.
Probabilmente ho conservato da qualche parte ancora qualche esempio.
Spero di esserti stato utile.
Ciao
Donato Di Tullio

> Perň in alternativa potresti utilizzare una connessione di tipo ADO. 
Sorry. Credevo 'sta cosa valesse solo x m$sql... :(


Newsgroup: it.comp.lang.delphi
Titolo: Sulle form

Ciao a tutti, ho un problemino che forse qualcuno può aiutarmi a
risolvere...
Ho due form: formMain e formNoMain. La FormNoMain  viene chiamata ad
apparire. Compare, però vorrei (dopo aver fatto qualcosa) tornare su
FormMain , cioè spostare il focus ma senza far scomparire la FormNoMain che
essendo più piccola deve rimanere in primo piano. E' possibile?Come? Ho
cercate tra le proprietà delle form ma non ho trovato nulla.
Grazie mille a chi mi aiuterà.
Saluti a tutti, fa un caldo boia!
Giuseppe

 possibile?Come? Ho cercate tra le proprietà delle form ma non ho
Impostare FormStyle di FormNoMain a fsStayOnTop?
HTH,
--
Andrea /\/\agni
ICQ#: 174108000

 > possibile?Come? Ho cercate tra le proprietŕ delle form ma non ho

Newsgroup: it.comp.lang.delphi
Titolo: Visualizzare del testo in un componente tipo Memo con il righello

Salve,
 ho googlato un pò ma non riesco a trovare indicazioni su questa esigenza.
In un piccolo software che sto sviluppando dovrei visualizzare del file 
di testo che in posizione fisse ci sono delle stringhe che mi interessano.
Mi piacerebbe avere la barra del righello che mostra in base a punto in cui 
si trova il cursore su quale carattere mi trovo.
 
Esiste un componente per Delphi tipo Memo o RichEdit con RIGHELLO ( ruler ) ?
 
Ringraziamenti 
 anticipati
    Zeno Michielon

   ho googlato un pï¿½ ma non riesco a trovare indicazioni su questa esigenza.


Ciao,
   non so se fa il caso tuo ma c'e' un ottimo righello (free) su
 
www.scalabium.com
 
 
nella sezione free SM components.
 
E' un po' datato ma non e' male.
 
ciao
 
Daniele
 
"Microges"  ha scritto nel messaggio news:lu7a4r$qde$1...@speranza.aioe.org...


Newsgroup: it.comp.lang.delphi
Titolo: Procedure e Funzioni

La differenza tra procedure e funzioni e che la funzione ha un return(C
docet) e che il return e una var con il nome della procedura ????
Tnk


Direi di si .
Procedure MiaPro( a, b, Var c : Integer );
Begin
 c := a + b ;
End ;
Function MiaFunc( a, b : Integer ) : Integer ;
Begin
  Result := a + b ;
End ;
Ciao.
--------------------------------
Inviato via 
http://usenet.libero.it

 docet) e che il return e una var con il nome della procedura ????
Il C ha solo 'funzioni' che eventualmente restituiscono il tipo void. Il
Pascal (e il basic :-) hanno procedure (non restuiscono nulla) e funzioni
(restituiscono un valore). Oltre alla var con il nome della funzione si può
usare la variabile speciale Result..

Ma posso fare qualunque cosa all'interno, giusto?

Newsgroup: it.comp.lang.delphi
Titolo: Re: Runtime solo in debug

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

 ti vengono comunque sollevate anche se sono gestite.
A meno che non aggiungi la classe dell'eccezione alla lista delle 
eccezioni da ignorare, oppure rimuovi la spunta da "Stop on Delphi 
Exceptions". :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

grazie.



grazie a tutti ho trovato!
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


e non c'è modo di evitare questa cosa?
grazie.


 
          salve al ng, se lancio il programma compilato funziona, mentre se lo lancio
in debug con f9 viene generato un errore ma non riesco a capire dove.
non è che esiste un opzione che genera l'errore anche se esso è gestito
magari con un try catch?
mi è venuto in mente che possa essere questo il motivo perche gia mi è
capitato con altri linguaggi di programmazione.
d5 è la prima volta che lo uso!
grazie.

Newsgroup: it.comp.lang.delphi
Titolo: gestione file avi

Dovremmo gestire dei filmati .avi per avere una specie di help multimediale.
Conoscete qualche componente Delphi di terze parti da utilizzare visto che
il componente MediaPlayer fa un pň arrabbiare ?
Grazie
Paolo

Io conosco L'ABC Multimedia, non è male sia per gestire file avi silgoli che
archivi.
Thomas

 ha scritto nel messaggio
news:fT709.142144$vm5.4...@news2.tin.it...

Io sono andato a vedere questo gruppo.
Per me il problema è poterli gestire da una applicazione delphi, no tanto in
creazione dei file, bensì nella riproduzione "controllata", cioè con Play,
Pause, Stop, RW e FF.
Il componente nativo di Delphi è molto lacunoso e gestirsi il tutto con i
messaggi MM_ è un semi-suicidio (già provato).
Qualcuno conosce qualche componente (anche a pagamento) da poter utilizzare
in "riproduzione" ?
Grazie
Phora
Newsgroup: it.comp.lang.delphi
Titolo: [it.comp.lang.delphi] benvenuto su Usenet!

.
-------------------------------------------------------
Si vuole avere uno spazio di discussione per tutti quei programmatori
(dal meno esperto al piu' avanzato) che vedono in Delphi una ottima
alternativa alla programmazione in Visual Basic.
In questo gruppo non moderato si parlera' di tutto cio' che riguarda
la programmazione in ambiente Delphi e sara' un luogo appropriato per
discussioni su tecniche del linguaggio, problematiche riscontrate,
problematiche risolte,novita' e notizie sulle nuove versioni
dell'ambiente e dei suoi componenti.

 presentata da Giorgio Pizzolon
esiste?

Newsgroup: it.comp.lang.delphi
Titolo: Hint a fumetto Xp style, come fare per?

Mentre cerco, qualcuno ha idea di come far apparire quegli hint a forma di 
fumetto (con tanto di pulsantino X per la chiusura) visibili in WinXp?
P.S.: visto che bello il logo di Google di oggi?
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

 fumetto (con tanto di pulsantino X per la chiusura) visibili in WinXp?
Hai provato a guardare TJvBalloonHint delle JVCL? Penso che faccia proprio
al caso tuo...
-- 
Lis
Mercatino: 
http://snurl.com/sito_lis
Aiuta la ricerca contro il cancro: 
http://snurl.com/ida_team

 proprio al caso tuo...
non ho mai usato le JVCL, adesso mi sto scaricando la full install e quando 
avrò finito (10 Mb x la mia connessione sono tanti!) e l'avrò installata, ti 
saprò dire se avevi ragione :-) intanto grazie!


 saprň dire se avevi ragione :-) intanto grazie!
Se lo dicevi ti mandavo solo quella unit ;-)
Comunque quei sorgenti sono spesso una buona fonte di studio


 non so se hai letto, ti avevo scritto in pvt, ma non posso installare le JVCL 
Mi spiace ma non mi è arrivato nulla (a volte despammed è un pò lento)
oppure non ho visto la tua mail tra le centinaia di spam che arrivano.
Se vuoi ti mando solo il codice che ti interessa, mandami pure una mail a 
lis77
at
katamail
punto
com

Newsgroup: it.comp.lang.delphi
Titolo: Click del mouse su Array di TShape

Come da topic ho un problema su un evento del mouse da applicare ad
ogni elemento di un array statico, formato da TShape.
Allora, creo l'array di TShape con una For e vorrei applicarvi questo
metodo
 Form1.MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer); il semplice mouseDown di Delphi
Con il seguente codice creo l'array :
var I,Z : Integer;
begin
  for I := 0 to 58 do
    for Z := 0 to 34 do begin
      shapes[I,Z] := TShape.Create(Panel2);
      shapes[I,Z].Parent := Panel2;
      shapes[I,Z].Name := 'Shape'+IntToStr(I)+'e'+IntToStr(z);
      shapes[I,Z].Hint := 'off';
      shapes[I,Z].Height := 15;
      shapes[I,Z].Width := 15;
      shapes[I,Z].Left := (15*I)+8;
      shapes[I,Z].Top := (15*Z)+8;
Il mio problema è quì : quando vado a mettere i vari parametri al
metodo MouseDown mi da errore sul TShiftState, dicendomi che il
parametro ssLeft non è consentito.
      shapes[I,Z].OnMouseDown := Form1.MouseDown(shapes[I,Z], mbLeft,
ssLeft, ....);
    end;
Sapete dirmi come mai ? Devo definire un altro tipo di TShiftState o lo
definisco io all'interno dei parametri in maniera scorretta? Grazie
ancora.

 ssLeft, ....);
shapes[I,Z].OnMouseDown := Form1.MouseDown;
poi nella procedura MouseDown tramite il Sender puoi sapere lo Shape su cui
č avvenuto l'evento;
-- 
Lis                 
www.alessandroghezzi.it
O'Telma Formula1:   
http://snipurl.com/otelma
La felicita č dappertutto, basta scovarla (anonimo)

Grazie dell'aiuto Lis, ma il mio problema non era definire il metodo
che contenesse il "cosa fare" al click del mouse. Il mio problema era
nel mettere i parametri all'interno del mouseDown, esattamente avevo
problemi sul TShiftState con parametro ssLeft. Se avete altri
suggerimenti o soluzioni fatemi sapere.
Tnx

la forma giusta è questa:
shapes[I,Z].OnMouseDown := Form1.MouseDown
In questo modo, ad ogni click sugli shapes viene richiamato il codice
di mousedown del form.
Mi chiedo solo a cosa ti serve l'array.
AS

> Il mio problema era nel mettere i parametri all'interno del mouseDown
Non spetta a te farlo. Quando l'utente fara' click su uno shape il
metodo da te assegnato riceve i parametri.
AS

 metodo da te assegnato riceve i parametri.
Ho visto solo ora la risposta...mi hai anticipato, grazie ;-)
-- 
Lis                 
www.alessandroghezzi.it
O'Telma Formula1:   
http://snipurl.com/otelma
Le persone che si sforzano di essere interessanti sono le più noiose di
tutte (Kahlil Gibran)

Grazie ad entrambi.
L'array mi serve per gestire 560 TShapes; non potevo di certo metterli
uno per uno sullo schermo!? Così mi creo l'array e li inizializzo e
creo all'apertura del Form.
Saluti

 uno per uno sullo schermo!? 
Scusa la curiosità, ma come mai hai la necessità di così tanti tshape
contemporaneamente? Non c'è una soluzione migliore?
-- 
Lis                 
www.alessandroghezzi.it
O'Telma Formula1:   
http://snipurl.com/otelma
God is Real, unless declared Integer

occhio. per creare 500 oggetti non ti serve un array.
xche inventare la ruota? mai visto le property controls e components?
AS
Newsgroup: it.comp.lang.delphi
Titolo: raggiungere eventi esterni

Form1 , Form2 , FrameToolBar sono indipendenti
Form1 evento OnCreate
- crea FrameToolBar
- assegna evento all'evemto della ToiolBar => 
frm_ToolBar.act_Conferma.OnExecute := Conferma;
che esegue le operazioni e resta attivo
Form2 evento OnDropDown
- crea Form1
- Form2.grd_Clienti.OnDblClick := ConfermaCliente;
a questo punto il Form2 si chiude ed il controllo torna a Form1
vorrei evitare il doppio click sulla DbGrid del Form2, gestendo un evento
quindi ho bisogno di raggiungere l'evento Conferma
(frm_ToolBar.act_Conferma.OnExecute := Conferma)
sostutuire questo
- Form2.grd_Clienti.OnDblClick := ConfermaCliente;
con qualcosa di simile
Form2 evento Conferma ToolBar = ConfermaCliente
pero' ovviamente da Form2 non posso vedere FrameToolBar
c'e' modo di farlo ? 

> [...]
il problema era fare in modo che quando richiamavo Form1 da Form2
che a sua volta richiama FrameToolBar, e su Form1 premevo il Puksante
Conferma, il controllo ritirnasse a Form2.
ho verificato questa soluzione
- nel Form1 (quello chiamato dal DropDown), alla ActionList esistente
  ho aggiunto una nuova azione act_Test
  ed associato questa nuova azione all'azione Conferma presnete nel 
FrameToolBar
  act_Test := frm_ToolBar.act_Conferma;
- nel Form2 al momento di creare il Form1, redirigo la nuova azione sulla
  azione presente nel FrameToolBar
  frm_Clienti.act_Test.OnExecute := ConfermaCliente;
in questo modo da Form2, quando richiamo Form1 e su questo scatta l'azione 
collegata
(click sul pulsante Conferma del FrameToolBar), posso redirigere il 
controllo su una
routine interna al Form2, che si occupera' della gestione, chiusura e 
disstruzione del Form1
in questo modo, evito di obbligare a fare doppio click sulla DBGrid del 
Form1.

Newsgroup: it.comp.lang.delphi
Titolo: accesso diretto allo spazio di I/O

Ciao a tutti,
nella mia applicazione devo accedere direttamente a delle locazioni nello
spazio di I/O per una periferica HWcustom. Con Win98 e 95 si può fare senza
problemi ma con NT e 2000 ciò non è consentito alle apllicazioni user, ma
solo a quelle di sistema.
Come posso fare ad aggirare il problema ? posso dichiarare la mia
applicazione come una di sistema o non è possibile ?
grazie 1000

Come posso fare ad aggirare il problema ?
Devi scrivere un device driver.
Su MSDN trovi tutta la documentazione a proposito (guarda alla voce
DDK).
-- 
Andrea Laforgia
Gioca a Tetris !
http://www.geocities.com/andrealaforgia/mytetris.zip

grazie della info.
"Andrea Laforgia" <x@x.x> ha scritto nel messaggio
news:m74m6vk0kous32ip8...@4ax.com...

Newsgroup: it.comp.lang.delphi
Titolo: BAMBOCCIONIIIII NON DROGATEVI ... CAZZO!

ADESSO SU RAI  1 VI FANNO VEDERE IL CERVELLO SPAPPOLATO DALLA DROGA!
 
DROGATIIIIIIIIIIIIIIII.....uscite dal tunnel cazzo!
 
4ndre4 smettila di farti, che ti ritrovi il cervello spappolato!
 
BAMBOCCIONI!!!!
 
 
-- 
Quando la dittatura è un dato di fatto, la rivoluzione diventa un diritto.
(Victor Hugo)
 
“L’intelligenza sa di essere libera, quali che siano le coercizioni 
esteriori.
Sa che la grandezza dell’Uomo è nel pensiero, e sa che c’è sempre
almeno un altro uomo che lo afferra e lo trasmette.”
(Ida Magli, Omaggio agli Italiani)

 ADESSO SU RAI  1 VI FANNO VEDERE IL CERVELLO SPAPPOLATO DALLA DROGA!
 
uhm... fammi capire: stai dicendo che alle 8:45 guardi rai 1?
e poi vieni qui a dire a noi che stiamo male?


perchè? tu ti droghi? difendi i drogati?
E non mi tirare in ballo che gli spinelli non fanno male. E' una 
leggenda, GLI SPINELLI, tutti, FANNO MALE anche loro.
Non ci posso credere!
 
Mentre faccio colazione la tv parte in automatico col microonde e mi 
informo coi tiggi ogni mezzora e tra un tg e l'altro fanno sti servizi, 
spesso cazzate, ma stamattina è stata la conferma a quello che io già 
sapevo fin dai tempi in cui operavo, come volontario, in una comunità di 
tossici. NON ESISTONO DROGHE INNOQUE. PUNTO!
Cheche compagni e centrisociali NE DICANO.
 
....e non ho mai dato tante spiegazioni a chicchesia....


 Mentre faccio colazione la tv parte in automatico col microonde e mi
 
L'hai fatto tu l'impianto elettrico?
 

 Mentre faccio colazione la tv parte in automatico col microonde 
 
si, e il computer quando parte, quando tiri l'acqua al cesso? <grin>
 
ps: comunque non ti facevo spettatore di programmi per casalinghe in 
menopausa.

 Mentre faccio colazione la tv parte in automatico col microonde 
 



si sarà dato alla domotica.


In cobol ovviamente

 
 
Ma allora le Gelmini aveva ragione, il tunnel tra il Cern e il  Gran 
Sasso esiste.
 
Dentro si sente parlare anche di Galalei Galalelo?
 
 
 
 
-- 
-------------------------------
per scrivere in privato
togliere "1975nosp"
 
to reply remove "1975nosp"
 
---
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus
 
 

 In cobol ovviamente
 
ovviamente.

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

Ciao a tutti,
devo fare in modo che un listbox carichi un elenco di items da un file
esterno in maniera casuale.
Qualcuno mi può indicare come devo fare?
Grazie

 esterno in maniera casuale.
Devi specificare la struttura del file e in che modo vuoi che questi vengano
caricati nella listbox (1 riga = 1 item, 1 record = 1 item etc...)
--
- Carlo -
c.b...@libero.it
Newsgroup: it.comp.lang.delphi
Titolo: file manifest

Ciao a tutti
ho un problema con l'ultima versione di delphi 11.2 ma era presente anche nella versione 11.1 con il file manifest (non ricordo se anche con la 11.0)
 
Cerco di spiegare:
con la versione 10.3 ho preparato un programma... con un form e alcuni controlli (un memo, delle checkbox, un campo edit)
 
Ho associato al progetto un file manifest con questo contenuto:
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3">
  <asmv3:application>
    <asmv3:windowsSettings>
      <dpiAware xmlns="
http://schemas.microsoft.com/SMI/2005/WindowsSettings
">True/PM</dpiAware> <!-- fallback for Windows 7 and 8 -->
      <dpiAwareness xmlns="
http://schemas.microsoft.com/SMI/2016/WindowsSettings
">PerMonitorV2,permonitor</dpiAwareness> <!-- falls back to per-monitor if per-monitor v2 is not supported -->
      <gdiScaling xmlns="
http://schemas.microsoft.com/SMI/2017/WindowsSettings
">True</gdiScaling> <!-- enables GDI DPI scaling (if needed, otherwise leave out) -->
    </asmv3:windowsSettings>
  </asmv3:application>
</assembly>
 
Compilando con la versione 10.3 il form viene visualizzato correttamente.
Compilando anche con la versione 10.4 ottengo la stessa visualizzazione
 
Quando apro il programma con la versione 11.2 già nella finestra del IDE il form viene visualizzato molto più piccolo (circa 4 volte più piccolo)
 
Ricompilando con la versione 11.2 (ma anche con la versione 11.1) il form viene visualizzato volte più piccolo
 
Il computer che utilizzo per la compilazione ha uno schermo 4K, non so se questo può essere utile
 
Se sposto l'eseguibile su un PC con risoluzione normale, il problema resta comunque: viene visualizzato piccolo o normale a seconda di come ho lanciato la compilazione

Ciao,
Questa cosa l'ho vista tempo fa con word ma ora non ricordo i dettagli.
Probabilmente lo schermo 4k incasina le cose.
Ho trovato quest che spero ti sia di aiuto:
 
https://stackoverflow.com/questions/43804374/how-to-make-delphi-xe2-look-good-on-4k-monitor-with-200-text-size
 
 
A.

> Probabilmente lo schermo 4k incasina le cose. 
Ciao
grazie per il suggerimento, provo a vedere se riesco a capirci qualcosa
 
Per ora ho trovato una proprietà del form (che non avevo notato prima) "scaled"
Impostando a false questa proprietà il form mantiene in esecuzione le dimensioni originarie
 
Dalla documentazione sembra che questa proprietà serva proprio a gestire la scalabilità dei form, ma non ho ancora capito come funziona
 
Evidentemente nella nuova versione stanno "gestendo" le dimensioni in funzione della risoluzione
N.B. la proprietà è presente anche nelle versioni precedenti senza essere operativa
 
Mi resta comunque da trovare come "vedere" la finestra nella pagina di design... senza acquistare una lente di ingrandimento
 
Alessandro
Newsgroup: it.comp.lang.delphi
Titolo: FONTS ?

Se in un programma si utilizza un font particolare che poi non è installato
sul computer sul quale si utlizzerà il programma molto probabilmente le
scritte non saranno visualizzate correttamente.
Come si può, qunidi,  installare un font ? Basta copiare il file relativi
nella cartella "c:\windows\fonts" ? Non si può "incorporare" al programma ?
GRAZIE
--
_________________________________
#ICQ: 17079401
http://quartaa.cjb.net
_________________________________
-->René<--
:-)

> nella cartella "c:\windows\fonts" ? Non si può "incorporare" al programma ?
Ciao, usa questa:
function LoadFont(sFontFileName: string; bLoadIt: boolean): boolean;
var
 sFontRes: string;
begin
result := TRUE;
 if bLoadIt then
 begin // installa il font
  if FileExists( sFontFileName ) then
  begin
   sFontRes := sFontFileName + #0;
   if AddFontResource( @sFontRes[ 1 ] ) = 0 then
      result := FALSE
   else
    SendMessage( HWND_BROADCAST, WM_FONTCHANGE, 0, 0 );
   end;
  end
  else
  begin // disinstalla il font
   sFontRes := sFontFileName + #0;
   result := RemoveFontResource( @sFontRes[1] );
   SendMessage( HWND_BROADCAST, WM_FONTCHANGE, 0, 0 );
  end;
end; {LoadFont}
ciao ciao, Luca.
-- 
ICQ: 11024183
"Lo sciocco non perdona e non dimentica.
L'ingenuo perdona e dimentica.
Il saggio perdona, ma non dimentica."
(Thomas Szasz) 

>   if FileExists( sFontFileName ) then
mi sono dimenticato... fileexists e' una procedure mia, comunque facile 
da fare...


 da fare...
FileExists una procedura tua??? Ma che scherzi o sono io che dormo? Esiste
già in Delphi quella funzione!!!!!!!


> 
ok, ma quella l'avevo fatto io per un altro motivo ( l'ho detto per non 
creare problemi se non gli tornavano i parametri )...


 creare problemi se non gli tornavano i parametri )...
Grazie... la provo immediatamente...


Newsgroup: it.comp.lang.delphi
Titolo: Inserire pulsante in una dbgrid?

E' possibile far apparire un pulsante nella riga e colonna
attiva di un dbgrid a destra della casalle di testo?
Ciao by Enzo
www.scozzaro.it

 attiva di un dbgrid a destra della casalle di testo?
E' sufficiente impostare la proprietà /ButtonStyle/ delle colonne 
interessate a cbsEllipsis per ottenere la visualizzazione di un 
pulsante, simile a quello visibile nell'Object Inspector per le 
proprietà che prevedono una finestra di dialogo in qualità di Property 
Editor.
Successivamente, puoi intercettare la pressione del pulsante tramite 
l'evento /OnEditButtonClick/ sul controllo DBGrid.
Ciao! :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

E' sufficiente impostare la proprietà /ButtonStyle/ delle colonne
interessate a cbsEllipsis per ottenere la visualizzazione di un
pulsante, simile a quello visibile nell'Object Inspector per le
proprietà che prevedono una finestra di dialogo in qualità di Property
Editor.
Successivamente, puoi intercettare la pressione del pulsante tramite
l'evento /OnEditButtonClick/ sul controllo DBGrid.
Grazie di tutto
Ciao by Enzo
www.scozzaro.it
Newsgroup: it.comp.lang.delphi
Titolo: I/O sui Textfile

ho la seguente procedura che dovrebbe aprire un file di testo eliminare gli
spazi a fine linea a scriverne un'altro... ma non funziona (cioè fà una
copia del file originale senza modificarlo)
Se copio quel che leggo in un edit vedo che oltre alla linea di testo c'è un
altro carattere ascii: [un rettangolo nero] (forse fl, o cr)
ho provato a usare read fino alla fine della linea  e poi readln ma non
cambia niente... dov'è l'errore?
procedure TForm1.BitBtn3Click(Sender: TObject);
var f,f1:textfile; a,b:string;
begin
assignfile(f,edit1.text);
reset(f);
assignfile(f1,edit2.text);
rewrite(f1);
while not eof(f) do begin
 readln(f,a);
 edit3.text:=a;
a:=nospace(a);    //  <-- procedura che toglie gli spazi (funziona)
edit4.Text:=a;
writeln(f1,a);
end;
end;
Grazie

 ha scritto nel messaggio
news:C5_I9.73045$3l.20...@twister1.libero.it...

1) Mancano i closefile alla fine.
2) Manca un controllo try-finally-and per gestire eventuali errori della
procedura (importanti quando si lavora con dei files)
3) Perchè non usi le funzioni già pronte TRIM (e che funzionano
sicuramente)?
4) Postare la procedura Nospace non sarebbe stata una idea cattiva
5) La variabile B non viene usata.
Ciaos
Matteo

Newsgroup: it.comp.lang.delphi
Titolo: Usare le API di Windows

La guida in linea di delphi4 include le api di Windows.
Attenzione: non tutte!
Secondo me almeno il 40% delle funzioni non sono documentate.
Ci sono delle unit da specificare nella sezione uses che dipendono
naturalmente da quale api desideri utilizzare.
Ad esempio, se vuoi usare la api per accedere alle funzioni WinSocket, devi
specificare nelle uses:
use Pippo,Pluto,... Winsock;
Saluti
AS
"Se è Microsoft non funziona"

Ma per usare le API di windows bisogna fare qualcosa in particolare ?
Includere qualche file nell'uses ? e dove trovo una documentazione su tutte
le API disponibili ?
Daniele

Secondo me almeno il 40% delle funzioni non sono documentate.
Anche perche' le API Windows sono piu' di 20.000 ! :)
Vorrei vedere chi si prende la briga di documentarle tutte, se non
quelli che scrivono il Platform SDK, consultabile on-line al sito
www.msdn.microsoft.com
, oppure nelle distribuzioni MSDN.
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
--------------------------------------------------------------
"Partire e' un po' morire e morire e' partire un po' troppo !"
--------------------------------------------------------------