mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Sì a tutto - No a tutto

Ciao a tutti,
dovrei emettere un messaggio con 4 scelte possibili per l'utente:
Sì, No, Sì a tutto, No a tutto.
Se non fosse per gli ultimi 2 userei Application.MessageBox.
C'è qualcosa di analogo già fatto che mi permetta di far vedere i 2 bottoni
Sì a tutto, No a tutto oppure devo fare io una videatina con 2 BitBtn?
Grazie, Mario
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Sì a tutto, No a tutto oppure devo fare io una videatina con 2 BitBtn?
Credo che la funzione MessageDlg() supporti le configurazioni di 
pulsanti di cui hai bisogno.
Per ulteriori informazioni, leggi la Guida in linea o consulta questa 
pagina:
http://www.delphibasics.co.uk/RTL.asp?Name=MessageDlg
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 ha scritto nel messaggio news:62Z108Z225Z153Y...@usenet.libero.it...

In italiano credo proprio di no.
Ciao
C. 


Fortunatamente lo sto facendo con Lazarus ed ho visto che è possibile
personalizzare la scritta del bottone (anche se farlo in questo caso è un
po' macchinoso)


 po' macchinoso)
E' possibile anche in Delphi: basta duplicare il file con le costanti e 
tradurne il contenuto specifico.



E' la stessa cosa anche in Lazarus !!!


 E' la stessa cosa anche in Lazarus !!!
Siccome hai scritto che stavi facendo tutto "fortunatamente" con 
Lazarus, ci tenevo a precisare che "fortunatamente" si fa anche con 
Delphi, allo stesso modo. :-)
Altrimenti, non ho capito il significato del tuo "fortunatamente" 
riferito a ciò di cui si parlava.


 riferito a ciò di cui si parlava.
E' riferito solo al fatto che Lazarus lo conosco da più tempo, quindi riesco
a districarmi meglio nelle varie impostazioni e a fare modifiche
"personalizzate" ai sorgenti.
Ciao, Mario

Newsgroup: it.comp.lang.delphi
Titolo: BDE Aiuto! per favore!

Ciao a tutti...
Ho realizzato una piccola applicazione che gestisce un database in Delphi 5:
il programma gira su 2 PC in rete (una rete Peer-to-Peer)
ho installato il programma con il database sul PC n.1 e tutto funziona a
meraviglia.
Il mio problema è il seguente:
Sul Pc n.2 o creato un Link al programma residente sul PC n.1, ma lancindolo
il BDE va in errore poiche' (almeno credo) non e' installato anche sul PC
n.2
per ovviare al problema ho installato SOLO il BDE anche sul PC n.2 e ho
creato un alias che punta al DB del PC n.1. Purtroppo cosi il programma
funziona, ma se apro una tabella contemporaneamente sul PC.2 e sul PC.1 il
BDE va in errore segnalando che la tabella è già in uso da un'altro Utente!
Come posso risolvere il problema?
NB: Io vorrei che il programma e il database rimanessero SOLO sul PC.1 e che
con il PC.2 fosse possibile accere al programma condividendo i dati del PC.1
Grazie 1000 in anticipo!
Ciao.
    Gianluca.

Ciao,
setta sul BDE la proprietą LOCAL SHARE  a TRUE e controlla nella tua
applicazione se apri in esclusiva il database...
bye Max

Nel messaggio non mi dici che tipo di tabelle usi.
Posso ipotizzare che utilizzi Paradox (.db) oppure DBase (.dbf)
Nel caso di DBase l'unico motivo che possa darti questo problema e' che la
proprieta' "Exclusive" del TTable sia a True. In tal caso la tabella puo' essere
aperta solo da un utente per volta. Se porti la proprieta' a False risolvi il
problema.
Se usi Paradox, i problemi possono essere due. La tabella puo' essere aperta
esclusiva, come nel caso del DBase, oppure non hai impostato la 'NetDir'.
'NetDir' e' una cartellina che devi creare (nel PC1 e con un nome qualsiasi) e
che deve essere vista anche dal 'PC2'. Dentro questa cartella devi metterci il
file 'Pdoxusrs.net' che probabilmente troverai in 'C:\'.
Una volta fatto questo vai nel PC1, apri il pannello di controllo e carica
l'applicazione 'BDE Administrator'. Accedi al gruppo
'Configuration.Drives.Native.PARADOX' e seleziona la chiave 'NET DIR'. Modifica
la chiave impostando come valore la cartella che hai creato prima. Salva tutto
ed esci.
Vai nel PC2, carica BDE Administrator e modifica la stessa chiave dando come
valore la cartella del PC1. Salva tutto ed esci.
In questa maniera non dovresti avere piu' problemi.
Ti ricordo che le impostazioni che hai dato in maniera manuale attraverso BDE
Administrator (alias e net dir) possono essere fatte in maniera automatica nel
programma, lavorando con gli oggetti TDatabase e TSession.
Ciao
Francesco

 Francesco
Ciao e grazie!
Newsgroup: it.comp.lang.delphi
Titolo: Visualizzazione Maschere di Access

Salve
Ho un piccolo problemino ....Utilizzo Office Xp e Delphi 6
Volevo sapere se si possono visualizzare le maschere create con Microsoft
Access in Delphi ...
Se si mi piacerebbe sapere come si fa e se esistono componenti che lo fanno
...
grazie in anticipo .....

Access in Delphi ...
In tutti i casi (dall'intefaccia o dal funzionamento della maschera) la mia risposta e'
no, non puoi farlo, anche se trovassi un modo un domani, e' sempre meglio ridisegnarsela con delphi
perche' hai una ricchezza di componenti e di funzionalita' che access se le sogna...
Morde

 Morde
Andrea

Se usi D5 nei componenti Servers trovi tutto il necessario.
Correggimi se sbaglio: se si vuole utilizzare i componenti ole automation di access 
e' necessario avere access installato sulla macchina?
Oppure sono sufficenti le runtime (se ancora uqalcuno le utilizza...)?
Ciao
Morde

 Morde
Ciao
Andrea

 wrote in message
art85q$lc3ot$1...@ID-170738.news.dfncis.de...

Grazie a tutti ... Uso delphi 6 e i componenti server ci sono ma manca un
Help che mi spieghi come si usano  ....

 Help che mi spieghi come si usano  ....
http://www.djpate.freeserve.co.uk
Andrea

 wrote in message
artafd$m2dse$1...@ID-170738.news.dfncis.de...


 non riesco ad accedere a questa pagina .... grazie lo stesso
http://www.djpate.freeserve.co.uk/Automation.htm
Prova questa :)
Andrea

 wrote in message
arvbpu$mcsig$1...@ID-170738.news.dfncis.de...

Newsgroup: it.comp.lang.delphi
Titolo: Mix di TreeView e ListView?

Ciao a tutti!
Sono nuovo di Delphi e del NG.
Avrei bisogno di un componente che sia un mix di TreeView e ListView;
qualcosa che mi permetta di realizzare quanto si può vedere in questa
immagine:
http://www.quellicheilpc.it/Image2.gif
Ho fatto alcune ricerche di componenti già pronti ma senza esito positivo.
Avete qualcosa da suggerirmi?
Grazie
Ciao!

 
http://www.quellicheilpc.it/Image2.gif
Forse ho trovato: Virtual Treeview
però non riesco a capire se è free!
Ciao!

 però non riesco a capire se è free!
OK: Mozilla Public License (MPL)

Newsgroup: it.comp.lang.delphi
Titolo: Domandona da FAQ

Ecco un'altra mia domanda! (quasi mi vergogno...)
Come si cancella un TImage?
Sto usando un metodo molto grezzo: disegno un grande rettangolo del colore
dello sfondo ..... :-(
-- 
Ciao da Giuseppe Fraddosio
    // FidoNET 2:335/727.2    
 \X/  
fradd...@libero.it
 
fradd...@tin.it
 
Membro AGI Puglia Sez. Bari 
Powered By Amiga2000T/060@50Mhz/CV3D 4Mb/AmigaOS 3.5

Giuseppe Fraddosio:
| Come si cancella un TImage?
Image.Picture:=nil;
Ciao!
Alan Solo

 dello sfondo ..... :-(
bè, la domanda non è stupida ma la soluzione non è delle migliori. Insomma
troppo laboriosa per risolvere un problemino simile !!
Ora non ricordo se sta sintassi è giusta....comunque se non è giusta basta
sistemarla un po'. Il concetto è quello del NIL per capirci.
Prova:
Image1.Picture.Bitmap:=nil;
oppure
Image1.Picture:=nil;
oppure guarda l'help e magari se hai problemi riposta !!
Ciaooo !!
Antonio Tarolla

 Image.Picture:=nil;
Grazie, non avevo pensato a questa possibilita'!


 Image1.Picture:=nil;
Grazie, funge perfettamente (sto usando Image1.Picture.Bitmap:=Nil). Non
avevo pensato a questa soluzione, ma pensavo di trovare un metodo stile
clear!

Newsgroup: it.comp.lang.delphi
Titolo: delphi 7 CVS vs SUBVERSION (svn)

Ciao a tutti!!!Vorrei sentire i pareri di utenti esperti come voi su
l'utilizzo di CVS O SUBVERSION...chi è il migliore?
Grazie!!!!!
Billy



l'utilizzo di CVS O SUBVERSION...chi č il migliore?
Non esiste un migliore tra i due. SVN č sicuramente piů recente.
La rete č grande, troverai un sacco di documentazione su confronti tra
i due. L'argomento non č propriamente in topic.

 i due. L'argomento non è propriamente in topic.
E solo per sapere da chi magari lo usa come la pensa un parere di chi
ci sat lavorando con cvs o svn lo so che ce documentazione, però un
parere di chi lo usa non si puo chiede?
billy

Newsgroup: it.comp.lang.delphi
Titolo: HDD Serial Number Vista

Qualcuno è riuscito nell'intento?
Numero fisico non quello di volume.
Ho cercato in rete ma nulla! Possibile?

 Ho cercato in rete ma nulla! Possibile?
Prova a leggere questo thread sul forum dell'MSDN:
http://forums.microsoft.com/MSDN/ShowPost.aspx?PostID=2627774&SiteID=1
-- 
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/

 
http://forums.microsoft.com/MSDN/ShowPost.aspx?PostID=2627774&SiteID=1
Peccato che non è delphi... sarebbe da convertire 

 ha scritto nel messaggio 
news:478526bb$0$36441$4faf...@reader5.news.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: Ridefinire metodo Invalidate di TShape

Salve,
il problema che ho avviene su C++ Builder ma magari riesco ad adattare 
un'eventuale soluzione per Delphi.
In pratica, ho un'array di TShape che cambiano continuamente colore in modo 
da mostrare una gradazione di colori.
Per�, a causa dei continui cambi di colore, capita che si vedano degli 
sfarfalli, causati dal fatto che il TShape prima di visualizzare il nuovo 
colore diventa bianco. Mi � stato detto:
"Il TShape invalida la regione prima di disegnarla quindi ad ogni nuova 
gradazione la figura viene prima cancellata (portata a bianco) e poi 
disegnata con il nuovo colore. Da qui lo sfarfallio.
Devi crearti un tuo TShape che chiami InvalidateRect durante il redraw. O 
magari derivare un altro oggetto da TShape aggiungendo un
metodo custom per il disegno. "
Io opterei per la seconda.
Ho visto che il metodo chiamato probabilmente � TShape::Invalidate e non 
InvalidateRect.
Per creare un oggetto e ridefinire il metodo ho fatto un tentativo in questo 
modo (scusate se il codice � C++, ma lo incollo lo stesso, magari chi di voi 
conosce anche C++ riesce a capire meglio il mio problema):
class MyShape : public TShape {
    public :
         virtual MyShape* Invalidate() {
            return this;
        }
};
Ma ho il seguente errore:
E2113 Virtual function 'MyShape::Invalidate()' conflicts with base class 
'TControl'
Saluti 

 nuovo colore diventa bianco.
Prova a invocare il metodo "Update" al posto di "Invalidate".
Forse potrebbe risolvere il tuo problema senza la necessit� di 
ridefinire o alterare il codice del controllo grafico.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 'TControl'
In Delphi Invalidate e' una procedure, la cosa piu' probabile e' che
in c++ sia dichiarata come "virtual void Invalidate(void);"
ciao
Giacomo

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

Sapreste indicarmi un sito dove scaricare il programma SOFTICE?
Grazie.

 Grazie.
ciao prova quà 
http://www.silab.dsi.unimi.it/~ao562686/.../ALoR/
e buon reverse enginering +o-
Ettore

Newsgroup: it.comp.lang.delphi
Titolo: Individuare inserimento floppy automaticamente

Qualcuno di voi sa per caso come individuare in modo automatico 
l'inserimento del floppy senza dover leggere continuamente da esso?
Grazie,
   Luca


Ciao,
il floppy drive ha solo un flag che indica quando il floppy viene tolto, ma
non quello che segnala quando ne viene inserito uno.
In ms-dos saprei farlo, come ho già fatto, ma in windows non so proprio
aiutarti. Non so come accedere a questo flag.
Per quanto riguarda l'inserimento non puoi fare altro che controllare
periodicamente, come faceva Amiga, la presenza di un floppy. Un coltrollo di
questo tipo potrebbe essere fatto leggendo un settore del floppy, ma le
procedure per i sistemi 9x e nt sono diverse.
Nei 9x in qualche modo ci si avvale sempre dell'int 13h.
Nei sistemi nt si apre la periferica con CreateFile e si legge come se
leggessi un file con ReadFile e WriteFile.
Non so dirti altro.
Ciao
Giuseppe

 Non so dirti altro.
Era quello che sospettavo... speravo di sbagliarmi.
Grazie comunque,
   Luca
Newsgroup: it.comp.lang.delphi
Titolo: Delphi e PostgreSQL

Ciao a tutti,
    sto provando ad utilizzare il database PostgreSQL con oggetti ADO, 
utilizzando il provider pgOLEDB v1.0.0.20, ma quando creo un oggetto 
TADOQuery legato ad una TADOConnection tutti i campi del database hanno 
impostato il valore della proprietà CanModify su False, e quindi, 
ovviamente, non posso modificarne il valore, ma posso solo leggerli (la 
lettura dei dati funziona correttamente).
    Dove ho sbagliato?
    Grazie,
    Antonio 

 impostato il valore della proprietà CanModify su False, e quindi,
usi campi persistenti?
A.

 usi campi persistenti?
No. La tabella è definità così in PostgreSQL:
CREATE TABLE clienti
(
  id int4 NOT NULL DEFAULT nextval('"CLIENTI_ID_seq"'::regclass),
  nominativo varchar(80),
  indirizzo varchar(50),
  cap varchar(5),
  citta varchar(50),
  provincia varchar(2),
  telefono varchar(20),
  tel_cell varchar(20),
  fax varchar(20),
  email varchar(255),
  partita_iva varchar(16),
  annotazioni text,
  CONSTRAINT clienti_pkey PRIMARY KEY (id)
)
WITHOUT OIDS;
ALTER TABLE clienti OWNER TO postgres;
mentre il gli oggetti definiti in delphi sono:
var
  connection: TADOConnection;
  query: TADOQuery;
begin
  connection:=TADOConnection.Create(self);
  connection.ConnectionString:='Provider=PostgreSQL.1;Password=password;User 
ID=postgres;Data Source=localhost;Extended Properties=""';
  connection.Open;
  query:=TADOQuery.Create(self);
  query.Connection:=connection;
  query.SQL.Text:='SELECT * FROM clienti';
  query.Open;
  ...
  ...
  ...
end;

Newsgroup: it.comp.lang.delphi
Titolo: DLL-Form as MDI child?

Dear NG! I have a MDI application and want to add a new form from an
external .dll because this form/feature should be optional for different
versions of this program. But now I have problems importing the external
form as MDI child. If I set the Form in the DLL to fsMDIchild I get an error
message that no MDI Form is active at the moment. Think you see the problem.
Does anybody know how to perform this problem?
Best regards
Thomas Greiner

go at 
http://www.gnomehome.demon.nl/uddf/
Bye
AS
-- 
Posted from  [212.17.220.41] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.delphi
Titolo: [OT] ancora video corso

ciao ragazzi/e... grazie per i numerosi post... ora mi viene un altra 
domanda.... avete un idea di come farla la presentazione??? tutto video con 
audio oppure montare il video con scritte?
pensavo di fare un menu' delphi per poi lanciare i vari filmati divisi per 
sezione
Simo 

 audio oppure montare il video con scritte?
Questo dipende dall'impatto che desideri dare alla presentazione e alla 
tipologia di target (il pubblico).
Ad ogni modo, giŕ che eravamo OT, potevi continuare la discussione nel 
thread precedente. :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

audio oppure montare il video con scritte?
Simo, se scarichi il 2.0 hai gia' tutto compreso.
http://swftools.com/tool-details.php?tool=8162413051
Puoi fargli registrare l'audio dalla presa microfono, dovrebbe sincronizzarlo
automaticamente lui. Per quanto riguarda le scritte in "tools->screen
annotation" hai a disposizione numerose didascalie da inserire nel tuo
filmato.
Ad ogni modo, con F1 esce un help esauriente sulle potenzialita' di questo
strumento che, a differenza della versione successiva (la 2.1) non richiede
nessun codice di registrazione.
BTW, ho comperato in edicola tempo fa un video corso di macromedia
dreamveawer, e ho visto che la struttura del cd era composta da due cartelle,
una con i video e una con gli mp3 dei vari tutorial.
ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/
Newsgroup: it.comp.lang.delphi
Titolo: TListView con expande/collapse singole righe

--
CyberWalkie - walkietalkie(at)
libero.it

Scusate, mi e' partito un mex vuoto.
Dicevo : siccome sto scrivendo un mio personale newsreader
(in realta' e' un clone di Agent con un suo linguaggio di
script interno e con la possibilita' di gestire piu' profili
per singolo newsserver e per singolo newsgroup), mi
servirebbe sapere se esiste un componente TListView simile a
quello usato con Agent, con la possibilita', cioe', di
espandere/collassare righe.
Qualcuno e' a conoscenza di componenti del genere ?
--
CyberWalkie - walkietalkie(at)
libero.it



Il TreeView non va bene? 
E' in grado di fare tutto quello che fa Agent.
Massimo.
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"

E' in grado di fare tutto quello che fa Agent.
Ma il treeview puo' anche separare gli elementi di ogni singola
riga (autore, data, subject,...) ai fini della visualizzazione
secondo l'ordine di una colonna ?
--
CyberWalkie - walkietalkie(at)
libero.it

secondo l'ordine di una colonna ?
Sě (con un po' di codice), guardati TreeView.Items.SubItems.
Se serve aiuto fatti vivo: il mio secondo nome č TreeView eeheheheheh.


secondo l'ordine di una colonna ?
Ovviamente HO BISOGNO di una LUNGA vacanza (che non faccio da due
anni).
Tutto il discorso era riferito a TListView e non TTreeView.
Con TListView puoi fare tutto quello che vedi in Agent escluso il nodo
di espansione che richiede un po' di codice per nascondere-mostrare il
thread.
Scusa.


thread.
Ecco appunto :-) e' proprio il nodo di espansione il problema...
volevo evitare di scrivere quel codice, trovando un componente
gia' pronto :-)
--
CyberWalkie - walkietalkie(at)
libero.it

 E' in grado di fare tutto quello che fa Agent.
Non mi sembra.
Comunque questo componente fa ciň che voleva chi ha iniziato il thread:
http://www.lischke-online.de/VirtualTreeview.html
http://groups.yahoo.com/group/VirtualTreeview
-- 
Roberto Lupi
http://www.lupi.ws/

Non mi sembra.
Infatti mi sono gia' cosparso la testa di cenere ;-)


Newsgroup: it.comp.lang.delphi
Titolo: Modem & Wav

E' fattibile da modem chiamare un telefono fisso (o mobile) e far ascoltare
ad un interlocutore un file wav?
Many TNKS!

ad un interlocutore un file wav?
Si', e' possibile.
Consulta l'help MS sulle TAPI.
--
CyberWalkie - walkietalkie(at)
libero.it
Newsgroup: it.comp.lang.delphi
Titolo: posizioni decimali..

ciao a tutti..
Avrei un problema  spero che voi mi possiate aiutare..
sto facendo un programma che calcola l'angolo finale di una macchina
utensile (vecchia fresa), la fresa contiene + snodi inclinati e non, ogni
snodo a un suo nonio per impostare un'inclinazione, variando queste si
ottiene un angolo finale che è l'angolo di lavorazione..
l'utente mi ha chiesto questa applicazione perchè ha smarrito le tabelle di
conversione.. e sta utilizzando la fresa lasciandola inclinata a 90° e
variando solo lo snodo verticale quindi e limitato perche può fare solo
alcuni tipi di lavorazione.. vabbuò non entriamo nel dettaglio altrimendi
diventa una discussione sulle lavorazioni meccaniche..
--
le mie domande sono..
esiste una funzione già fatta che se io passo 720° lei mi restituisca 360°
(o 0°)??
oppure se passo 540° mi dia 180° o se 810° mi dia 90°
cioè io passo un angolo e lei mi deve dare il primitivo..
penso che non possa esistere.. l'alternativa è fare così:
se mi passi 720° io divido x 360° quindi 720/360 = 2.0 io prendo solo la
parte decimale e la moltiplico per 360.. in questo caso otterei 0° che è
giusto!!
se mi passi 540 divido x 360 quindi 540/360=1.5 prendo 0.5 e moltiplico per
360 -> 0.5*360=180° OK.
ma allora la mia domanda è come ottengo la parte decimale di un numero
extended???
quindi esiste questa funzione dove la posso trovare????
Poi un'ultima cosa esiste una funzione che mi approssi i numeri a X
posisizioni decimali..tempo fa quando parlavate di conversione LIRE/EURO
avevo visto una funzione del genere ma non ho più trovato il vecchio post..
io ho risolto utilizzando la funzione format.. ma mi sembra brutto..
ciccio: string;
pippo: extended;
ciccio:= format ('%.3f',[pippo]);
pippo:= strtofloat(ciccio);
funziona ma non mi piace...
scusate se chiedo cose stupide ma provengo da un'altro linguaggio e mi devo
adattare al Delphi..
grazie a tutti
ciao.

Ciao,
se lavori con interi basta utilizzi mod che ti restituisce il resto
540 mod 360 = 180
720 mod 360 = 0
x1:= valore mod 360;
mentre per arrotondare guarda la funzione round
se vuoi arrotondare alla seconda cifra decimale:
x1:=Round(valore * 100)/100;
bye Max

 x1:= valore mod 360;
grazie per il resto..
ciao..

cioè io passo un angolo e lei mi deve dare il primitivo..
while angolo >= 360 do	angolo := angolo - 360;


Col dubbio se sia piu' veloce questo sistema o quello suggerito da
Unforgiven, converti l'extended in un integer (con una Trunc()), fai il mod
360, riconverti in extended e fai x1-x2...
Il dubbio sorge dal fatto che col sistema di unforgiven puoi avere un caso
con zero cicli, con questo dovresti mettere una if a monte; inoltre, non so
da che numero di iterazioni la doppia conversione piu' mod inizi a costare
meno del ciclo di sottrazioni (da qualche parte succede sicuramente, ma se
parliamo di 3 iterazioni va bene, se invece sono 100 dobbiamo avere un
valore base di 36000 gradi, a quel punto il metodo con il mod e' da
cestinare).
Ciaotutti,
*
Newsgroup: it.comp.lang.delphi
Titolo: consiglio acquisto libro

com'č il libro "Programmare con Delphi 5" di Marco Cantů edito da Apogeo?
sul pascal ho gia letto "Turbo Pascal 7" della mcgrawhill quindi il
linguaggio lo conosco, ma so ben poco di programmazione in windows; č quindi
questo libro adatto a me?
grazie mille
ciao



Io possiedo la versione inglese, che e' piu'completa. Da quello che so
su quella italiana manca la parte relativa alla MIDAS cioe' la
programmazione Clinet Server avanzata. Io ho trovato il liboro in
inglese molto valido, solo un po' carente nella parte dei Database non
etraa fondo nei dettagli dei componenti per l'accesso ai dati o in
tecniche veramente avanzate.
Ciao
   Checco

 >linguaggio lo conosco, ma so ben poco di programmazione in windows; è


Credo che se trovassi Delphi 2 di Marco Cantů sarebbe meglio per iniziare.


> Credo che se trovassi Delphi 2 di Marco Cantù sarebbe meglio per iniziare.
in effetti per un principiante il 5 è troppo.
io ho letto sia il cinque che il due, e per ora ti consiglio il due, quando
hai preso parecchia padronanza del linguaggio passa al cinque.
--
web:    
http://gnaffy.tripod.com/
e-mail: Gna...@Wappi.com
e-mail: 
bmq...@tin.it
ICQ#:  76488613

 wrote in message
8rnllp$qq1$1...@nslave2.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: Interbase da capo...

Scusate l'insistenza, ma vi pongo questo quesito...
Dopo aver notato una lentezza enorme nella apertura e chiusura dei database
che utilizzava la mia applicazione delphi ho praticamente re-installato il
sistema operativo (XP sp2), ho disabilitato il system restore e ho cambiato
comunque l'estensione gdb ai miei database.
Risultato...nulla...è lento uguale...
Impiegava 20 secondi con IBConsole per collegarsi al server locale e altri
20 secondi circa per aprire un qualsiasi database.
Ora sono riuscito a evitare i primi 20 secondi con una istruzione che
imposta a sola lettura un database gdb di interbase (isc4.gdb)
gfix -mode read_only isc4.gdb (sicuramente è un database che apre IBConsole
quando si viene connessi al local server)
per gli altri database rimane il fatto che per fare un connect o un
disconnect ci mette una ventina di secondi.
Giusto per provare ho eseguito la stessa istruzione sui miei database e in
questo modo la connessione è istantanea...pero' essendo i database in sola
lettura non mi sono molto utili...
L'unica cosa un po' particolare del pc è che il disco di sistema (che è
anche l'unico) sono due dischi in mirroring ma la cosa dovrebbe essere
completamente trasparente a interbase...no? Avevo letto di articoli che
parlavano di rallentamenti, ma non di 20 secondi su un db vuoto di 1.5MB!!!
E poi se anche fosse...perchè solo interbase rallenterebbe cosi' tanto?
Avete idee??
Grazie 1000.

 completamente trasparente a interbase...no? 
hai un disco con 2 partizione e una fa da mirror per la seconda? Su 
Winxp? Riesci  afare un test disattivando il mirroring temporaneamente?
Inoltre hai norton come antivirus? Se si, definisci le estensioni da 
escludere...
A differenza di McAfee, che ha una lista di cose da controllare definita 
da loro ma personalizzabile, Norton lavora al contrario: esamina tutto 
quello che tu non gli dici di escludere....
-- 
Alberto Salvati
An italian delphi developer that are studing c# & .Net

 
Anche io ho lo stesso problema e non sono riuscito a risolverlo: che
sia incompatibilità con XP pro? (ho  aggiornato a SP2 sperando che il
problema si risolvesse).
Se può servire lanciando Interbase Server Manager e poi chiudendolo
ottengo questo messaggio:
rundll32.exe - Errore di applicazione
Si è verificato l'errore di exception eccezione software 
sconosciuta (0x0eedfade) nell'applicazione alla posizione 
0x7c81eb33.
Ritengo che il problema derivi da qui. Ho disinstallato e reinstallato
ma nulla!
Nel caso avessi già risolto help me!

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

Ciao ho da chiedervi una cosa che per voi è certamente banale:
devo estrarre da una stringa una sottostringa fino al punto, come faccio?
Ad es.
'gino.pippo' --> 'gino'

 Ciao ho da chiedervi una cosa che per voi č certamente banale:

Newsgroup: it.comp.lang.delphi
Titolo: delphi2 > Access

Salve, sto cercando di imparare qualcosa su Delphi (ho la versione 2.0)
vorresi sapere come effetture una connessione ad un database Access.Ho
aperto il BDE configuration Utility ed ho aggiunto il driver ODBC, poi ho
inserito il componente Table ma quando provo a richiamere il database mi
restituisce un errore(il formato di database non è supportato).
 Cosa devo fare? serve un altro componente?
Vengo da VisualBasic e so poco di Delphi e del Pascal, grazie in anticipo
  ciao


wrote:

hmmm.. probabilmente perche' Delphi 2 non poteva suportare una
versione di Access che doveva ancora esistere! ;)))
... a proposito, che versione di Access? immagino 97 o 2000..
soluzioni: o usi una versione piu' vecchia di Access, oppure ti
scarichi l'ultima versione del BDE, anche se non ti assicuro che
funzioni con D2...
Ciao,
Alan Solo

Newsgroup: it.comp.lang.delphi
Titolo: D2007 vs D7 : DBAware funzionano diversamente

Ciao a tutti,
Sto provando per le prime volte D2007 dopo tanti anni di utilizzo di
D7. Ci sono alcune cose che funzionano in modo diverso a partita` di
codice.
Un esempio: ho un DB con alcune tabelle di quelle che hanno come scopo
principale quello di popolare le tendine per una gestione migliore
dell'interfaccia utente. Quindi tipicamente tabelle con una chiave
contatore ed un campo descrittivo (elenchi di categorie, nel caso
specifico).
Abitualmente nel mio Data Module con D7 inserivo una AdoQuery con una
SELECT * FROM xxx ORDER BY yyyy
Questa stessa AdoQuery la utilizzavo in tutti le finestre in cui ho
bisogno di una DBlookupComboBox, anche in quei casi in cui ho piu`
ComboBox nella stessa finestra.
Non ho mai avuto problemi usando D7.
Ora riprendo lo stesso progetto sotto D2007 ed il comportamento e`
diverso: ogni ComboBox modificando il valore selezionato va ad agire
sulle altre ComboBox creandomi non pochi problemi.
Possibile che io debba creare AdoQuery identiche, una per ogni
ComboBox (o almeno in quelle che si influenzano negativamente)  in cui
uso la AdoQuery come ListSource ? 
Oppure esiste una nuova proprieta` che non ho trovato per specificare
un diverso comportamento del componente?
Vi ringrazio
Luca

 sulle altre ComboBox creandomi non pochi problemi.
Per quanto ne so io, invece, questa è stata la modalità di funzionamento 
di sempre, anche in versioni precedenti a D7. :-|
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 di sempre, anche in versioni precedenti a D7. :-|
Confermo. Ho lavorato in D6 fino a un anno fa e ho dovuto mettere una 
query per ogni combo.
ciao
Giacomo
Newsgroup: it.comp.lang.delphi
Titolo: FindNext: come funziona?

Come funziona un ciclo FindFirst/FindNext?
Io pensavo che l'istruzione FindNext facesse ricominciare il ciclo daccapo,
e invece mi sembra che non succeda.
Infatti, se compilo il codice qui sotto (che come potete vedere mi legge la
prima riga del file trovato e poi la salva in un nuovo file) mi viene letto
un solo file (il primo che trova), ma se voglio leggerne un altro devo
aggiungere altro codice dopo FindNext !! (mi sembra assurdo)
Questo lo potrei anche fare, ma se voglio cercare tutti i file presenti in
C:\ , supponendo che ce ne siano una ventina, non posso mica scrivere venti
volte lo stesso codice.
CONST
  path1 = 'C:\*.txt';
  path2 = 'C:\Prova.txt';
TYPE
  SearchRec = TSearchRec;
VAR
  MioFile, NuovoFile :TextFile;
  PrimaRiga :STRING;
  Cerca :SearchRec;
BEGIN
  AssignFile(NuovoFile, Path2);      REWRITE(NuovoFile);
  FindFirst(Path1, faAnyFile, Cerca);
  AssignFile(MioFile, Cerca.Name);   RESET(MioFile);
  READLN(MioFile, PrimaRiga);
  WRITELN(NuovoFile, PrimaRiga);
  CloseFile(MioFile);
  FindNext(Cerca);
  FindClose(Cerca);
  CLoseFile(NuovoFile);
end;
Stefano

volte lo stesso codice.
no... ;) usa un ciclo:
while FindNext(Cerca) = 0 do begin
 // fai qulcosa con il prossimo file trovato
end;
// quando non ci sono piu' file esce dal ciclo
// (findNext retituisce zero)
Ciao,
Alan Solo

 // (findNext retituisce zero)
Ah, ho capito.
Quindi prima apro il primo file e ci faccio qualcosa, poi continuo con il
FindNext......
...Funziona!!
Grazie!! ;-)
Ciao
Stefano

 end;
e, meglio ancora:
if findfirst(..) then repeat elabora until findnext(..)<>0;
Ciao, Sandro

 end;
e, meglio ancora:
if findfirst(..)=0 then repeat elabora until findnext(..)<>0;
findclose(..);
Ciao, Sandro

findclose(..);
giusto, cosi' non si hanno distinzioni tra il primo e gli altri ;)
Ciao,
Alan Solo


Andrea

giusto per tranquillità.
icsche' ?? ;) il repeat until e' un blocco unico ....
Ciao,
Alan SOlo

> giusto, cosi' non si hanno distinzioni tra il primo e gli altri ;)
oltre ad essere sintetica, come vedi e' soprattutto una procedura molto
democratica :)))
Ciao, Sandro

 giusto per tranquillità.
fallo pure, tanto il linker te li toglie :))) ..sono del tutto inutili,
visto che il repeat/until costituisce un blocco!
Ciao, Sandro



hehe.. :). ci ho messo quei 3/4 ... minuti ;) per capirla!
Ciao,
Alan Solo

 Alan SOlo
Andrea

Quindi, tanto vale metterla subito.
sì ok, se si deve preprocessare il primo ok, ma in questo caso non ne
vedo necessità,
la mia di abitudine e' invece quella di non scrivere codice inutile...
;)
Ciao,
Alan Solo

 Alan Solo
Ciao,
Andrea

metti? :=)))
okkkeyyyy!! ;)))
Ciao, :)
Alan Solo
Newsgroup: it.comp.lang.delphi
Titolo: Lazarus. Code completion.

Ciao.
Spero di non essere OT, ma dato che ng sull'argomento
ancora non ne esistono porvo a chiedere qui.
Qualcuno di voi sa come far funzionare il code completion
di lazarus, visto che fra le opzioni e' presente ma la checkbox
e' disabilitata?
Grazie.
___
Ryo GQI 

 Grazie.
prego.
-- 
Ciao, Anto', [38, 143, AQ] 
MB C SC 220 CDI Magma Rot
"Oggi c'è 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: [D2005]Copiare dati da Paradox a Interbase

Ho provato a costruire una app. che legge una tabella Paradox
e dovrebbe creare una tabella in un database Interbase.
Premetto che di Interbase ne so ancora poco. Ho fatto così:
Questo è il DFM
  object Table1: TTable
    Active = True
    DatabaseName = 'MioAlias'
    TableName = 'MiaTabella.DB'
    object Table1NOME: TStringField
      FieldName = 'NOME'
      Required = True
    end
    ... altri campi ...
  end
  object IBTable1: TIBTable
    Database = IBDatabase1
    Transaction = IBTransaction1
    TableName = 'composizioni'
  end
  object IBDatabase1: TIBDatabase
    DatabaseName = 'F:\Path\MioDB.gdb'
    Params.Strings = (
      'user_name=SYSDBA'
      'password=masterkey')
    LoginPrompt = False
    DefaultTransaction = IBTransaction1
  end
  object IBTransaction1: TIBTransaction
    DefaultDatabase = IBDatabase1
  end
Nel codice dell'event handler di un bottone
ho scritto:
  IBDatabase1.Open;
  IBTransaction1.Active := true;
  IBTable1.FieldDefs := Table1.FieldDefs;
  IBTable1.IndexDefs.Assign(Table1.IndexDefs);
//  Caption := Format('P:%d -
I:%d',[Table1.FieldDefs.Count,IBTable1.FieldDefs.Count]);
//  Caption := Format('P:%d -
I:%d',[Table1.IndexFieldCount,IBTable1.IndexFieldCount]);
  try
    IBTable1.CreateTable;
  except
    Caption := 'HORROR';
  end;//try
  IBTransaction1.Active := false;
  IBDatabase1.Close;
Non mi da alcun errore, la data e l'ora del database
sono aggiornate al momento in cui premo il bottone, ma
la tabella non viene creata (nè se contiene dati, nè se è vuota).
Visualizzando i dati come da codice, ho notato che:
il n° di campi (o colonne) è uguale in entrambe le tabelle;
invece Table1.IndexFieldCount vale 1 mentre IBTable1.IndexFieldCount
vale ZERO. Potrebbe essere questa la causa della mancata
creazione della tabella?
Grazie a chiunque mi darà una mano.

[snip]
In Interbase / Firebird gli oggetti Ibtable sono sconsigliati. Servono solo 
a fare un porting (relativamente) indolore.
Io le ho usate e ho avuto GROSSI problemi di prestazioni (con BDE).
Molto meglio usare IbQuery e IbUpdateSql
Non credo che il metodo Createtable funzioni ( non ho provato perň ...).
Io uso il componente IBSql nel quale metto lo script per creare la tabella 
(o modificarla)
tipo:
iex1.Items.Clear;  //(iex1 č il componente TIBSql)
iex1.ExtractObject(eotable,'',[]); // legge tabelle da fb
if pos('TABELLA_CONTAINER',iex1.Items.Text) = 0 then
   begin // non esiste
   Qup.Close;
   qup.SQL.Clear;
   qup.SQL.Add('CREATE TABLE "TABELLA_CONTAINER" ');
   qup.SQL.Add('( "CODICECONTAINER"  integer NOT NULL, ');
   qup.SQL.Add('"DESCRIZIONECONTAINER"  VARCHAR(30),');
   qup.SQL.Add('"PESO" INTEGER,');
   qup.SQL.Add('CONSTRAINT "TABELLA_CONTAINER_PRIMARY" PRIMARY KEY 
("CODICECONTAINER") );');
   if dmM.IBT1.InTransaction = false then
      dmM.IBT1.StartTransaction;
   try
      qup.ExecQuery;
      dmM.IBT1.Commit;
   except
     on e:exception do
       begin
       showmessage(e.Message);
       dmM.IBT1.Rollback;
       application.Terminate;
       exit;
       end;
   end;
Giulio
Newsgroup: it.comp.lang.delphi
Titolo: Inserimento stringhe con apici in DB

Ciao,
ho questo problema: devo inserire delle stringhe in un database 
(Firebird, ma non credo abbia importanza).
Utilizzo questo metodo:
var miaVariabile:string;
...
DataModule1.Query1.SQL[0]:='INSERT INTO TABELLA1(VALORE) 
VALUES('''+miaVariabile+''')';
DataModule1.Query1.ExecSql;
Il problema nasce quando la stringa ha apici. Se li ha nel mezzo nessun 
problema perchč ho creato una funzione che li sdoppia:
var miaVariabile:string;
...
DataModule1.Query1.SQL[0]:='INSERT INTO TABELLA1(VALORE) 
VALUES('''+SdoppiaApici(miaVariabile)+''')';
DataModule1.Query1.ExecSql;
Ma se li ha alla fine della stringa non riesco a risolverlo in questo 
modo. Da errore per un problema di numero di apici.
La mia funzione di sdoppiamento apici č:
function TmainFrm.SetApex(sourceStr:string):string;
var tmpstr:string;
     i:integer;
begin
i:=1; result:='';
while i<=length(sourceSQL) do
   begin
     if sourceSQL[i]='''' then result:=result+sourceSQL[i];
     if (sourceSQL[i]='''')and(i=length(sourceSQL)) then 
result:=result+sourceSQL[i];
     result:=result+sourceSQL[i];
     inc(i);
   end;
end;
Dove sto sbagliando?????   E' il metodo giusto per inserire stringhe del 
genere.
P.S.: Ho provato anche con l'utilizzo di parametri ma non cambia nulla.

[...]Il problema nasce quando la stringa ha apici.[...]
Problema trito e ritrito.  Trito e ritrito come la risposta: usa i
parametri.
Query.SQL.Text := 'insert into tabella (campo) values (:campo)';
Query.ParamByName('campo').AsString := 'paperino';


Prova con QuotedStr se nella tua versione di Delphi č presente come
funzione, da Delphi 5 sě.
Ciao
--- posted by geoForum on 
http://www.delphiedintorni.it


Puoi usare  ansiquotedstr(stringa,'''')


Newsgroup: it.comp.lang.delphi
Titolo: Come si puó aprire un secondo Form quando si minimizza il principale

Mi servirebbe per ridurre le dimensioni del Form principale a minimi
termini.
Se é possibile mi piacerebbe anche sperimentare su ridurre un Form da
normale a taskbar

 termini.
spunti di riflessione:
- evento OnResize;
- evento OnCanResize;
- proprietą WindowState;
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)


wrote:


 Grazie Mauro, vedró se riesco a fare qualcosa.
puoi sempre chiedere qui quando t'incagli da qualche parte


Newsgroup: it.comp.lang.delphi
Titolo: Programmi per PDA

E' possibile creare con delphi programmi per PDA???
E' possibile eseguire con il PDA file eseguibile (*.exe)???
Grazie
Nicola
--- posted by geoForum on 
http://www.delphiedintorni.it

 E' possibile eseguire con il PDA file eseguibile (*.exe)???
Si...ma è una cosa micidiale...lo lessi su un sito...se ci metti linux e 
wine,alcune cose riesci a farle girare (ovviamente non aspettarti grandi 
cose...)

Newsgroup: it.comp.lang.delphi
Titolo: posizione dei database

Ciao,
sono riuscito ad interfacciare la mia applicazione con un database Access
2000 tramite ODBC. Ora però dovrei creare un form dal quale sia possibile
scegliere le posizioni dei vari archivi sui vari client. Ad esempio:
Database Articoli: "E:\database\articoli.mdb"
Database Utenti: "D:\database\utenti.mdb"
Ho visto un gestionale che adotta questa soluzione. Come posso ottenere
qualcosa di simile???
ciao!
__________________
Maurizio Manna
www.f1grandprix.it
News, foto, storia, cifre, chat, forum, wallpaper, screen saver e altro
ancora sulla Ferrari e la Formula 1

 qualcosa di simile???
Non so se fa al caso tuo.... ma prova con il componente TDataBase
Saluti NEA


Io ho risolto cosě
posiziono un file testo nella stessa directory dell'applicazione
in questo file metto il path (una linea) completo del DB es.
c:\myprog\mydb.mdb
ogni volta che parte l'applicazione, leggi dalla directory dell'applicazione
il file testo contenente il path MDB cosě conosci la posizione dell'MDB e lo
puoi posizionare dove vuoi senza dover ricompilare.
Se vuoi che appaia una finestra che permetta di scegliere la posizione, in
un form metti una opendialog, scegi l'MDB dove vuoi e poi scrivi il file
testo di cui sopra. Cosě sarai svincolato dalla posizione dell'MDB
Ciao
Newsgroup: it.comp.lang.delphi
Titolo: query nidificate access

Salve!
Utilizzo un db ms access e dovrei fare una query del tipo:
update tab1 set tab1.campo1=tab1.campo1 - 1 where tab1.campo2 in (select
tab2.campo1 from tab2 where tab2.campo2='valore')
Questa query funziona correttamente in access, ma da delphi (via ADO)
non funziona. Ho cercato un po su internet ma non ho trovato granchč.
Allora mi č venuto unidea: forse access non supporta query nidificate?
Qualcuno puo' darmi una mano?
Grazie e ciao!
Ale.Ber
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Allora mi è venuto unidea: forse access non supporta query nidificate?
Il semplice "non funziona" non è una buona analisi del problema.
Di per sè, ciò che può essere eseguito in Access non ha motivo di avere dei 
limiti se utilizzato attraverso ADO (se fosse BDE probabilmente si, ma ADO 
non mi sembra entri nel merito del comando eseguito). Quindi se la stessa 
query sei riuscito ad eseguirla in Access stesso teoricamente non c'è motivo 
per cui non possa eseguita da un componente.... quale componente usi? e 
quale messaggio di errore ottieni?
Ciao,
Gianluca.

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

ciao a tutti,
sapete dove posso trovare dei componenti o DLL che implementano algoritmi 
cirttografici con funzioni invertibili?
grazie in anticipo!
------------------------
Diego Di Filippo
  R&amp;D Software Developer
 
www.ada-project.com
-----------------------
--- posted by geoForum on 
http://www.delphiedintorni.it

se ne č parlato pochi gg fa.
Vedi nei vechci post, nelle faq, nei soliti siti...
-- 
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"

grazie in anticipo!
Prova a cercare LockBox, ex turbopower.
-- 
Ore 18.30: premo invio.

Newsgroup: it.comp.lang.delphi
Titolo: principale/dettaglio

ciao a tutti,
utilizzo il sistema principale/dettaglio con le seguenti tabelle : 'polizze'
e 'rinnovi'. All' apertura del form , il sistema mi funziona bene solo se
clicco dal secondo record della tabella principale. Mentre se clicco sul
primo record mi vengono visualizzati tutti i record dei rinnovi. Come mai??
ciao

Database?

imposti un filtro sul click di qualche oggetto (dbgrid).
All'apertura il filtro non viene impostato.
Magari, con qualche dettaglio in + non saremmo costretti a essere
telepatici....
Bye
A.



Che DB usi ?
La relazione la imposti a codice o usi le funzionalita' del DB ?
Le tabelle da che campi sono legate ?
--------------------------------
Inviato via 
http://usenet.libero.it

usando mastersource e masterfield come si imposta il filtro???
"Alberto Salvati" <x@x.x from office> ha scritto nel messaggio
news:amcfgj$14j4$1...@newsreader1.mclink.it...


Scusa, ma tu ora come lo fai?
A.
Newsgroup: it.comp.lang.delphi
Titolo: D'Alema, una speranza per tutti

Difficile fare paragoni, ma Amendola che sarebbe stato (e se fosse vivo 
sarebbe) un ottimo presidente della Repubblica credo ritterrebbe 
improponibile una sua candidatura. Credo che Enrico Berlinguer farebbe lo 
stesso.
Mi pare che l'immodestia del personaggio D'Alema sia sufficiente a rendere 
la sua figura improponibile al ruolo di Presidente.
C'è uno strano atteggiamento. I DS pongono il problema che non possono 
essere mesi veti, d'accordo, ma il problema vero è se c'è di meglio.
E di meglio c'è molto. In particolare in quella che si chiama società 
civile.
Se i DS, al proprio interno non hanno figure di prestigio e devono 
appoggiare una mediocre personaggio come D'Alema forse farebbero bene a 
chiedersi che politica hanno fatto in tutti questi anni. 

 chiedersi che politica hanno fatto in tutti questi anni. 
Caption = "...." invece di Caption := '.....'
-- 
-------------------------------
per scrivere in privato
togliere "1975nosp"
to reply remove "1975nosp"

 improponibile una sua candidatura. [...]
Hai centrato male il NG o è una cosa voluta? :-D
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

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

Newsgroup: it.comp.lang.delphi
Titolo: PrintOut e vassoio 2

Utilizzo la funzione
    WordDocument.PrintOut(BackGround,Append,Range);
per stampare un documento di word che apro e modifico con OLE
Ultimamente ho cambiato stampante e il documento lo devo stampare prendendo 
la carta dal vassoio 2 che non è il default della stampante.
Ho ovviamente modificato le proprietà della stampante in modo che vada 
sempre sul vassoio 2.
Se stampo un documento normalmente da word, prende la carta dal vassoio 2, 
mentre se lo stampo dal mio applicativo mediante PrintOut prende la carta 
dal vassoio 1.
Perchè PrintOut  non utilizza le proprietà della stampante e stampa con 
carta da vassoio 1 ?
Cosa devo fare per fare in modo che PrintOut  cambi la sorgente della carta 
.
 
Grazie
 
Stefano
 

 carta .
Documentarti sull'API di word. Con delphi fai già tutto quello che ti serve.
 
-- 
morde
QT 4.7
Delphi (5,6,7.. expired)
Firebird Database

guarda questo codice sicuramente ti sarà utile, ciao Brunello
 
http://www.swissdelphicenter.ch/torry/showcode.php?id=1571
 


http://www.swissdelphicenter.ch/torry/showcode.php?id=1571
Ho provato questa soluzione che dovrebbe essere corretta ma non funziona !!!
WordApplication.Options.DefaultTray := 'Vassoio 2'; 

> Ho provato questa soluzione che dovrebbe essere corretta ma non funziona !!!
 
..cioe'..?
 
A.

..cioe'..?
 
Ho impostato il DefaultTray
 
WordApplication.Options.DefaultTray := 'Vassoio 2';
 
S. 
 

 
var
  SetupPrinter: TPrinterSetup;
  s: string;
begin
  SetupPrinter:=TPrinterSetup.Create;
  s := SystemDir + 'vassoio_2.cfg';
  if FileExists(s) then
    SetupPrinter.LoadSetup(s);
  if PrinterSetupDialog1.Execute then
    begin
//      lanci la stampa
      SetupPrinter.SaveSetup(s);
    end;
  SetupPrinter.Free;
end;
Newsgroup: it.comp.lang.delphi
Titolo: MSDE e delphi distribuire - URGENTE -

salve a tutti,
ho poco tempo e non riesco a distribuire la mia applicazione, uso
MSDE(SQLServer Express): quali librerie devo distribuire oltre a alle
bpl dei componenti di III parte che uso(devexpress e zeos), distribuisco
anche adortl70.bpl, vcl70.bpl, vcldb70.bpl, dbexpmss.dll purtroppo non
ho la possibilità di testare qualcuno può aiutarmi!
disposto a pagare una cena!!!
Alfio
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ho la possibilità di testare qualcuno può aiutarmi!
Non hai indicato quali sono i componenti che usi per accedere ai dati, 
oltre al fatto che - se non sbaglio - nel tuo elenco ne compaiono alcuni 
che difficilmente ti ritroverai assieme (Zeos e dbExpress).
Per testare, usa una macchina installata "di fresco", oppure una 
"virtual machine" come VMWare o Virtual PC.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

come accesso ai dati uso zeoslib(che è indicato) la macchina non è
installat di fresco ma una operante


io uso devexoress che un set di componenti standard(tab) like e non
dbexpress che serve per l'accesso ai dati di fatti come ho scritto per
la conessioen al db uso le zeoslib


 la conessioen al db uso le zeoslib
Nel tuo elenco precedente hai citato il file "dbexpmss.dll" che è un 
driver dbExpress. Quel file, ovviamente, non va ridistribuito poiché, a 
quanto pare, dopo le ultime precisazioni, non usi questa libreria.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Inviato da X-Privat.Org - Registrazione gratuita 
http://www.x-privat.org/join.php

Allora qualcuno sa spiegarmi perchè mi viene alzata la seguente
eccezione??
errore:
"the conversion of a char data type to a datetime data type resulted in
an out of range datetime value"
Io non riesco a capirlo sul mio pc funziona tutto su quello degli altri
no(ma in un test installando su una macchina anche delphi la cosa funge!
Grazie e scusate per la pressione
