mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Utenti e Connessione VPN

Buongiorno a tutti del NG,
avrei la necessit� di identificare univocamente gli utenti che si collegano 
dall'esterno attraverso una VPN alla mia applicazione per gestire 
correttamente una mia tabella in cui vado a registrare i dati di login e 
logout dei vari utenti perch� mi serve sapere chi � in linea in un dato 
momento e per controllare il numero di accessi.
 
Per la rete interna non ho problemi perch� registro i seguenti dati.
- UserName dell'utente windows collegato
- ComputerName che � il nome del computer da cui � collegato
- ipaddress del computer che � collegato
- id dell'anagrafica che ha effettuato il login nella mia procedura.
 
Se un utente si collega in VPN ComputerName ed ipAddress sono quelli del 
server che risponde alla connessione vpn e se viene utilizzato lo stesso 
utente per l'accesso da pi� postazioni sono fregato e non identifico 
distintamente gli utenti.
 
Sapreste indicarmi come posso fare per identificare univocamente gli utenti 
connessi ?
 
Grazie
 
Alberto 
 

 Alberto
 
rendi univoco il nome utente
 
-- 
Oggi c'e' una grande battaglia di idee,
ma alla fine non ci saranno ne vinti,
ne vincitori, ne idee! S. Benni da Elianto.

Newsgroup: it.comp.lang.delphi
Titolo: programmatori poker?

Se siete giocatori di poker e volete condividere con me le vs esperienze di 
programmazione con delphi potete contattarmi al seguente indirizzo
narcis...@jkspamsupereva.it
togliendo il jkspam evidentemente...
Sto incasinato con il conteggio di out e odd ... io gioco su pok..stars
A presto! 

"NB" <n...@IXl.com> ha scritto nel messaggio news:g20hql$h48$1...@aioe.org...

se si guadagna ti aiuto io, ho lavorato con la trasformazione di VideoPoker 
da console a
Delphi Application.
______________________
Gaetano
"Nel coltellino svizzero di Chuck Norris c'č McGyver"

Newsgroup: it.comp.lang.delphi
Titolo: Dichiarare array come costante

 
          Ciao a tutti,
è possibile dichiarare un array come costante?
Sto facendo manutenzione ad un programma in cui all'inizio vengono
assegnati, elemento per elemento, i valori iniziali che poi nel resto del
programma vengono solo letti e non modificati.
Un mio collega dice di ricordarsi che è possibile dichiarare un array come
costante con già gli elementi valorizzati, ma ne' io ne' lui ci ricordiamo
come si fa.
Grazie in anticipo, Mario
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Grazie in anticipo, Mario
	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 ...
---------------------------------

 prendete ;)
Hai pienamente ragione, il problema è che uso Lazarus e a volte si fa fatica
a cercare qualcosa

Newsgroup: it.comp.lang.delphi
Titolo: Exe.





Ciao a tutti, vorrei sapere come si fà a creare i 
programmi .exe col Delphi, la mia versione è la 3.0.


Grazie mille a tutti.


Ciao.


        DA


bal...@libero.it







Ciao a tutti, vorrei sapere come si fà a 
    creare i programmi .exe col Delphi, la mia versione è la 
    3.0.


 


A prescindere che Delphi non crea programmi che non siano 
    .exe (il resto sono DLL o roba simile, ma non programmi...). 


In delphi4 vai sul menu Project e scegli 
    compile.


Ma se lanci il tuo 
    programma dall'ide l'exe viene creato per forza...


 


Saluti


 


AS


 


"Se è Microsoft non 
funziona"

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

ho intercettato l'evento MouseUp in questo modo:
procedure MouseUp(Button: TMouseButton; Shift: TShiftState;
    X, Y: Integer); override
procedure Button.MouseUp(Button: TMouseButton; Shift: TShiftState;
    X, Y: Integer);
begin
...... miei calcoli
exit;
......
end
vorrei che dopo eseguite le mie istruzioni non venga più eseguito l'evento
della classe madre che invece viene eseguito ugualmente.
Non richiamo in nessun modo inherited all'interno della mia procedura però
richiama sempre l'evento ....
Come posso fare?
ciao


chiedo scusa per la domanda errata non prendetela in considerazione ....
sorry

Newsgroup: it.comp.lang.delphi
Titolo: [D5] GetFileTime lavora male

Ciao a tutti.
Nella mia applicazione ho necessità di utilizzare la procedura
GetFileTime
delle SDK per ricavare la data di creazione di un file, solo che non
ritorna sempre lo stesso valore. In particolare ho notato che su
win2000 lavora bene, sul 98 no, e forse perche' è settato il
"passaggio automatico all'ora legale".
Sapete consigliarmi un metodo analogo per ricavare la data di
creazione del
file, che pero' funzioni?
Grazie
  Fodox

file, che pero' funzioni?
Prova con FileAge in combinazione con FileDateToDateTime.
->F1, "file management routines" per maggiori infos.
-- 
Morde. 
Ci stiamo preparando per il seminario su Octane 
che si terra' il 3 Feb a Milano! info su
http://it.groups.yahoo.com/group/icld/

 ->F1, "file management routines" per maggiori infos.
Ho già provato, ma FileAge ritorna la data e ora dell'ultimo accesso,
non la data di creazione del file.
  Fodox

non la data di creazione del file.
prova qui:
http://snipurl.com/46dm
 
http://snipurl.com/46dl
Ora non puoi non risolverlo. ;)


 Ora non puoi non risolverlo. ;)
...infatti ho risolto!
grazie tante,
  ciao ciao

Newsgroup: it.comp.lang.delphi
Titolo: Corso Delphi per TPisti

Salve !
Sto scrivendo un corso di Delphi per TPisti, ma non so se continuare. Vorrei
avere un'idea di quanta gente lo seguirebbe, cosě se ognuno degli
interessati potesse mandarmi una mail in priv, gliene sarei grato.
Se poi in questa mail potessi anche conoscere le Vostre preferenze sareste
veramente preziosi.
Detto questo vi saluto.
Andrea.
P.S. Il corso č gratuito, quindi non esitate !!!!!!

Io sarei interessato conosco il TP ma non ho la minima idea di come usare
delphi
Per ora l'ho solo installato...e mi piacerebbe imparare
Salve
Andrea Nannicini

 wrote in message
8bool5$opd$1...@nslave2.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: Generatore di frequenza con scheda audio

Come da oggetto volevo generare un suono in forma sinusoidale e/o
triangolare e poterne variare frequenza ed ampiezza, esiste qualche
tool...come devo fare?
Grazie.....

IW0UVW wrote:

http://www.torry.net
 , c'e' sicuramente il componente che ti serve.
-- 
I'am what I'am, I do what I can

Newsgroup: it.comp.lang.delphi
Titolo: Domanda su TSession

Salve, avrei una domanda da porre sugli oggetti TSession. Se ho capito bene,
quando realizzo un'applicazione che gestisce un database ho un oggetto
SESSION globale, a cui fanno riferimento per default tutti gli oggetti
TDatabase, TTable e cosi' via. La mia domanda e': se l'utente in qualche
modo da me non previsto (tipo CTRL-ALT-CANC + "Termina operazione") chiude
l'applicazione in una fase "delicata" (es. mentre sta inserendo/modificando
dati), mi basta mettere nell'evento OnDestroy del main form l'istruzione
Session.Close per chiudere tutte le tabelle e i database? E nel caso fosse
cosi', cosa succederebbe a tutte gli aggiornamenti "sospesi"?
Faccio un esempio:
- Apro applicazione
- Apro il TDatabase "MioDatabase"
- Apro una transazione con "MioDatabase.StartTransaction"
- Apro la tabella "MiaTabella1", che ha come proprieta' DatabaseName
"MioDatabase" e comincio a fare una modifica
- Apro la tabella "MiaTabella2", associata al database di default (non
"MioDatabase")
- Eseguo un "MiaTabella2.Append" e inizio a fare modifiche (lo so che e' una
situazione un po' assurda e scorretta, ma non si sa mai, ipotizzo il caso
peggiore)
- L'utente mi chiude improvvisamente il programma: nell'evento OnDestroy
eseguo un "Session.Close"
Di seguito ci sono i miei dubbi:
- "MioDatabase" viene chiuso, giusto? Che fine fa la transazione? Pensavo a
un rollback automatico, ma vorrei una conferma
- Anche "MiaTabella2" viene chiusa, e non ha transazioni: anche in questo
caso viene effettuato un "Cancel"?
Scusate se mi sono dilungato, ma volevo cercare di essere il piu' chiaro
possibile. Vi ringrazio in anticipo per le risposte.
Daigo
--
And the beast shall come forth surrounded by a roiling
cloud of vengeance. The house of the unbelievers shall
be razed and they shall be scorched to the earth. Their
tags shall blink until the end of days.
From The Book of Mozilla, 12:10

 caso viene effettuato un "Cancel"?
No, non è mai avvenuto il post...
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply

No, non č mai avvenuto il post...
Si', pero' il Cancel e' il contrario del Post: se si fa il Post non si puo'
fare il Cancel e viceversa. Alla fine se MiaTabella2 viene chiusa le
modifiche non vengono salvate, esattamente come sa avessi fatto un Cancel.
Ciao
Daigo

 come sa avessi fatto un Cancel.
In realtà però non fai nessuno dei due...
L'impressione è quella ma sia il rollback che una chiamata a Cancel sono
"azioni di annullamento" (le devi chiamare), i dati che si perdono nella
cache o che non sono ancora stati inviati al server vanno proprio persi, non
è che li scarti tu...

Newsgroup: it.comp.lang.delphi
Titolo: cancellare timage e tbmp

sto im plementando delle procedure per scrivere su delle timage e dei 
tbitmap.
uso la funzione paintto(canvas,x,y) per disegnare sulle immagini..
pero' mi succede che se disegno prima un'immagine grande e poi una 
piccola... parte di quella grande rimane sul canvas.
MI sevirebbe sapere come posso cancellare il canvas prima di ridisegnarlo.
Ho cercato una cosa tipo timage.clear.. ma non l'ho trovata...
Qualuno puo' suggeriire qualcosa?
Grazie! 

 MI sevirebbe sapere come posso cancellare il canvas prima di ridisegnarlo.
Se ho capito bene cosa vuoi fare, scegli il colore che vuoi come sfondo, 
poi FillRect :)
-- 
===============================================================
Alberto Rubinelli - A2 SISTEMI 
news.aioe.org
 ThunderBird 2.0.0.0
Via Costantino Perazzi 22 - 28100 NOVARA - ITALY
Tel 0321 640149   Fax 0321 391769   BBS 0321 392320
Mail: 
alb...@oldcomputers.de
skype: albertorubinelli  ICQ : 49872318
Visita il mio museo di computers: 
http://www.oldcomputers.it
===============================================================

 Qualuno puo' suggeriire qualcosa?
Assegna il valore *nil* alla proprietà Picture.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Newsgroup: it.comp.lang.delphi
Titolo: TImage dinamicamente create

Salve a tutti,
sto creando un gioco di (quasi) dama: ho creato due oggetti di tipo TImage
per le pedine e li ho nascosti. Ogni volta che l'utente clicca sulla
scacchiera, si dovrebbe creare un nuovo oggetto (locale alla funzione) di
tipo TImage che copia le stesse proprietà degli oggetti 'pedine' e appare
dove è stato premuto il tasto del mouse (questa ultima parte del codice è
più che facile !!!).
Ho provato in tutti i modi ma non ci sono riuscito: ricevo strani errori di
StackOverflow quando dico pedina.Picture.Create(); o qualcosa del genere...
Spero che questa non sia una domanda tipica del ng, per cui accetterei di
buon grado anche un semplice link verso qualche sito che parli di Delphi,
non costringendo alcuno a spedirmi codici (a meno che non voglia aiutarmi).
Ringrazio sin da ora chiunque mi sarà d'aiuto.
Buon Delphi,
Mkè

 wrote in message
_nZ27.6753$2v6.2...@news.infostrada.it...

Come crei la tImage?
Hai fatto una cosa così?
funcion prova;
var
 tmpImage : tImage;
begin
  tmpImage := tImage.Create(form1);
 tmpImage.Top := 10;
 tmpImage.Left := 10;
 tmpImage.Width := 100;
 tmpImage.Height := 100;
 tmpImage.Parent := form1;
 tmpImage.Picture.Assign(image1.Picture.Bitmap);
end;
Newsgroup: it.comp.lang.delphi
Titolo: [ZEOS] ZQuery di Insert non eseguita

Vorrei sapere se è come può capitare che un codice del genere possa 
provocare un'eccezione, tenendo in considerazione che la SQL è 
formalmente corretta e verificata attraverso altri strumenti e il db non 
è loccato (D7, MySql 4.0.24, ZEOS 6.1.5):
ZQ1.Close;
ZQ1.SQL.Clear;
ZQ1.SQL.Add(InsertSQL);
ZQ1.ExecSQL;
Formalmente è corretta e funziona 99/100. Naturalmente il programma fa 
anche altre cose. La domanda quindi è: possibile che alcune operazioni 
sul database possano automaticamente bloccare le tabelle impedendo ad un 
sql di questo tipo di portare a termine l'operazione e sollevare 
un'eccezione in delphi ? Cosa altro potrebbe causarla ?
Daniele

 Cosa altro potrebbe causarla ?
Vedi sopra: riporta il tipo di eccezione.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 
Ok purtroppo non è un errore che riesco a replicare dato che questa sql 
come dicevo funziona al di fuori dell'ambiente attraverso il 
mysqlquerybrowser 100/100 (provata) ma sotto l'applicativo no (i famosi 
99/100).
Io credo sia più vicino a qualche blocco di record o tabella ma come 
faccio a verificare questo prima di eseguire una qualsiasi sql ?
Daniele

 faccio a verificare questo prima di eseguire una qualsiasi sql ?
Non esistono blocchi di record o tabelle sotto MySQL, a meno che tu non
invochi un comando specifico (e vale solo per le tabelle).


 
Quindi assumendo che non si tratti di un problema hardware (ram, hdd 
etc) questo tipo di errore non dovrebbe verificarsi, giusto ?
Daniele

 etc) questo tipo di errore non dovrebbe verificarsi, giusto ?
Per escludere che sia un problema hardware, ti basta far girare il
programma su un'altra macchina.  Io però sono sicuro che otterrai gli
stessi risultati.
Il problema risiede sicuramente nel modo in cui utilizzi i componenti, ma
ancora una volta, senza l'errore preciso non si può dir nulla...


 
Fatta la prova su un'altra macchina e in effetti il risultato č sempre 
corretto.
Ok allora devo intercettare il messaggio esatto dell'eccezione per 
comprendere meglio la situazione.
La zquery1.ExecSql perň non restituisce un risultato e quindi si deve 
intercettare obbligatoriamente l'eccezione scatenata. Va sempre bene 
cosě parlando delle zeos ?
   try
       ZQuery1.ExecSQL;
     except
       on E: EZSQLException do
       //case EZDatabaseError(E).ErrorCode of
       MmessFrom.Lines.Add(E.Message + ' Error Code: '+ 
IntToStr(E.ErrorCode));
   end;
Daniele

 così parlando delle zeos ?
Sì, anche se io prevedo sempre nelle mie applicazioni la possibilità di
fare un log su file (abilitabile o meno da define condizionale).


nella libreria Zeos è presente il componente monitor, lo inserisci e
lo attivi e controlli nel file di log il problema, ciao Brunello

 
Ok ringrazio..

 
Ne sono a conoscenza. E' un componente fantastico traccia qualsiasi cosa 
  venga fatto sul db attraverso la connessione a cui è associato. Molto 
utile...
Newsgroup: it.comp.lang.delphi
Titolo: Creare Directory

Come faccio a creare una directory, ho provato con CreateDir e
CreateDirectory ma non capisco perchè non le creano

A me cosě funziona:
if CreateDir('C:\programmi\myprogram') then
       CreateDir('C:\programmi\myprogram');
By L. I.

 ha scritto nel messaggio
news:9mf1tk$88v$1...@nreadb.inwind.it...


 CreateDirectory ma non capisco perchč non le creano
Prova anche ForceDirectories:
"Creates all the directories along a directory path if they do not
already exist.
Unit
FileCtrl
Category
file management routines
function ForceDirectories(Dir: string): Boolean; "
Se fallisce, fatti dare l'ultimo errore di Win
(SysUtils.RaiseLastWin32Error)
Saluti
Paolo Arosio


non so cosa dire, adesso funziona che avesse bisogno di riposo?
non mi stupisce, in un giorno solo il computer mi ha dato CMOS Checksum
Error, CPU Unworkable e poi ha ripreso a funzionare il giorno dopo!
Ma probabilmente era Win2000 che senza accorgemene mi aveva loggato come
utente demente e non mi faceva creare le dir

Newsgroup: it.comp.lang.delphi
Titolo: Legger Porta Joystick

Salve a tutti.
Qualcuno conosce qualche componente per leggere la porta joystick?
Grazie,
Paolo.

 ha scritto nel messaggio
news:cBQma.15770$LB6.4...@news1.tin.it...


 ha scritto nel messaggio
news:HFQma.15800$LB6.4...@news1.tin.it...


Grazie ancora, stavo vedendo i vari componeneti e si possono fare cose
veramente fiche!!! ;-)
Ciao.

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

Ho una form (form1) dalla quale devo leggere il contenuto di una
editbox di un'altra form (form2).
Una volta inserito nelle uses il nome dell'altra form (form2) uso il
seguente codice:
form2.editbox.text per recuperare il contenuto nella form2 che però
risulta "not accessible". Come faccio?


per l'esattezza dice "INACCESSIBLE VALUE"

 ha scritto nel messaggio 
news:1183734332.5...@57g2000hsv.googlegroups.com...


 per l'esattezza dice "INACCESSIBLE VALUE"
Posta l'intero codice... magari è una banalità.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 Mettici un timer da 1 sec.e falla chiamare dal timer.
Dalla descrizione, sembrerebbe un errore in fase di compilazione.
Ad ogni modo, far chiamare un Form da un Timer è una pratica un pochino 
strana... non sono a conoscenza di occasioni in cui sia necessario 
adottare questo sistema. :-|


 adottare questo sistema. :-|
E' vero, ma serviva a capire, al posto di un debug se il problema era di un 
certo tipo.
Ciao Giorgio
Newsgroup: it.comp.lang.delphi
Titolo: [DCC Fatal Error] F2084 Delphi xe2

Sono mesi che vengo perseguitato da questo errore : [DCC Fatal Error] 
xxxxxxxxx.pas(78): F2084 Internal Error: AV06E1428F-W00000000-1
 
Dopo aver perso ore ed ore tra:
riavviare l'ambiente,
aggiorna l'ambiente,
aggiorna le librerie,
aggiorna l'Ide fix,
modifica, sposta, dividi il codice,
cancella i DCU,
 
basta.............. sarà il caldo ma sono sfinito...
 
Sono l'unico con questi problemi o capitano anche a voi ?
 
 
Claudio
 
 
 
 
 
 
 
 
 

 Sono l'unico con questi problemi o capitano anche a voi ?
 
Se capitasse a chiunque, sistematicamente, ne avremmo sentito parlare.
 
Senza informazioni di contorno sulla Unit o sul contesto in cui l'errore si verifica, è ben difficile fare pronostici, secondo me. :|
 
-- 
MARCO BREVEGLIERI
#Home: 
http://www.marco.breveglieri.name
 
#Blog: 
http://www.compilaquindiva.net
 

 Sono l'unico con questi problemi o capitano anche a voi ?
Google saggiamente risponde citando un ticket analogo su quality 
central, quindi ti conviene chiedere a loro, sicuramente è il posto più 
adatto in mancanza di altri feedback.
 
http://qc.embarcadero.com/wc/qcmain.aspx
 
 
-- 
morde
Android
QT 4.7
Delphi (5,6,7.. expired)
Firebird Database
 


 
Non esiste un contesto, a quanto ho capito l'errore F2084 � un baco del 
compilatore, che si protrae ormai da anni e che si manifesta raramente.
 
I vari update di XE2 correggono alcune varianti di questo bug.
 
Il codice del progetto � formalmente corretto ma la presenza di una 
serie di fattori blocca la compilazione.
 
La segnalazione d'errore sulla funzione xxxxxxxxx.pas � quello che si 
potrebbe definire un falso positivo, modificando qualche riga di codice 
qua e qualche riga di codice in altre unit il compilatore compila 
correttamente il progetto che per� poco tempo dopo si riblocca su 
un'altra unit.
 
L'unica idea che mi sono fatto � che la presenza concatenata di pi� 
oggetti che utilizzo manda in tilt il compilatore.
 
Oltre agli oggetti standard di delphi il progetto utilizza:
Quantum grid
TMS component studio
Report Builder
Jedy VCL
etc.
 
 
 
 
 
 
 
 
 

 oggetti che utilizzo manda in tilt il compilatore.
 
Prova a seguire il suggerimento di Morde e dare un'occhiata su Quality Central: magari altri riscontri possono essere utili per diagnosticare uno scenario ricorrente che - almeno fino a correzione del bug - si deve cercare di evitare.
 
Ciao,
  Marco.



 
 
trovato, questo è il caso più frequente.
 
http://qc.embarcadero.com/wc/qcmain.aspx?d=106663
 
 
 
grazie, ciao
 
Claudio


 
 
fatto, grazie
 
http://qc.embarcadero.com/wc/qcmain.aspx?d=106663
Newsgroup: it.comp.lang.delphi
Titolo: SorverSocket, ClientSocket e invio di stream

Salve.
Devo inviare delle immagini via modem.
Per fare dei test per ora lavoro su lan.
Ho creato 2 applicazione, una server ed una client.
In pratica, il server dovrebbe inviare lo stream che contiene l'immagine al
client.
Bh,e non ci riesco.
Converto l'immagine e la invia dal server ma dal client non riesco a
leggerla correttamente.
Uso socket di tipo non blocking.
Adesso sto provando ad usare i block, ma mi sono perso nei thread da creare
e non vi sono esempi e nella guida la cosa non è spiegata bene.
Qualcuno sa darmi una indicazione affinche'io esca da questo labirinto?
Tnx
AS
"Se è Microsoft non funziona"
Come faccio da un serversocket di tipo blocking a inviare dati al client?
A che server T

 e non vi sono esempi e nella guida la cosa non è spiegata bene.
Lato ricezione :
var
  Stream: TWinSocketStream;
  Buffer: Array [0..9999] of Byte;
  MemoryStream: TMemoryStream;
  Received: Integer;
  JPeg : TJpegImage;
begin
  Form1.ClientSocket2.Active:=True;
  JPeg := TJpegImage.Create;
  Stream:= TWinSocketStream.Create ( Form1.ClientSocket2.Socket, 360000 );
  MemoryStream:= TMemoryStream.Create;
  try
    if Stream.WaitForData ( 360000 ) then
    begin
      while True do
      begin
        Received:= Stream.Read ( Buffer, SizeOf ( Buffer ) );
        MemoryStream.Write ( Buffer, Received );
        if Received <= 0 then
          break;
       end;
       MemoryStream.Position:= 0;
       JPeg.LoadFromStream ( MemoryStream );
       Image1.Picture.Assign(Jpeg);
    end;
  finally
    Stream.Free;
    JPeg.Free;
    MemoryStream.Free;
    Form1.ClientSocket2.Active:= False;
  end;
Lato spedizione :
Jpg := TJpegImage.Create;
Stream:= TWinSocketStream.Create
                        ( ServerSocket2.Socket.Connections[0], 360000 );
try
  Jpg.LoadFromFile( 'file' );
  Jpg.SaveToStream ( Stream );
finally
  Stream.Free;
  ServerSocket2.Socket.Connections[0].Close;
end;
Jpg.Free;
Ciao!
--
- Carlo -

OK! Ma, in ricezione, a quale evento devo associare quel blocco di
codice?Grazie
AS
"Se č Microsoft non funziona"

 codice?Grazie
Nessun evento ... c'è il Waitfor che la mette in attesa ...
Tu  spedisci al Server un messaggio che ordina lo Screendump
(ClientSocket1.Socket.SendText ....) e subito dopo ci piazzi il testo codice
della ricezione!
Ciao
--
- Carlo -

Newsgroup: it.comp.lang.delphi
Titolo: Delphi???????

Salve a tutti !!!
Devo programmare in Delphi4 ma non conosco assolutamente il pascal
come posso iniziare ?
Conosco abbastanza bene Vb, Vba,  Cobol2,  sql.
datemi una dritta, grazie........

mi dicono dalla regia che ti devi studiare tutto il pascal.
puoi provare con un libro tipo Mastering delphi 2 di cantů.
--
 _______________________________________
        Gnaffy SoftWare
   web: 
http://gnaffy.tripod.com/
   e-mail: Gna...@Wappi.com
   e-mail: 
bmq...@tin.it
   ICQ#: 76488613
 ŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻŻ


wrote:


 un libro in italiano (scegli tu se ing o it) e quindi ti consiglio...
si, ma la versione in inglese è più completa.

 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

si, ma la versione in inglese č piů completa.
Newsgroup: it.comp.lang.delphi
Titolo: Delphi + zeoslib + postgresql funziona?

Qualcuno ha provato le zeoslib con postgresql utilizzando il componente 
Zquery + Zupdate? Funzionano? che versione avete utilizzato?
Ve lo chiedo perchč io ho un problema ma non capisco se sono io che 
sbaglio qualcosa o l'accoppiata Zquery + Zupdate non funzionano.
Ciao e grazie
Gianni Giusti

 sbaglio qualcosa o l'accoppiata Zquery + Zupdate non funzionano.
Mi rispondo da solo, spero che serva ai posteri...
Il componente ZUpdateSQL, genera codice sql per la tabella nella sintassi:
INSERT INTO tabella (tabella.campo1, tabella.campo2,ecc....
Questo genera un errore. Per rimediare è sufficente correggere la query 
togliendo "tabella." nei campi.
Quindi, correggendo con:
INSERT INTO tabella (campo1, campo2,ecc....
Tutto funziona perfettamente (stessa cosa per l'UPDATE)
Ciao
Gianni

Newsgroup: it.comp.lang.delphi
Titolo: domanda stupida

come si chiama quella funzione tipo showmessage che ti da la possibilità di
inserire Yes o No invece di solo Ok?
Funziona in modo che quando dico no non va avanti?
come posso fare?
grazie
ciao


procedure TForm1.Button1Click(Sender: TObject);
begin
if MessageDlg('Referendum: si o no ?', mtInformation, [mbYes, mbNo],0)=mbyes
then
 begin
  // qui il codice per il si
 end
else
 begin
  // qui il codice per il no
 end;
end;

 > come si chiama quella funzione tipo showmessage che ti da la possibilitą


Newsgroup: it.comp.lang.delphi
Titolo: Risoluzione schermo





Ciao a tutti! Qualcuno saprebbe dirmi come 
impostare da codice la risoluzione 800x600 col massimo di colori? Grazie mille 
anticipatamente.



 ha scritto nel 
  messaggio 
news:002601c025a7$49e3b5c0$ca0a0a0a@global
...


Ciao a tutti! Qualcuno saprebbe dirmi come 
  impostare da codice la risoluzione 800x600 col massimo di colori? Grazie mille 
  anticipatamente.


 


questa potrebbe essere una 
soluzione:


 


procedure ChangeResolution(iWidth: Integer; 
  iHeight: Integer);
var
  A   : Boolean;
  
  I   : Longint;
  B   : Longint;
  DevM: 
  TDevMode;
begin
  I := 0;
  with DevM 
  do
   // questo ricerca il dispositivo 
  grafico 


   
  repeat
      A := EnumDisplaySettings(PChar(0), I, 
  DevM);
      I := I + 1;
    
  until (A = False);


 


  DevM.dmFields := DM_PELSWIDTH or 
  DM_PELSHEIGHT;


  


  // imposta la resolution orizzontale e 
  verticale


  DevM.dmPelsWidth := 
  iWidth;
  DevM.dmPelsHeight := iHeight;
  B := 
  ChangeDisplaySettings(DevM, CDS_UPDATEREGISTRY);


end;


 


Se inoltre hai bosognio di rilevare l'attuale 
  risoluzione usa:


 


  GetSystemMetrics( SM_CXSCREEN 
  );
  GetSystemMetrics( SM_CYSCREEN );


 


Ciao.
Newsgroup: it.comp.lang.delphi
Titolo: Aiuto per semplice problema(spero)

Come al solito sono qui a rompere....
Come appare evidente, non sono pratico ancora di Delphi, ma sto
progredendo...
Ho un problema:
Ho un pippo.pas che è il sorgente di una COMPONENTE, basta per aggiungere la
componente all'ambiente DElphi??
Cosa devo ESATTAMENTE fare per aggiungerlo??
Vi prego di avere pietà.........LOL
Grazie per l'aiuto.

Io programmo in Delphi da una settimana quindi non so se posso aiutarti,
perņ credo di aver (forse) capito il tuo problema. Per risponderti con
sicurezza perņ dovrei prima leggere il sorgente del componente.
Ciao
--
Posted from [195.223.215.6] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Cerca la voce install component dal menu component.
Se usiDelphi dalla vers. 3.0 in su, appare una finestra  che ti invita a
scegliere se aggiungerlo ad un package esistente o creare un package
ex-novo.
Fai la tua scelta, in accordanza con cosa fa il componente, scrivendo
eventualmente il percorso del package da creare/modificare. Il resto
dovrebbe essere automatico, una volta premuto OK.
Ricorda che il comp. deve avere una procedura Register che lo aggancia ad
una palette e gli assegna un nome. Infine, aggiorna il Library Search Path
di conseguenza[se lo crei ex-novo]. In ogni caso, l' help in linea dovrebbe
darti maggiori chiarimenti.
Marco Soravia.

Newsgroup: it.comp.lang.delphi
Titolo: Cerco libri delphi

Ciao a tutti!
Mi piacerebbe sapere dove posso trovare in Milano , i libri, magari n° 1 ,2
,3  di delphi di Marco cantù.
L'intenzione è programmare, o avete qualche cosa di meglio da consigliarmi?
Ciao a tutti e Grazie CMQ
--
Star Trek TNG      =/\=
Lunga vita e Prosperità
------------------------------------
per reply togliere NOX - dall'indirizzo

puoi ordinarli in cartoleria ?
--
web:    
http://gnaffy.tripod.com/
e-mail: Gna...@Wappi.com
e-mail: 
bmq...@tin.it
ICQ#:  76488613

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

Ciao a tutti,
qualcuno mi può spiegare come funzionano i campi blob?
Ho un'applicazione che utilizza dei files DBF. Sul mio PC, dove ho creato
l'applicazione, funziona tutto ok. Se installo l'applicazione con tutti i
relativi DBF e indici, quando cerco di leggere le tabelle, mi chiede se devo
ignorare i blob.... E' come se fossero memorizzati a parte... E' cosi'? Se
si, con che estensione?
Ciao e grazie.

i blob, alias, i memo (ah, i bei tempi di clipper....) sono registrati 
in un file avente come nome lo stesso del dbf, ma con estensione dbt.
Bye
A
Newsgroup: it.comp.lang.delphi
Titolo: Query, Data-aware e Commit

     Ciao a tutti,
Ho una procedura che mi legge dei dati su Firebird, organizzata come segue:
TIBQuery con associato Dataset, componenti Data-aware.
Alla Query c'è associato anche un componente TIBTransaction.
Apro con StartTranscaction, edito la proprietà SQL della query ed
attivo la query, il componente Data-aware mi mostrai dati letti dalla query,
appena eseguo il Commit della Transaction i dati del componente Data-aware 
scompaiono come se avessi reso inattiva la query,
come mai?
come mi debbo comportare?
in fase di lettura il Commit non si esegeue?
Grazie

 in fase di lettura il Commit non si esegeue?
Con Firebird, tutte le transazioni (anche le select) agiscono in una
transazione.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Free ha scritto:

Prova CommitRetaining;
Max

Prova CommitRetaining;
Dimenticatevi che esiste il CommitRetaining (peraltro solo con quella
chiavica della suite IBX) e usate il Commit ordinario.

Andrea Laforgia ha scritto:

Spiega il perchč.
Io utilizzo da almeno 9 anni in una mia applicazione, prima con IBX poi 
con FIBPlus, la CommitRetaining senza nessun tipo di problema.
Massimo

con FIBPlus, la CommitRetaining senza nessun tipo di problema.
Il che non vuol dire che non sia una tecnica sconsigliabile.

Newsgroup: it.comp.lang.delphi
Titolo: [d6] unire un filmato e creare dvd in tempo reale

ciao a tutti, dovrei realizzare un applicazione che prendere alcuni minuti 
presi da una telecamera DV in diretta e automaticamente dovrebbe inserire 
quei minuti all'interno di un filmato dvd e poi masterizzare il tutto (una 
sorta di autocomposizione), avete qualche idea in merito??
Simone 

[...] avete qualche idea in merito??
Si, rivolgiti a software gia' fatti che costano assai di meno: siccome per
delphi di gratuito c'e' poco a riguardo, saresti costretto a  comperare
componenti scritti ad hoc, impararne l'uso, testarli e scrivere il programma.
Non ne vale la pena, troppo costoso, sopratutto quando con 50 dollari puoi
trovare programmini che fanno tutto questo: basta cercare per "dvd authoring"
o simili per rendertene conto.
Poi, se vuoi farlo a scopo a amatoriale, senza limiti di tempo ne' di impegno,
questo e' un'altro discorso. :)
Ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

ciao, grazie per la risposta... il problema č che il software č per un parco 
divertimenti e mi hanno chiesto di renderlo automatico questo 
procedimento... quindi qualsiasi software non andrebbe bene perchč serve 
l'ausilio di qualcuno
Simo
Newsgroup: it.comp.lang.delphi
Titolo: [Rete] Riconoscere IP

è possibile sapere l'ip della macchina che ha avviato
il mio programma in rete ? come ?
--
web:    
http://gnaffy.tripod.com/
e-mail: Gna...@Wappi.com
e-mail: 
bmq...@tin.it
ICQ#:  76488613

 ha scritto nel messaggio
news:8s4kv6$qjp$2...@nslave2.tin.it...


 > č possibile sapere l'ip della macchina che ha avviato


> e powersok1 cosa č?
 vedi unit "PSock"


Newsgroup: it.comp.lang.delphi
Titolo: Cerco Delphi ITA





Sapede In dicarmi dove scaricarlo


Grazie Daniela



Grazie Daniela
sono spiacente, ma credo che non esiste una versione italiana di Delphi o
perlomeno non esiste completamente italiana.
Quando avevo acquistato Delphi, c'era anche una versione ITA che dovrebbe
stare per italiano.
Ma da come ho capito ( poi non ho approfondito molto ) erano solo i menů ad
essere in italiano, Delphi rimane sempre in inglese come il resto della
documentazione allegata. Non credo che qualcuno si metta a riscrivere tutto
l'help traducendolo quindi in italiano.
Poi rimane sempre il fatto che moltissima documentazione ( molte volte la
migliore ) č sempre in inglese.
Anche a me non č che mi aiuti molto questo fatto visto che non sono cosě
ferrato in inglese ( visto che non l'ho mai studiato ), quindi appena ho
avuto Delphi mi trovavo nelle tue stessi identiche condizioni, cioč leggevo
l'help ad intuito.
Poi vedrai che con il passare del tempo acquisti dimestichezza con
l'ambiente e non ci fai piů caso al fatto che č inglese o meno.
Del resto un corso avanzato d'inglese non č che faccia molto male.
Nell'ambito della programmazione, la conoscenza dell'inglese č una buona
cosa se non ottima, anche la maggior parte delle pagine su internet sono in
inglese che per fortuna degli inglesi č la lingua internazionale.
Ti saluto ed in bocca al lupo.
Antonio Tarolla
Newsgroup: it.comp.lang.delphi
Titolo: Installazione indy9: help!!

Sto cercando di installare indy 9 ma non ce la faccio! Ho delphi 7, ho
disinstallato indy e ho scaticato indy 9.0.18 dal sito indyproject, il
file auto installate mi installa tutto tranne le palette, allora ho
provato a scaricare il file zip con il codi. Apro Indy70.dpk e lo compilo,
poi apro dclIndy70.dpk e lo installo. Succede però come prima: mi dice che
si installa ma nelle palette non ci sono quelle indy... come posso fare??
--- posted by geoForum on 
http://www.delphiedintorni.it

si installa ma nelle palette non ci sono quelle indy... come posso fare??
ciao
http://www.indyproject.org/KB
fai riferimento al paragrafo "Borland Delphi
Installlation"
	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 ...
---------------------------------

C'è qualcosa che non quadra: nella guida che mi hai citato parla di un
file .BAT che invece nella cartella compressa che ho scaricato io non
esiste... ma adesso sto notando che la versione 9.0.18 forse è un update,
ora provo con la 9.0.17, a tra poco... Ciao


Come non detto: anche con la versione 9.0.17 ho lo stesso problema.
L'unica differenza è che c'è il file .BAT, seguo le istruzioni della guida
ma le poalette non compaiono, eppure alla fine mi da la conferma
dell'installazione ma... se esiste una guida in italianmo me lo fate
sapere? Grazie


 Grazie


Finalmete! Nelle proprietà delle palette sono andato sull'ultima voce
[All] e ho cliccato sul pulsante "Default Pages" e così sono apparse le
palette...
Grazie mille!!

Newsgroup: it.comp.lang.delphi
Titolo: Tools per ricercare e sostituire codice delphi.

Sto cercando un programma che faccia la ricerca di un
testo multi riga su vari files e che mi dia la possibilità
di sostiruirlo (nè ho trovati parecchi in internet, ma
avevano il difetto di ricercare in una sola riga e di
non riconoscere il "ritorno a capo")
Mi potete aiutare?
Caio by Enzo
www.scozzaro.it

 di sostiruirlo 
Prova questo:
http://digilander.iol.it/setecastronomy/replacer.zip
-- 
I'am what I'am, I do what I can

 -- 
Il programma sembra buono, ma non so come utilizzarlo,
il bello e che ho letto l'help o non funziona o non sono capace
mi puoi istruire.
indico in begin
tutto il testo da sostituire (con copia ed incolla)
e in replace inserisco il testo NUOVO
clicco sul pulsante replace ma non fa nulla
Ciao by Enzo
www.scozzaro.it

 clicco sul pulsante replace ma non fa nulla
1^ Selezioni la directory di base in cui cercare i file (Path)
2^ Imposti la maschera di ricerca (Mask), probabilemtne  *.pas
3^ Avvi la ricerca dei file (Scan)
4^ Inserisci la stringa di ricerca di inizio (Begin)
5^ Inserisci la stringa di ricerca di di terminazione (End)
6^ Inserisci il testo da sostituire
7^ Effettui la sostituzione (Replace)



http://digilander.iol.it/setecastronomy/
No.. scusa Setec, questo significa che Sete Astronomy e' l'anagramma di Too
Many Secrets ? Oddio, non l'avevo mai notato!
-- 
Morde. 
(
mo...@despammed.com
)

 di Too Many Secrets ? Oddio, non l'avevo mai notato!
Ma va?
http://url.repository.biz/go/s



http://url.repository.biz/go/s
ah ah ah... mi ricordavo del film, ma non avendolo mai visto non ero a
conoscenza di questo "enigma"
http://snipurl.com/3r3z
Ciao!
-- 
Morde. 
(
mo...@despammed.com
)

 non riconoscere il "ritorno a capo")
Uno strumento molto valido per la ricerca e sostituzione multi file è
PowerGREP (
http://www.powergrep.com
) che supporta anche le espressioni
regolari.
Ciao
Claudio
Newsgroup: it.comp.lang.delphi
Titolo: DbGrid+Query

Ciao a tutti,
Ho la tabella TABLE1.Campo1 (integer) con dei valori 1,2,3
come faccio a visualizzarli nel DBGrid sotto forma valori comprensibili tipo
1=Attivo,  2=Disattivo, 3=Cancellato.
Posso fare qualcosa a livello di query ?
Uso Firebird e D7
Grazie 1000

Giovanni ha scritto:

Puoi usare i campi clacolati: dichiari i fields nella query, aggiungi
un campo calcolato e nell'evento OnCalcFields ne imposti il valore in
base al valore di Campo1.
Saluti
    Marco Bortolani
    info @ 
marcobortolani.it


Dunque a livello sql (in genere per ogni tipo di db) gli alias sono 
permessi sui nomi di tabelle e di campi non sui valori.
In questo caso o parserizzi il recordset con un procedura che ti riempia 
la dbgrid e imposti tu il valore corrispondente oppure puoi utilizzare 
dei controlli checkbox per indicare lo stato 1,2,3.
Mi sembra che oltre a questo ci sia ben poco da fare ...... credo !
Omega

 comprensibili tipo 1=Attivo,  2=Disattivo, 3=Cancellato.
Se usi i campi persistenti puoi usare l'evento ongettext del campo
Giulio 


Altra strada a disposizione potrebbe essere quella di lavorare sull'evento
OnDrawDataCell della griglia se usi
dei valori fissi ... qualcosa tipo
procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
  Field: TField; State: TGridDrawState);
begin
  if field.FieldName = 'Campo1' then  // attenzione keysensitive
  begin
    if field.Value = 1 then
       DBGrid1.Canvas.TextRect(rect,rect.Left, rect.Top, 'Attivo')
    if field.Value = 2 then
       DBGrid1.Canvas.TextRect(rect,rect.Left, rect.Top, Disattivo)
    if field.Value = 3 then
       DBGrid1.Canvas.TextRect(rect,rect.Left, rect.Top, 'Cancellato');
  end;
end;
Saluti  Goblin

Newsgroup: it.comp.lang.delphi
Titolo: Intestazione funzioni

Vorrei sapere se esiste una utility freeware per inserire automaticamente
un'intestazione (tipo commento) alle funzioni.
Grazie
Alessandro

 wrote:
? non mi è ben chiaro l tipo di automatismo che vuoi.
Su 
http://www.gexperts.org/
 Trovi un tool freeware che si integra con
l'editor di delphi. Una delle sue utility e di poter posizionarsi
sopra una funzione, premere ctrl+alt+p (parametrizzabile) e ti
inserisce un intestazione. Ma poi la devi terminare a mano, non
aspettarti troppo.


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

mi accontenterò di farlo manualmente.
Per la parte di identazione del codice prova questa, sempre freeware
http://www.dow.wau.nl/aew/DelForExp.html
c'è sia in versione integrata nell'ide che stand-alone
Newsgroup: it.comp.lang.delphi
Titolo: Registrazione D6

Ho per l'ennesima volta formattato il mio PC e reinstallato Delphi 6.0.
Non me lo fa piu registrare perchč sembra io abbia superato il numero
massimo di registrazioni possibili (č possibile? in un anno l'avrň
registrato una decina di volte al massimo, sempre per nuove installazioni di
uno dei miei due PC).
Chiamo il numero indicato nel programmino di registrazione, ma non risponde
nessuno tutto il giorno.
Qualcuno ha qualche informazione in merito?
Mi girano da matti: compro migliaia di euro di software tutto regolare ed
originale per non avere alcun tipo problema e poi mi ritrovo che, nei limiti
di quanto prescritto dalla licenza, non posso nemmeno farne quello che
voglio. A questo punto, mi tocca pure stare attento a quante volte mi
formatto e reinstallo il PC.
Ciao.
Gianluca.


beato te almeno hai fatto delle registrazioni, io neanche quelle !!
assistenza = zero

 formatto e reinstallo il PC.
Pensa che bello, quando il tuo PC nuovo avra' un BIOS TCPA e un sistema
operativo con tecnologia Palladium, questo sara' il suo modo normale di
funzionare. Tutto pensato per la tua sicurezza... non sei contento?

Onestamente io dopo aver reinstallato non mi sono piu' registrato, 
non ho mai creduto nell'assistenza e nemmeno la vado cercando.
Ricordo anni fa mi registrai presso la Corel per un prodotto, e non
ricevetti alcuna assistenza, documentazione, offerte di upgrade.
Credo che se la Borland fosse italiana sarebbe una cosa diversa...
Ciao
Morde.
morde [at] programmer [.] net

Newsgroup: it.comp.lang.delphi
Titolo: Rilevare controllo attivo

In una forma ho circa 30 tkEdit. Esiste un comando che mi rileva su
quale è posizionato il cursore (quello attivo per intenderci) ? I
controlli si chiamano tkEdit1 ... tkEdit30
Grazie
Alberto

 ha scritto nel messaggio 
news:40018f32-3ce1-4496...@p25g2000hsf.googlegroups.com...

var n: Integer;
// Nell'ipotesi che il tipo sia TkEdit
for n:=1 to 30 do
    if TkEdit(FindComponent('tkEdit'+IntToStr(n))).Focused then
        // Ha il Fuoco
    else
        // Non ha il fuoco
Se vuoi agire direttamente sul componente che ha il fuoco indipendentemente 
dal nome usa:
if (Screen.ActiveControl Is TkEdit) then
    TkEdit(Screen.ActiveControl.Etc..:=...)
Ciao Giorgio
Newsgroup: it.comp.lang.delphi
Titolo: Intercettare accesso ai files

Salve.
Devo risolvere questa situazione:
La mia applicazione fa partire un altro programma;
Ora sia  la mia aplicazione che il programma che ho fatto partire 
devono avere accesso ai file A , B, C.
Tutte le operazioni ,che non siano richieste da queste due 
applicazioni ,su questi files fintanto che il mio programma e' aperto 
devono essere negate.
Esiste qualche componente ,funzione,API ecc che mi permetta questo?
Grazie per le risposte :D    
-- 
Posted from 212.31.252.228 by way of 
smtp1.libero.it
 [193.70.192.51] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote
Salve.
Devo risolvere questa situazione:
La mia applicazione fa partire un altro programma;
Ora sia  la mia aplicazione che il programma che ho fatto partire
devono avere accesso ai file A , B, C.
Tutte le operazioni ,che non siano richieste da queste due
applicazioni ,su questi files fintanto che il mio programma e' aperto
devono essere negate.
Esiste qualche componente ,funzione,API ecc che mi permetta questo?
Grazie per le risposte :D
mmmmmmmm......boh !!
Non vedo maniere semplici ed altrettanto efficaci.
Se ti spieghi meglio a quali file vuoi bloccare l'accesso forse si trova
un'altra strada.
Ci sono le API "LockFile(Ex)" e "UnLockFile(Ex)"
Prova a dargli un'occhiata.
Ah....poi bisogna vedere se stai sotto Windows95/98 o NT. Le API che hanno
la desinenza "Ex" stanno solo nell' NT.
Non ho altro da dirti.
Ciao ciao....
Antonio Tarolla
Newsgroup: it.comp.lang.delphi
Titolo: Come distinguere una 'physical printer' da una 'virtual printer' ?

Devo inibire l'utilizzo di stampanti virtuali (Adobe PDF, Win2PDF,...) dalla
mia applicazione Delphi.
Come posso fare a distinguere le stampanti virtuali da quelle fisiche?
Qualche idea?
Ivano
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Qualche idea?
Non penso che sia possibile a meno di creare un database di driver da
"evitare".
Se l'utente vuole stampare e' sufficiente che installi un driver per
stampanti laser ed eseguie la stampa su file. Il risultato e' un file
postscript che puo' dare in pasto ad un qualsiasi convertitore etc. etc.
-- 
Vuoi distribuire il tuo sito web su CD/DVD?
Prova 
http://www.dwebpro.com/
Vuoi diventare un esperto programmatore Delphi?
Vieni a fare uno stage con noi: 
http://www.creativepark.it/stage/

 Qualche idea?
Recuperi la struttura PRINTER_INFO_2 della stampante; se ne campo
pPortName c'e' LPT1, LPT2, ecc... quella e' una stampante fisica.
(Mai provato: è solo un'idea)
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Io utilizzo una finestra dove l'operatore può selezionare da una 
combobox solo un insieme ridotto di stampanti ed il tracciato di stampa, 
oltre ad una serie di altri parametri aggiuntivi.
Ovviamente è presente una seconda finestra, in configurazione, che 
consente la selezione tra tutte le stampanti disponibili di quelle 
effettivamente da utilizzare; la selezione viene memorizzata in un file 
di configurazione.
Questo metodo mi serviva per stabilire le stampanti per quali utilizzare 
una stampa di tipo draft vecchia maniera, con i caratteri e i codici di 
controllo inviati direttamente da programma.
Alessandro B.
--- posted by geoForum on 
http://www.delphiedintorni.it

 pPortName c'e' LPT1, LPT2, ecc... quella e' una stampante fisica.
funziona solo con le stampanti parallele, le stampanti usb o via rete 
hanno nomi diversi.
-- 
================================================================
Alberto Rubinelli - A2 SISTEMI 
news.aioe.org
 ThunderBird 2.0.0.14
Via Costantino Perazzi 22 - 28100 NOVARA - ITALY
Tel 0321 640149   Fax 0321 391769   BBS 0321 392320
Mail: 
alb...@oldcomputers.de
skype: albertorubinelli  ICQ : 49872318
Visita il mio museo di computers: 
http://www.oldcomputers.it
================================================================

Grazie per il suggerimento, avevo pensato anch'io ad una soluzione del
genere: un file
con tutte le stampanti abilitate (che sarebbe comunque da tenere
aggiornato...).
La tenevo proprio come ultima possibilità, l'ideale sarebbe proprio quello
di riuscire a distingure i 2 tipi di stampanti.
Ciao


Mi sa che mi devo arrendere al file di configurazione con l'elenco delle
printer
abilitate... ho cercato e chiesto un po' ovunque ma non sono ancora riuscito
e trovare una valida soluzione per distinguere tra prn vituali e fisiche,
Grazie per la risposta

Newsgroup: it.comp.lang.delphi
Titolo: Final method

Salve a tutti,
premetto che vengo dal mondo della OOP in Java, e piano mi sto adattando 
a usare le medesime metodologie in Delphi.
Infatti non  so come si fa a dichiarare un metodo final, non vorrei che 
le sotto classi possano fare l'ovverride di questo.
E ancora, si possono dichiarre  classi astratta?
Grazie mille
ciao
Mario

)
  "File deletion is murder..." (Futurama)

 Ciao! :-)
Ciao,
Andrea

 astratte non le puoi fare con le classi... :-)
Basterebbe definire dei metodi reader e writer per le singole proprietà!
In questo caso puoi rimandare l'implementazione di tali metodi alle classi
derivate o a quelle che implementano l'interfaccia.
Acqua

 prenda il compilatore eh... :-)
Se non ricordo male, viene ridefinito il metodo (rompendo la catena che 
viene interrogata per il "late binding") con un conseguente warning da 
parte di Delphi che suggerisce l'introduzione della parola chiave 
*reintroduced* per evidenziare la volontà specifica del programmatore di 
"nascondere" a tutti i costi il metodo ereditato sostituendolo con la 
nuova definizione che comunque non viene eseguita in modo "polimorfico".
Tuttavia, visto che apparentemente è il nostro amico a scrivere le 
classi, voglio sperare che non si "chiuda da solo la strada". :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it