mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Il menù che non scompare

Ho realizzato un' applicazione che mostra l'icona nella barra delle
applicazioni, a questa icona č associato un menů che compare con un doppio
clic. Funziona tutto bene ma il menu contestuale rimane attivo, sparisce
solo in caso di selezione. Nel senso che tutti i menů scompaiono quando si
clicca fuori dal loro campo, mentre questo scompare solo quando clicco su
una voce.
Per il menů ho utilizzato "Shell_NotifyIcon" mentre il menů viene mostrato
utilizzando le procedure "GetCursorPos(Pt) e PopupMenu1.PopUp(Pt.X,Pt.Y)".
Grazie a tutti in anticipo

uhm... non saprei...
ma perchè non utilizzi il CoolTrayIcon? Funziona alla grande e così eviti di
impazzirti dietro al codice che qualcuno ha già scritto!!! :))
Se ti serve lo trovi qui:
http://www.programmando.org/delphi/componenti/form.php
altrimenti su internet
Ciao!!!
--
Max Etere
massimili...@programmando.org
http://www.programmando.org

Grazie a tutti in anticipo
prima di fare popup da il focus alla finestra che possiede il menu
(anche se e' invisibile)
-- 
.     _  _______  ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_
  /| // /__  __/  Kirys <Remove DELTHIS from the address to reply>
 / |/ \   / /     Kirys Tech 2000: 
http://www.kt2k.com
/__|\__\ /_/ 2000 ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_

Non posso dare il focus ad una finestra non visibile, mi da errore.

Newsgroup: it.comp.lang.delphi
Titolo: Cursori personalizzati

Salve a tutti,
vorrei creare dei cursori personalizzati e ho seguito quanto spiegato da  
Cantu' in Delphi 3.
Ho creato un cursore nel file di risorse Project1.res e l'ho chiamato  
Cursor1.
poi l'ho caricato nell'evento form create e volevo renderlo visibile  
nell'evento click di un panel; il codice e' il seguente (crCursor1 vale 1):
procedure TForm1.FormCreate(Sender: TObject);
begin
   Screen.Cursors[crCursor1] := LoadCursor(HInstance, 'Cursor1');
end;
procedure TForm1.Panel1Click(Sender: TObject);
begin
   Screen.Cursor := crCursor1;
end;
purtroppo non accade nulla e rimane il cursore di default!
cosa ho sbagliato?
-- 
Using Opera's revolutionary e-mail client: 
http://www.opera.com/mail/

mi rispondo da solo:
ho fatto un po' di esperimenti e ho scoperto che il nome del cursore
DEVE essere scritto in MAIUSCOLO.

Newsgroup: it.comp.lang.delphi
Titolo: [NEWS] Delphi Octane, una presentazione

Sul sito del dottor Bob (
http://www.drbob42.com/delphi/index.htm
) c'e' un link
ad una presentazione di delphi octane.
"26/09/2003 - Octane Preview: Delphi for .NET 
Anders Ohlsson and David I have shown previews of Octane at EKon 7 as well as
the special Borland day in The Netherlands (yesterday). An article on Borland
Developer Network covers in some more detail what was shown."
Puntate i vostri browser senza esitazioni qui:
http://bdn.borland.com/article/0,1410,30387,00.html
-- 
Morde. 
(morde at programmer dot net)

 c'e' un link ad una presentazione di delphi octane.
Hanno fatto porting di applicazioni "VCL" a "VCL per .NET" relativamente
semplici, comunque è vero quello che Borland ha sempre avuto un occhio
di maggiore riguardo sulla portabilità dei progetti; al contrario,
Microsoft se n'è un po' fregata, o comunque non è stata in grado di
gestire questa condizione adeguatamente: ho recentemente importato un
progetto VB dimostrativo e semplice in VB .NET e, osservando le
modifiche apportate e il codice generato dal wizard apposito, ho fatto
prima a riscrivere tutto!
Forse il problema è dovuto al fatto che Visual Basic (edizione 6 e
precedenti) era uno strano ibrido object based e procedurale, mentre
Delphi è pienamente orientato agli oggetti, quindi l'adeguamento ad un
framework (.NET) che ragiona ad oggetti e ricalca, concettualmente, le
stesse idee e prerogative della Visual Component Library, ha facilitato
maggiormente la portabilità dei progetti Delphi piuttosto che di quelli
VB.


Un esempio usando BDE ???
Ma non doveva venire abbandonato ?
Per me č meglio cosě.  :-)))
Ciao e grazie per la info.
Marco
-- 
MaoSw
Reporter Professional srl
support...@reporterprofessional.it

prima a riscrivere tutto!
Tutto questo mi spinge a pensare che , se e' vero che Borland e M$ sono sempre
piu' "vicine", non e' che sotto sotto che' l'intenzione di far diventare
delphi il VB del futuro???? 
Delphi = VB del futuro: fantapolitica, informatic fiction... o delirium
tremens da programmatore 31enne scoppiato?



Open Delphi Manual (
http://groups.yahoo.com/group/delphi_open_manual/
)


Se č come dici tu inizio a ballare sulla scrivania !!!!!! :-)))
Ma ci credo poco che sia tutto cosě facile  :-(((
Ciao
Marco


mi pare di aver letto che parte del bde sia stato implementato su .Net.
il dbx ci sta di sicuro.
Mi chiedevo, nessuno va ad Amsterdam a novembre?
Bye
A
Newsgroup: it.comp.lang.delphi
Titolo: Help creazione dinamica di oggetti!

Salve a tutti sono alle prime armi con delphi e stņ cercando aiuto per la
soluzione del seguente problema.
Ho creato in una unita separata, una mia classe di prova che ha due campi
numerici privati, un suo costruttore con due parametri e i soli metodi di
lettura dei suddetti campi privati.
Ora voglio creare un  oggetto di questa classe premendo un tasto e pertanto
ho aggiunto un pulsante al form principale con la chiamata al costruttore
della classe nell'evento click, previo dichiarazione nella sezione var della
unit principale della variabile della mia classe. Ebbene ottengo sempre il
blocco della compilazione con un messaggio di violazione "Access violation
at address 0043C346 in module 'Project1.exe' Read of address FFFFFFFF"
Quale č il problema? Forse non č consentito creare dinamicamente degli
oggetti di una classe?
Grazie in anticipo a tutti.

 oggetti di una classe?
In generale con questo tipo di domande e' consigliabile postare il codice
che genera l'errore.
Il codice corretto e'
var
    o: TMiaClasse;
begin
  o := TMiaClasse.Create(parametri);
  try
    // usi "o"...
  finally
    o.Free;
  end;
  .........

   end;
Ti ringrazio adesso è tutto OK.

Newsgroup: it.comp.lang.delphi
Titolo: db control e dbx

Buondě a tutto l'NG
Ho da porvi un paio di domande...
1- ho una form che in una dbcombobox aggancia un suo datasource che č a 
sua volta collegato ad una sqltable che mi deve restituire tutta la 
tabella ma mi da solo al 1° riga...
2- vorrei sapere perchč i componenti dbedit non mi permettono di 
modificare il record o inserirne uno nuovo
Come posso fare? devo agire sui dataset?
3- Vorrei fare in modo che il mio dataset su un datamodule possa cambiare 
tipo e accettare una query e fare il refresh della griglia, come posso 
fare?
Grazie tante Paolo
p.S. D7 e SQL2000
--
pbonfanti2@*NOSPAM*
inwind.it
Togliere dall'indirizzo *NOSPAM*
Vuoi saperne di piů su python clicca 
http://www.pyj.it

 come posso fare?
questa non l'ho ben capita... :(
AS

 AS
Grazie tante per le tue risposte
Ciao Paolo


 come posso fare?
Non è mai stato scritto che la query non è modificabile.
La property commandtext la puoi cambiare; suggerisco l'aggiunta alla 
sezione public del data module di un metodo come il seguente:
public
    function OpenQuery(ANewSql: string): integer;
...
function Tdm.OpenQuery(ANewSql: string): integer;
begin
     Result := -1;
     MyClientDataset.Close;
     MyClientDataset.CommandText := ANewSql;
     MyClientDataset.Open;
     Result := 0;
end;
Questa tecnica la uso poco. In geneer uso un oggetto diverso per ogni 
singolo caso, usando query parametriche che dovrebbero garantire 
prestazioni migliori.
AS

 AS
Ciao Paolo
--
pbonfanti2@*NOSPAM*
inwind.it
Togliere dall'indirizzo *NOSPAM*
Vuoi saperne di più su python clicca 
http://www.pyj.it

 Ciao Paolo
Ti consiglio di datti una letta in giro ...
leggi la sezione ClientDataSet and dbExpress di
http://community.borland.com/article/0,1410,32262,0.html
ciao
-- 
Gabriele Santomaggio
ICQ# 329902442
Caronte prepara la barca.... si parte per un nuovo viaggio
Newsgroup: it.comp.lang.delphi
Titolo: [bde][d5] windows xp tablet edition

ciao a tutti, devo installare su dei tablet pc un applicativo delphi5 che
utilizza bde con paradox... ho un setup fatto con wise installer che ho
sempre utilizzato e non mi ha mai dato problemi...
se dopo aver installato il setup (che installa anche bde) cambio i permessi
all'utente di windows xp tablet (senza dominio) in modo che faccia parte dei
power user (senza possibilità di installare altro software) sembra quasi che
il bde non funzioni correttamente, ovvero mi da errore aprendo qualunque
tabella... ne sapete qualcosa???
Simone

ho provato anche su winxp professional a casa!!! ho creato un utente
PowerUser e il bde nonostante abbia l'icona dentro il pannello di controllo
non funziona... sembra che le chiavi del registro non siano accessibili da
parte di quell'utente (ho persino tentato di reinstallarlo da dentro
l'utente ma mi da permessi non sufficienti)
che posso fare?
Newsgroup: it.comp.lang.delphi
Titolo: calcolo giorni

Salve, io avrei la seguente necessità :
el mio software, ho due date :
La prima è di partenza del tipo Data assunzione,
la seconta deve essere cancolata in base ai nesi che vengono inseriti
Del tipo , data assunzione 01/01/2004, per mesi 3, dovrebbe venire
01/03/2004
per fare questo calcolo di mesi in modo che lui si vada a prendere da solo
se 30, 31, o 28.
c'è una funzione ?
GRazie ciao.
-- 
Daniele Napoli
s_mu...@tin.it

Ti spedisco questa funzione e il suo utilizzo.
// ____________________________________________________
Function TForm1.SommaTreMesi ( Data : tDate ) : tDate ;
Var
  Giorno, Mese, Anno : Word ;
  iGiorno, iMese, iAnno : Integer ;
  NuovaData : tDate ;
Begin
  DecodeDate ( Data, Anno, Mese, Giorno );
  // le istruzioni seguenti la rendono compatibile con il formato integer
  iAnno := Anno ;
  iMese := Mese ;
  iGiorno := Giorno ;
  // si sommano i 3 mesi
  iMese := iMese + 3 ;
  // Se siamo alla fine dell'anno => dobbiamo tenerne conto
  If iMese > 12 Then
    Begin
      iAnno := iAnno + 1 ;
      iMese := iMese - 12 ;
    End;
  // Ritrasformiamo
  Anno := iAnno ;
  Mese := iMese ;
  Giorno := iGiorno ;
  NuovaData := EncodeDate ( Anno, Mese, Giorno ) ;
  Result := NuovaData
End;
// _________________________________________________
Procedure TForm1.FormActivate ( Sender : TObject ) ;
Var
  NuovaData : tDate ;
Begin
  // Mostra la data
  ShowMessage ( DateToStr (Now)) ;
  NuovaData := SommaTreMesi ( Now ) ;
  // Mostra la data
  ShowMessage ( DateToStr ( NuovaData ) ) ;
End;
Spero che risolva il tuo problema.
Ciao
Mario
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 c'è una funzione ?
La unit /DateUtils.pas/ fornisce la funzione *IncMonth* che accetta come 
parametri la data di riferimento e il numero di mesi che si voglio 
aggiungere (con la possibilità di specificare un valore negativo nel 
caso in cui si voglia sottrarre il numero di mesi; il valore restituito 
dalla funzione è la data calcolata.
Ad esempio
   MyFinishDate := IncMonth(MyStartDate, 3);
aggiunge 3 mesi alla data di inizio.
Ciao! :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 ha scritto nel messaggio
news:v82Tc.104462$OR2.5...@news3.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: acquisire dati da SoundBlaster

Devo acquisire dei valori dalla SoundBlaster (Dall'ingresso "Line In");
Non sono molto esperto e non me la cavo affatto con OLE, ActiveX, COM, DLL e
altre diavolerie.
Per l'analisi dei dati non dovrei avere grossi problemi ma per
l'acquisizione non so che fare, pensavo che fosse necessario lavorare con i
driver della SB ma non so come fare.
Potete darmi un'indicazione su dove e come cominciare?
o altrimenti ditemi dove posso trovare componenti che risolvono il mio
problema.
Grazie!

problema.
ci sono i componenti Multimedia Tools.
E' un package di 50-60 componenti versione shareware.
Li puoi utilizzare tranquillamente senza limitazioni....l'unica pecca della
versione shareware è il fatto che il programma funziona solo sotto Delphi.
Tu provali così vedi se quello che vuoi è possibile farlo.
Non ricordo esattamente quanto costano, mi pare 100 o 200 $ (forse con i
sorgenti pure), ma una volta che li acquisti ti serviranno per sempre.
Ovviamente se ti occorrono solo in questo caso allora vedi tu come gestire
la situazione.
Un' ultima cosa. Li trovi su torry o dsp, ci dovrebbe essere un link. Al
limite scrivimi in privato....mi pare che sono 4-5 Mb di download.
Ciaooooo !!!!!
Antonio Tarolla
BSSoftware Tips Mailing - List Support

 wrote in message
8cfbdl$1lr$1...@news.flashnet.it...

Newsgroup: it.comp.lang.delphi
Titolo: Errore in : " pEnum.Next(1, pPinOut, NIL) "

Allora ho capito che sta roba riguarda le directx , la funzione in riportata
su MSDN qui : 
http://snurl.com/keh
e' identica alla mia in delphi ( non l'ho scritto io , solo che non si
compila il sorgente )
---------------------------------------------------------------
var
  hr : HRESULT;
  PEnum:IEnumPins;
  pPinOut:IPin;
  pInfo:TPin_Info;
...
  while pEnum.Next(1, pPinOut, NIL)=S_OK do
    begin
...
---------------------------------------------------------------
l'errore che da e' : "Typesof actual and formal var parameters must be
identical "
ora sono sicuro che mi manca qualche libreria da qualche parte e il
compilatore non trova i tipi Ienum Ipin ecc..
Come risolvo il problema ?
TNK a tutti
-- 
<Gigio2K>
Sito Comune
Nokia -> I.T.H.N. -> 
http://www.ithn.it/
VB -> I.C.L.VB -> 
http://www.it-lang-vb.net/


Non direi.
Il messaggio indica che alla funzione stai passando un tipo non coerente con
quello dichiarato nel prototipo.
Ciao.
Gianluca.

 coerente con quello dichiarato nel prototipo.
ma e' possibile che con tutti e 3 i sorgenti che ho , di 3 programmi diversi
che guardacaso usano le dx , che non ho assolutamente modificato , se le
carico e le cerco di compilare mi danno sempre lo stesso identico errore ?
il delphi l'ho appena installato , adesso sto scaricando tutti i file pas e
dcu che riesco a trovare e li sto mettendo in una cartella "Lib" che poi
faccio cercare al progetto !
Secondo me , e' questione di file mancanti , se c'e' qualcuno di buon cuore
che vuole verificare :
http://www.republika.pl/jmj_sm/SkySample.rar
 (14Kb ) provatelo a compilare e
se ci riuscite ditemi di cosa ho bisogno per favore :(
la paggina per le info : 
http://www.republika.pl/jmj_sm/Download.html
 dove
si "accenna" all'uso di directshow con il link che e' sempre down al sito di
jedi : 
http://www.delphi-jedi.org/DelphiGraphics/jedi-index.htm
non so + cosa pensare


*"Gigio2K"* ci ha deliziati con queste righe
 Quote:
per essere + precisi tutti i file che hanno :
"Uses directshow"
danno questo problema , ho sia il DirectShow.pas che DirectShow.dcu , li ho
copiati sia nella cartella del progetto che nelle lib di delphi6 :(
nada


*"Gigio2K"* ci ha deliziati con queste righe
 Quote:
scusate mi e' partito il post senza finire il messaggio ^_^
la definizione di ienumpins in directshow.pas e' :
  IEnumPins = interface(IUnknown)
    ['{56A86892-0AD4-11CE-B03A-0020AF0BA770}']
    function Next(cPins: ULONG; out ppPins: IPin; out pcFetched: ULONG):
HRESULT; stdcall;
la relativa chiamata nell'altro progetto e'
 PEnum:IEnumPins;
pPinOut:IPin;
pEnum.Next(1, pPinOut, NIL)
quindi cosa c'e' che non va ?
Nessuno che ha mai usato questa unit che mi saprebbe dare qualche aiutino ?

Newsgroup: it.comp.lang.delphi
Titolo: Campo "Anno": SMALLINT oppure CHAR[4]

Dovendo inserire nella struttura di alcune
tabelle SQL di un database Firebird un
campo "Anno" contenente l'anno di una
certa data mi chiedevo se fosse più
opportuno dichiarare tale campo di tipo
SMALLINT oppure CHAR[4].
Credo che al di là delle differenze logiche,
da un punto di vista di ottimizzazione forse
convenga uno SMALLINT che occupa
2 byte (16 bit) piuttosto che un CHAR[4]
che invece occuperebbe certamente
4 byte (32 bit = 8 bit x 4 caratteri).
Pareri ?
Bye,
Riccardo
---

 SMALLINT oppure CHAR[4].
Io penso che ormai le ottimizzazioni di questo livello non abbiano più molto
senso.
Piuttosto pensa ai vantaggi/svantaggi di uno e dell'altro metodo,
personalmente sceglierei lo smallint, per coerenza (un anno è un numero alla
fine) e per praticità (in tutte le funzioni che estrapolano l'anno da una
data, lo ritornano come numero).
-- 
Jax
====
Scelgo i miei amici per la loro bellezza, le mie conoscenze per la loro
rispettabilità, e miei nemici per la loro intelligenza.

 data, lo ritornano come numero).
Ok, grazie... anche se non lo avevo scritto, il tipo di dato restituito da
YearOf(..),
ad esempio, era una delle cose a cui avevo pensato.... e poi vorrei evitare
che
qualcuno riesca a memorizzare dei caratteri alfabetici nel mio campo anno.

Da un punto di vista di prestazioni, i campi alfanumerici sono sempre + 
lenti in termini di gestione dei numerici interi.
Un integer normale corrisponde a 32 bit che è la parola dei processori 
in uso attualmente e questo comporta che tale tipo viene trattato dal 
processore stesso in modo estremamente rapido.
Se poi hai 50 milioni di record e/o la dim del db x te potrebbe essere 
un problema, meglio un smallint.
AS

 anno.
Alla fine quindi, converrai con me che il gioco (se c'č) non vale la
candela...
(ma poi che caz... vuol dire questa frase???)
Ciao :)
-- 
Jax
====
Ogni tipo di dipendenza č cattiva, non importa se il narcotico č
l'alcool o la morfina o l'idealismo. (Carl Gustav Jung)

 (ma poi che caz... vuol dire questa frase???)
vedi  
http://digilander.libero.it/wb51/paginaperchesidice.htm
Giulio

 vedi  
http://digilander.libero.it/wb51/paginaperchesidice.htm
Interessante! Certi modi di dire sono veramente assurdi, cmq...
-- 
Jax
====
Puoi anche alzarti molto presto ma il tuo destino s'č alzato un'ora
prima.
Newsgroup: it.comp.lang.delphi
Titolo: timagelist ed allineamento

salve,
sto cercando di inserire dinamicamente (caricate da un file ) delle immagini
dentro un timagelist il problema e che non riesco ad allinearle in pratica
se le metto in design-time posso settare le
"opzioni" (come scritto da finestra di dialogo) ma run-time mi imposta
sempre crop e non come cambiarlo. 

 ha scritto nel messaggio
news:YYJNd.843579$35.32...@news4.tin.it...



quella è la lprima cosa che ho fatto ma l'allineamento rimanse sempre
crop...

 ha scritto nel messaggio 
news:FD4Od.851411$35.32...@news4.tin.it...

QUINDI non c'è soluzione... 

 ha scritto nel messaggio
news:iP%Od.526225$b5.24...@news3.tin.it...



E l'allineamento è? (da me crop)  con add dinamico invece da ide è quello 
impostato... nella dialog
:( 


Non capisco cosa intendi per corretto... :| provo come dici tu.. ma non sono 
sicuri che funzioni... 

 ha scritto nel messaggio
news:cupl4o$eri$1...@fata.cs.interbusiness.it...



No forse sono riuscito a capirti... però un cosa non mi quadra... perchè
quando inserisco le immagini da design tutto fila liscio ?

 No forse sono riuscito a capirti... però un cosa non mi quadra... perchè
 quando inserisco le immagini da design tutto fila liscio ?
 Leggi bene che ti ho gia' risposto:


quando inserisco le immagini da design tutto fila liscio ?
perchè a Design hai un EditorForm (praticamente la
finestrella da cui inserisci le immagini) che a seconda
delle impostazioni che scegli fa un certo lavoro sulle
immagini prima di chiamare il metodo di inserimento a
cui accedi direttamente a RunTime. Tu dovresti, con il
codice postato da Giorgio, fare esattamente quello che
fa l'Editor a Design. Un'altra via (e bisogna vedere
se, alla fine dei conti, ne vale la pena) sarebbe
riuscire a sfruttare proprio l'editor che utilizzi a
Design anche a RunTime ... magari anche solo alcuni
metodi.
	Ciao
	MassimoB
 
---------------------------
http://www.massimobeschi.it/

 ha scritto nel messaggio 
news:420e3301$0$32338$5fc...@news.tiscali.it...

Ok ho provato ed ho risolto in parte :
ci sono ancora dei punti devo risolvere :
1) ho provato a modificare la posizione top ed il risultato č come se di 
duplicasse l'immaggine
    come risolvere ?
2)non riesco  a settare la trasparenza ... imposto tutti i parametri ma non 
č mai trasparente la mia immagine ...
    come risolvere ? 


Ho chiesto troppo ?  :|
....
Newsgroup: it.comp.lang.delphi
Titolo: estrarre nome file

Con il seguente codice verifico l'esistenza di un file per poi allegarlo 
ad un messaggio di posta e spedirlo:
if FileExists('nomefile*') then
 begin
  TIdAttachment.Create(TIdMessage.MessageParts,'nomefile*');
  TIdSMTP.Connect(1000);
  TIdSMTP.Send(TIdMessage);
 end;
else Panel.Caption := 'Non esiste il file';
il nome del file ha un * come ultimo carattere perché so come inizia ma 
non come finisce. Il comando FileExists funziona alla perfezione ma 
quando invio il messaggio un messaggio mi dice che è impossibile 
allegare 'nomefile*', il file non viene trovato. Come faccio, una volta 
che FileExists ha trovato il file, a ricavarne il nome completo?
P.S.-L'estensione già la conosco.
Grazie
--- posted by geoForum on 
http://www.delphiedintorni.it

   TIdSMTP.Send(TIdMessage);
non conosco indy, ma se il tidattachment non ha un owner, andrebbe 
liberato dopo l'uso pena un memory leak.
-- 
Alberto Salvati
A NEAPOLITAN Delphi Developer who is studying c# and .net
"Dicette 'o pappece 'nfaccia 'a noce dammi 'o tiempo che pure te spertoso"

"daniele50" ha scritto nel messaggio
[cut]
Il problema dovrebbe esser dovuto al tentativo di allegare 'nomefile*' che 
quindi non identifica un oggetto specifico nel File System. Invece di usare 
FileExists, prova con FileSearch la quale a fronte della stringa di ricerca, 
ti permette di iterare all'interno di una directory e ti restituisce il nome 
del file completo.
Se conosci già l'estensione, conviene cercare 'nomefile*.ext'.
Ciao,
Gianluca. 

Ho provato cosě:
var
  FileToFind: string;
begin
  FileToFind := FileSearch('nomefile*', GetCurrentDir);
    if FileToFind = '' then
      begin
        Panel1.Caption := 'non ho trovato niente!';
      end
    else
      begin
        dtsMail.DataSet.Edit;
        dtsMail.DataSet.FieldByName('invio').AsString := 'Sě';
 
dtsMail.DataSet.Post
;
        Panel1.Caption := FileToFind;
      end;
end;
Il risultato č che se non trova niente in Panel1 esce la scritta 'non ho 
trovato niente!, mentre se trova un file esce 'nomefile*' ma non il nome 
esatto del file. Praticamente il problema č ancora lo stesso: non posso 
allegare un file se non ne conosco il nome esatto...
E adesso?
Ciao a tutti


   FileToFind := FileSearch('nomefile*', GetCurrentDir);
Prova con FidnFirst. Di seguito un link con un esempio:
http://www.delphibasics.co.uk/RTL.asp?Name=FindFirst
guastatore

 Prova con FidnFirst. Di seguito un link con un esempio:
FindFirst :-) Sorry.
guastatore

>Prova con FindFirst. Di seguito un link con un esempio:
Era Proprio questo che cercavo!
Un grazie a guastatore, Alberto e Gianluca!


liberato dopo l'uso pena un memory leak.
Come facico a "liberare" TIdAttachment?


>Come facico a "liberare" TIdAttachment?
Come non detto, ho trovato la soluzione...

Newsgroup: it.comp.lang.delphi
Titolo: come disabilitare la combinazione CTRL + N di internet explorer?

Sto facendo un programmino che permetta alle persona di navigare in un
terminale pubblico senza poter inserire l'indirizzo dove navigare....
Funziona tutto, ma la combinazione di tasti CTRL + N non riesco a
disabilitarla...questa combinazione apre un'altra finestra di explorer e
quindi anche la barra di navigazione e l'indirizzo.
GRAZIE a tutti.
Andre

...

L'unico modo che hai di disabilitare quella combinazione è quella di
caricare un Hook all'interno del processo Explorer e controllare una
eventuale combinazione di tasti con GetAsyncKeyState() ...
Ciao!
--
- Carlo -
Newsgroup: it.comp.lang.delphi
Titolo: personalizzare Dialog Firedac

se imposto
 
FDQuery.ResourceOptions.CmdExecMode := amCancelDialog;
FDQuery.Open;
 
compare un Dialog con titolo FireDac Working
e messaggio Please wait, application is busy ....
 
ovviamnente per un utente finale in Inglese e' poco significative
quindi vorrei modificarle in Italiano.
 
ad ora non ho ancora trovato la unit, da ereditare per modificare
il comportamento, ne sapete il nome ?
 
su FireDAC.Stan.Error e FireDAC.Stan.Consts non trovo niente.

 quindi vorrei modificarle in Italiano.
 
Molto semplice: inserisci il componente *TFDGUIxAsyncExecuteDialog* e usa le sue proprietà per la personalizzazione dei testi.
Non dovrebbe servire null'altro. :)
 
Ciao,
  Marco.
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
 #Home: 
http://www.marco.breveglieri.name
 
 #Blog: 
http://www.compilaquindiva.com
 
 #DelphiPodcast: 
http://www.delphipodcast.com
 

>
 
bene, avevo le property Caption e Prompt davanti al naso ... e non le 
avevo viste;
pero' il pulsante "cancel" .... , e' un TButton se verifico 
FDGUIxAsyncExecuteDialog1.ComponentCount; mi ritorna 0 , cosi' cercare
FDGUIxAsyncExecuteDialog1.FindComponent(TButton) non porta a niente.
 
Servirebbe della documentazione piu' "specifica" di quella fornita 
dall'Help, ci sono certamente una miriade di cose possibili con FD ma
senza certezze non e' pensabile traslare vda dbexpress verso questi 
componenti.
 
 

 componenti.
 
Hai provato a leggere anche le pagine correlate a quella della guida per il componente? Ad esempio, tra le proprietà figura un *AsyncDialog* che suppongo ti faccia accedere alla dialog che viene creata a runtime:
http://docwiki.embarcadero.com/Libraries/XE7/en/FireDAC.Comp.UI.TFDGUIxAsyncExecuteDialog.AsyncDialog
 


>
 
grazie ancora, da questi link
 
http://docwiki.embarcadero.com/RADStudio/XE7/en/Asynchronous_Execution_%28FireDAC%29
 
 
http://docs.embarcadero.com/products/rad_studio/firedac/frames.html
 
 
vedo che  amCancelDialog resta in attesa fino al completamento 
dell'operazione o del suo annullamento, relativamente al Dialog potrei
usare amAsync invece di amCancelDialog , e gestire un form personalizzato
tramite gli eventi FDQuery.BeforeOpen,FDQuery.AfterOpen,FDQuery.AfterScroll
 
con l'uso di amCancelDialog oltrettutto, dovrei verificare l'evento 
FDGUIxAsyncExecuteDialog1Hide(Sender: TObject); per le operazioni da 
eseguire in caso di annullamento
 
http://docs.embarcadero.com/products/rad_studio/firedac/frames.html
 
anche il caso di questo esempio non mi convince
 
ADQuery1.ResourceOptions.CmdExecMode := amAsync;
ADQuery1.Open;
//risulta csOpen  non csExecuting
while ADQuery1.Command.State = csExecuting do
begin
   // do something while query is executing
end;
 
tramite un form esterno magari reinvento l'acqua calda, ma almeno avro' 
il controllo su quello che accade.
Newsgroup: it.comp.lang.delphi
Titolo: Code injection

Salve, ho visto in vecchi messaggi che avete consigliato quanto in oggetto
per non far apparire, nella lista dei processi di Win2000, un determinato
processo.
Ho provato a cercare per la rete ma non ho trovato nulla, qualcuno potrebbe
dirmi dove reperire un articolo, un esempio o quant'altro?
Grazie e ciao

 ha scritto nel messaggio:

questo famoso programmino che si dovrebbe nascondere dalla Task List del TM
di Win2K è una cosa che provo a fare da diverso tempo.
Credo che il metodo più semplice per nascondere la propria applicazione dal
Task Manager sia quella di intercettare i messaggi che dovrebbero giungere
al ListView (mai provato, è una idea).
Per quanto riguarda la Code Injection l'idea è questa: decentri il codice
del tuo programma in una DLL, attacchi la DLL ad un processo noto (ad
esempio Explorer) e scarichi il tuo processo dalla memoria.
L'unica cosa che non mi torna è che quando si scarica il processo viene
scaricata anche la DLL dal processo remoto ... ho notato, infatti, che tale
DLL viene mappata con un base address diverso, forse proprio per evitare di
lasciare DLL in giro. Detto questo ne ho provate tante: dalla creazione di
oggetti come Thread al richiamare LoadLibrary() per incrementare il
reference counter della libreria, ma ogni tentativo è stato vano.
Ciao
--
- Carlo -
cbertu81(at)libero(dot)it


Ciao e ancora grazie

> Eppure ci deve essere un motivo..
Volevo scrivere: "eppure ci deve essere un MODO..."
Scusa, ma nonostante l'ora mi sono appena svegliato.
ciao ciao

 Eppure ci deve essere un motivo..appena scopro qualcosa ti avviso.
[ci deve essere un modo]
Si, sicuramente c'č qualche tecnica ma bisogna vedere a che livello viene
implementata. So che c'era un Trojan che permetteva di installare il Server
senza visualizzarlo sul TM di Win2K, se non erro si chiamava Back Orifice
GUI (BOGUI)


 GUI (BOGUI)
Magari lo cerco anche se è un programma già fatto


 dovrebbe usare LVN_GETDISPINFO sul Parent) come i SysTreeView32.
senza considerare che io non uso quasi mai Task Manager, ma tlist (che 
becca anche le DLL). Comunque, il trucco è di non usare funzioni di 
Win32
-- 
 < 
http://www.reactos.com/
 >  Open source clone of Windows NT. Current
     Don't stand, REACT!      version 0.0.20. C, C++ and ASM developers
                              and beta testers are welcome!

  GUI (BOGUI)
mi sembra che ci siano in giro i sorgenti ...
--
Davide Consonni
(
davidec...@virgilio.it
)


Non potresti essere un pò più precisa?
Ti ringrazio, ciao ciao

Newsgroup: it.comp.lang.delphi
Titolo: Download Delphi 7

Sapete se c'è un sito dove si può scaricare una versione dimostrativa di
Delphi 7 ?
Grazie
Donato Di Tullio


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

Ciao a tutti!
Sono nuovo in Delphi, arrivo da poco da VB.NET...
La domanda probabilmente sembrerà semplice ai più, ma per me è un 
bell'intoppo! :-)
Ho creato una classe, che ha tra i membri "public" un TClientDataset.
Nela Form principale, creo l'oggetto, e faccio riferimento al Dataset 
pubblico impostandolo come Dataset di un DataSource che si trova nel Form, 
praticamente con "Datasource1.Dataset := Object.Dataset".
Sembrerebbe tutto ok (a me che non mi giostro in Delphi), invece continuo ad 
avere eccezioni di Access Violation!
Come posso fare???
Grazie 1000 a chiunque mi possa rispondere! 

 continuo ad avere eccezioni di Access Violation!
quand'è che ti solleva queste eccezioni AV?
-- 
Mauro Falzari 
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

Lory82 ha scritto:

Controlla se prima del form istanzi la classe e se la classe comunque è 
istanziata prima dell'assegnazione.
Se si, controlla che, prima dell'assegnazione, il TClientDataset sia 
stato effettivamente istanziato.
Il 90% degli Access Violation dipendono appunto dall'assegnamento di 
oggetti non ancora istanziati o già deallocati.

 Come posso fare???
Da come hai descritto il problema, sembra che tu faccia il collegamento 
tra questi componenti "a runtime"... ho toppato? :-)
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 ha scritto nel messaggio 
news:43469a7d$1...@newsgate.x-privat.org...


 però è una gran bella scuola così :)
Per la verità, soprattutto se usi la libreria VCL, credo che creare 
interfacce associate ai dati sia nettamente più semplice in Delphi che 
non in 
VB.NET
. :-D
Ciao,
   Marco.


   Marco.
Imparo ancora un po', poi ti saprò dire... :-D
Newsgroup: it.comp.lang.delphi
Titolo: controllo OpenOffice Ole Sdk ?

devo aprire da Delphi un Documento OpenOffice, e con Ole ho trovato il 
modo di farlo;
quando l'utente salva il documento devo intercettare il "Nome del 
documento salvato" , che poi servirà per altri scopi.
 
l'obiettivo e' quindi intercettare l'evento Salva / Salva con Nome.
 
se uso l'Sdk dovrei avere delle .dll da usare in Delphi, ma mi pare che
la documentazione SDK sia ingarbugliata, non ho ancora capito cosa 
utilizzare per accedere alle API
 
sapete darmi qualche indicazione.
 
Maurizio
 
Ho installato l'SDK di OpenOffice , ma non trovo esempi in Delphi
(solo C++ , Java , Vb.net)
C:/Program Files (x86)/OpenOffice.org 3/Basis/sdk/examples/examples.html
 
http://development.openoffice.org/#OLE
 
 
mi rimanda
 
http://wiki.services.openoffice.org/wiki/Documentation/DevGuide/OpenOffice.org_Developers_Guide
 
 
see Delphi sample included in SDK mi rimanda a 
http://development.openoffice.org/#COMPONENTS
 
 
esempio apre e esporta in pdf
http://www.oooforum.org/forum/viewtopic.phtml?t=22344
 
 
 

..ma tu hai provato a i mportarti la type library di OpenOffice?
 
 
A.


dovrei aver trovato documentazione su questa per farlo,
magari se puoi essere piu' preciso;
 
se googlo OpenOffice TypeLibray o OpenOffice TypeLib
non trovo riferimenti a questa libreria.
 
ho trovato che glie eventi che cerco sono
onSave , onSaveAs che fanno parte dell'interfaccia 
com.sun.star.document.XEventListener
 
qui ho esempi vb / C++ che si riferisco a UNO
 
http://wiki.services.openoffice.org/wiki/Documentation/DevGuide/OfficeDev/Document_Events
 
 
in Delphi potrei dichiarare
 
OOoReflection, OOoListener, OOoListenerE, xMethod : Variant;
 
OOoReflection:= CreateUnoService('com.sun.star.reflection.CoreReflection');
OOoListener:= CreateUnoService('com.sun.star.document.XEventListener');
OOoListenerE := 
OOoReflection.forName('com.sun.star.document.XEventBroadcaster');
xMetod := OOoListenerE.getMethod('addEventListener');
 
ma manca ancora la gestione dell'evento dall'esempio Vb
 
Sub DocumentListener_notifyEvent( o as object )
 
  IF o.EventName = "OnPrepareUnload" THEN
       print o.Source.URL
  ENDIF
 
end sub
 
comuqnque tutto si riferisce a uno a non alla Type Library di cui parli;
senza un'aiuto resto arenato.

 magari se puoi essere piu' preciso;
 
La type library e' un descrittore dell'interfaccia esposta da un
server COM/OLE.
Dal menu Project scegli "import type library".
Ti esce la lista di quelle disponibili.
Se trovi quella di OpenOffice la importi e a quel punto ha una unit
che contiene una interfaccia che espone quanto ti serve.
 
A.
Newsgroup: it.comp.lang.delphi
Titolo: colore item in treeview

salve a tutti, vorrei sapere come si fa ad avere il colore di selezione 
degli items uguale sia che il treeview abbia il focus che non.
sto provando a smanettare con l'evento AdvancedCustomDrawItem
con il seguente codice
if cdsSelected in State then
    Sender.Canvas.Brush.Color:=???;
imposto il colore di selezione ma non so da dove prendere il colore di 
default quando il controllo ha il focus.
spero sia chiaro, grazie.
-- 
 

 default quando il controllo ha il focus.
Prova semplicemente ad evitare l'impostazione del colore; se non erro, 
quello che viene proposto è il predefinito e, nel caso in cui non 
applichi modifiche, dovrebbe essere mantenuto per il tracciamento 
dell'elemento.
Ciao! :-)
-- 
MARCO «Alka» BREVEGLIERI
   (
http://www.marco.breveglieri.name
)
Leggi le FAQ di ICLD: 
http://icld.altervista.org


Grazie :)
ma non ho capito bene quello che intendi :-(
Ciao! ;-) 

 Ciao! ;-) 
Mi spiego meglio: suppongo che Delphi scelga per ciascun elemento il 
colore predefinito, che poi tu sostituisci con quello che desideri 
utilizzare per il tracciamento al suo posto.
Se non modifichi il colore da utilizzare, suppongo che Delphi adotti già 
autonomamente quello predefinito.
Va meglio ora?

Newsgroup: it.comp.lang.delphi
Titolo: istruzione with ... do

Salve a tutti
vorrei sapere se si  puo' risolvere il fastidioso inconveniente per
cui in fase di debug non si puo' vedere il contenuto dei campi o
proprieta' di un oggetto quando queste sono all'interno del costrutto
with MyObject do
begin
     ....  property   ....
end;
ossia per vedere il contenuto di property devo scrivere
esplicitamente:
 MyObject.property
grazie
Luca

Luca
	Ciao
	MassimoB
 

)

 individuare. :-)
Ma che sento! Io invece il with-do lo trovo un costrutto bellissimo per
aumentare la leggibilità del codice e ogni volta che uso il Builder me lo
piango
-- 
_________________________________________
Edmondo Di Tucci snar...@Ttin.it
guarda i miei lavori su: 
www.powernetsi.it/edmondo

 Builder me lo piango
Probabilmente sarà una questione di gusti, ma sono dell'opinione che
meno istruzioni ci sono e più è leggibile il codice. :-)
Ad esempio, preferisco scrivere
===
...
Canvas.Brush.Color := clWhite;
Canvas.Brush.Style := bsSolid;
Canvas.Pen.Color := clBlack;
...
===
piuttosto che
===
...
with Canvas do
begin
  Brush.Color := clWhite;
  Brush.Style := bsSolid;
  Pen.Color := clBlack;
end;
...
===
Supponendo che l'ipotetico controllo grafico contenente queste
istruzioni abbia pure delle proprietà Brush e Pen come spesso avviene,
c'è il rischio di generare confusione nell'uso del With, oltrechè
complicare inutilmente la scrittura di codice (a mio avviso).
In definitiva, tendo sempre a riservare l'uso del costrutto "with...do"
solo per quei casi in cui è quasi indispensabile (ad esempio, con più
istruzioni esageratamente lunghe e complesse).


E allora controribatto
In un programma in Builder ho una struttura dati che contiene un datamodule
Per accedere a un campo di un record di un  dataset devo scrivere ogni volta
cp->DataMod->DataSet->Params->ParamsByName("dsfsd")->Value=bla bla bla
E questo per 5 o 6 righe successive
Usando un with avrei solo scritto
with cp->DataMod->DataSet->Params do
  begin
    ParamsByName("dsfsd")->Value=bla bla bla
  end
Io ci vedo una leggibilità superiore
Poi il bello della programmazione è che ognuno può fare quello che vuole
basta che alla fine l'applicazione funzioni

Newsgroup: it.comp.lang.delphi
Titolo: Intercettare tutti i tasti contemporaneamente

Come faccioad intercettare più tasti contemporaneamente?
ovvero:
diciamo che sto premendo il tasto freccia in basso e fin qui ok, ma
vorrei che se premo un altro tasto questo venga intercettato ma il
tasto precedente continui ad essere controllato.
E' possibile?
esempi?
Mi è venuta l'idea dei thread ma non credo sia la soluzione giusta.

 Mi č venuta l'idea dei thread ma non credo sia la soluzione giusta.
Non ho mai provato, ma dovresti poter tranquillamente controllare gli eventi 
KeyDown e KeyUp. Questi scattano sempre, anche se altri tasti sono 
attualmente abbassati.
Quindi con una matrice di boolean, dove:
- nel keydown imposti a true l'elemento corrispondente al tasto che ha fatto 
scattare l'evento;
- nel keyup imposti a false l'elemento corrispondente al tasto che ha fatto 
scattare l'evento.
Per il resto, ti basta analizzare lo stato della matrice per sapere quali 
tasti sono attualmente abbassati.
Ciao,
Gianluca. 

 > Mi è venuta l'idea dei thread ma non credo sia la soluzione giusta.


Newsgroup: it.comp.lang.delphi
Titolo: aiuto x newbie

ragazzi scusate se posto una domanda cosi' semplice ma sono un novizio di
delphi e ringrazio
tutti quelli che mi risponderanno , una volta compilato questo codice mi da
un errore di access violation
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;
type
  TForm1 = class(TForm)
    Button1: TButton;
    Edit1: TEdit;
    procedure Button1Click(Sender: TObject);
  end;
  Tsomma = class
  ris : integer;
  procedure somma(quanto:integer);
 end;
var
  Form1: TForm1;
  sommo:Tsomma;
implementation
procedure Tsomma.somma(quanto:integer);
begin
***********ECCO LE RIGHE DOVE HO L'ERRORE*********************************
sommo.ris:=0;
sommo.ris:= ris + quanto;
***********************************************************************
end;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
  sommo.somma(3);
  edit1.Text := intToStr(sommo.ris );
end;
end.

 end;
[CUT]
Manca la creazione della classe sommo; prima di richiamare qualsiasi
procedura di sommo devi avere una riga da qualche parte del tipo : sommo :=
TSomma.Create; altrimenti fai riferimento a ris che non esiste.
Inoltre, sbagli xchè all'interno del metodo Somma della classe TSomma, fai
riferimento a sommo che è un'istanza di TSomma; dovresti scrivere
semplicemente:
begin
  ris := 0;
  ris := ris + quanto;
end;
Cioè assegni il valore che ti interessa alla proprietà della classe, non
all'istanza.
In questo caso ti funziona ugualmente xchè appunto fai riferimento a sommo:
begin
  sommo.ris := 0;
  sommo.ris := ris + quanto;
end;
ma se provi a creare un'altra istanza con un altro nome, vedrai che il
programma crasha.
Bye

GRAZIE  ora funziona
Newsgroup: it.comp.lang.delphi
Titolo: Blaise Pascal Magazine

Volevo segnalare che su questo sito 
http://www.blaisepascal.eu/
 è 
possibile scaricare il pdf della rivista dedicata a Delphi ed al mondo 
Object Pascal in generale. Dopo l'iscrizione il download è free per 
questo primo numero; per i successivi ancora non ho capito se continuerà 
ad essere free oppure no.

 ad essere free oppure no.
Sono quattro uscite all'anno: Free per il PDF, a pagamento la versione
cartacea.
Fonte:
http://groups.google.it/group/borland.public.delphi.non-technical/browse_thread/thread/f2153d7507882755/df7634254fcffbc1?hl=it&q=Blaise+Pascal+Magazine&lnk=ol&#
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ad essere free oppure no.
Bentornati nel 1983 :-)


> Bentornati nel 1983 :-)
Avevo letto che esisteva da tempo ma non immaginavo fosse cosě 
conosciuta :-O.
Antonio ;-)

 
http://groups.google.it/group/borland.public.delphi.non-technical/browse_thread/thread/f2153d7507882755/df7634254fcffbc1?hl=it&q=Blaise+Pascal+Magazine&lnk=ol&#
Grazie per le info ;)
Antonio

Newsgroup: it.comp.lang.delphi
Titolo: Kylix: MySqlclient.so mancante

Dopo aver installato Mandrake 9.1, ora non mi funziona più Kylix con i
database  MySql. Quando cerco di eseguire un
programma che si connette ad un database MySql, mi da il seguente messaggio
di errore: MySqlclient.so mancante
Qualche delucidazione, o qualghe consiglio?
Francesco
Bruce Eckel's Free Electronic Books
http://www.teachingonline.it/Bruceeckelbooks/


    Via De Gasperi, 14 - 42019
    Scandiano (Reggio Emilia)

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

Qualcuno sa se esiste e se c'e' quale è il limite di record gestibili dal BDE?
--
Ciao,
David

 Qualcuno sa se esiste e se c'e' quale è il limite di record gestibili dal BDE?
google?
-- 
Alberto Salvati
A *Neapolitan* delphi developer that is studing c# & .Net

> Qualcuno sa se esiste e se c'e' quale è il limite di record gestibili dal
BDE?
Non so se ne abbia uno, ma comunque il limite di record gestibili è legato
al DB.
Il BDE è solo un "ponte" tra l'utente e il database.

 dal BDE?
Vedi    
http://www.bdesupport.com/faq.htm
  (secondo link).
Giulio 

Grazie era quello che cercavo
--
Ciao,
David
Newsgroup: it.comp.lang.delphi
Titolo: Leggere un foglio excel

Salve a tutti.
Potreste darmi un suggerimento per instradarmi al problema in oggetto!
Vi spiego che cosa vorrei fare:
Ho un archivio di nomi e numeri di telefono, in Excel ovviamente.
Vorrei poter ricercare tramite Delphi un nome (magari che mi venga
restituito X,Y per righe/colonne)
e leggerne il numero nella cella a fianco.
Scusate la banalità ma sono alle prime armi!
Grazie mille.
Maveric.

 restituito X,Y per righe/colonne)
[Cut]

Grazie mille.
Darň un'occhiata!
Ciao.
Maveric!

Newsgroup: it.comp.lang.delphi
Titolo: D3 pro e windows XP

Il mio problema e' questo, fino all'altro giorno tutto filava liscio, poi ho
avuto l'idea di installare SP2, al che non partiva piu' il mio portatile.
Allora ho deciso di reinstallare tutto con il disco di ripristino, ad
installazione avvenuta (di windows), installo Delphi3 Pro, tutto fila lisco
ma quando vado ad aprire una form con QReport mi da' un errore di accesso,
non funzionano nemmeno gli esempi di Delphi, mentre per le applicazioni
senza report non hanno nessun problema. Qualcuno di voi sa' a cosa essere
dovuto questo problema e come risolverlo? Ho gia' piallato il disco 4 volte
e ho sempre ottenuto lo stesso risultato.
Grazie
Alan

Alan Serpini ha scritto:

ho D2, per cui non potro' essere troppo preciso.
hai installato l'ultima versione di quick report, per il 3 credo che sia 
la 2.0k.
il D2 aveva problemi con la Fat32, non e' che usi un BDE non aggiornato 
(sempre se i report contentono DB).
Ultimo caso (disperato) se non hai installato una stampante, prova a 
metterne una fittizia (che soluzione formato-VB :-( )
ciao
-- 
-------------------------------
per scrivere in privato
togliere "1975nosp"
to reply remove "1975nosp"

 metterne una fittizia (che soluzione formato-VB :-( )
Era esattamente questo il problema, che tristezza infinita :-(
Grazie
Alan

Era esattamente questo il problema, che tristezza infinita :-(
La stessa cosa e' successa da alcuni miei clienti su un mio programma:
installato su macchine nuove, scoppiava alla partenza senza dare messaggi
significativi, neache il log evidenziava perche' scoppiava.
Debuggando mi sono reso conto che scoppiava sulla create del reportdesigner
(un form con capacita' di editing dei reports)... allora guardo le stampanti
installate e.. sorpresa: nessuna.
Ho risolto con un pezzo di codice che utilizza 
Printers.Printer.Printers.Count che restituisce il numero di stampanti
installate e
Printers.Printer.Printers che e' un tstringlist che contiene i nomi delle
stampanti presenti.
if Printers.Printer.Printers.Count =  0 then .....
else ...
Almeno cosi' si sapeva il perche' scoppiava il programma.
Ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/


Scusate l' OT , ma anche M$Word in questo caso non fa usare i font true type 
...
Giulio
Newsgroup: it.comp.lang.delphi
Titolo: compilare per un inesperto

Mi han dato un sorgente delphi e vorrei compilarlo,ma di delphi e di come si 
usa ad esempio lazarus non so proprio niente.Qualcuno mi d� qualche 
indicazione su come fare?
Ad esempio appena carico il sorgente in lazarus mi appare l'errore unit 
graphics.....
Il listato comincia cos�:
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, AdvEdit, AdvEdBtn, ExtCtrls;
Che devo fare?
Grazie

 indicazione su come fare?
[...]
Ci dai troppe poche informazioni: specifica l'origine dei tuoi sorgenti 
da dove proviene, da che versione di delphi. E con che versione del 
compilatore vuoi ricompilare: lazarus? delphi?
Sembrerebbe che vuoi ricompilare in lazarus un progetto delphi nativo..
Ciao
-- 
Morde


Ho cercato sul web un compilatore delphi e mi sono ritrovato Lazarus.
Non va bene?
Quale potrei utilizzare per delphi nativo che permetta di utilizzare oggetti 
grafici windows?
 

 necessarie e quali accessorie.
Ti capisco, tutti siamo partiti da zero. ;-)
Innazitutto fornisci il link che ci permette di scaricare i sorgenti: 
te l'avevo giï¿œ chiesto nel post precedente ma non hai ancora detto dove 
andarli a prendere.
Un consiglio: se quello di cui hai bisogno e' un software di 
crittografia, ce ne sono molti gratuiti online senza che ti devi  
scaricare lazarus e tentare una compilazione senza sapere da dove 
incominciare. Vedi qui ad esempio:
http://it.wikipedia.org/wiki/Elenco_di_programmi_open_source#Crittografia
Ti chiedo: per quale scopo fai tutto questo? Per imparare delphi, per 
motivi di studio? Oppure ti serve solo un qualcosa che cripta/decripta 
testo?
Ciao
-- 
Morde


In effetti tutti e tre i motivi.
Ciao

 In effetti tutti e tre i motivi.
Benvenuto a bordo, allora :)
Ciao
PS: Followup su it-alt.comp.lang.lazarus
-- 
Morde

In effetti tutti e tre i motivi.
Benvenuto a bordo, allora


Newsgroup: it.comp.lang.delphi
Titolo: Help su filesharing code

qualkuno sa dove reperire info sul filesharing?
io sto preparando un progetto titanico, ma non ho idea di come impostare poi 
il filesharing con altri utenti.
la parte in locale non mi crea problemi, ma ho necessitą di non passare su 
reti tipo gnutella etc. 

 qualkuno sa dove reperire info sul filesharing?
http://www.all-science-fair-projects.com/science_fair_projects_encyclopedia/File_sharing
Ci sono anche un mucchio di link da seguire.
Ciao 
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it