mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: [D5][MSSQL][ADO2.6] Generazione SQL sballato

Salve,
Ecco il codice SQL generato da un TAdoQuery:
exec sp_executesql N'Insert into AZIENDA
values(@P1,@P2,@P3,@P4,@P5,@P6,@P7,@P8,@P9,@P10;@P11,@P12,@P13,@P14,@P15,@P1
6,@P17 )
', N'@P1 varchar(100),@P2 varchar(200),@P3 varchar(10),@P4 varchar(30),@P5
varchar(30),@P6 varchar(30),@P7 varchar(255),@P8 text,@P9 varchar(300),@P10
varchar(100),@P11 varchar(100),@P12 varchar(200),@P13 varchar(200),@P14
varchar(200),@P15 varchar(200),@P16 varchar(50),@P17 varchar(300)', 'Mia
Azienda', 'Mio Indirizzo', 'CAP', 'Mia città', 'Mio Telefono', 'Mio Fax',
'MioLogo', 'Testo del messag', '
mail.tin.it
', '', '',
'
in...@miacompagnia.com
', '
ord...@miacompagnia.com
',
'
sup...@miacompagnia.com
', '
webm...@miacompagnia.com
', 'Mia Partita IVA',
'
http://www.miacompagnia.com
'
Ovviamente il codice e' sballato, ma non so esattamente come si generi
l'errore.
Qualche idea?
Andrea


wrote:

Scusa, sarà il mal di testa, ma cosa c'e' di sbagliato? Io vedo 17
parametri varchar() e 17 valori varchar()
-- 
"La velocità luce non è sufficiente Comandante Nunziatella, 
dobbiamo passare alla velocità smodata!"

l'errore.
Se spiegassi perche' e' sballato per te, che errori ingenera, in che contesto
viene eseguita la query, forse qlcuno puo' darti una mano, ma cosi'......
-- 
Morde. 
(morde at programmer dot net)

 parametri varchar() e 17 valori varchar()
Ho avuto modo di analizzarlo bene, effettivamente c'era un ; di troppo :-)
Ciao,
Andrea

 ma cosi'......
Originariamente, il Query Analyzer mi dava errori strani - quindi non
avevo idea di dove fosse il problema. Poi ne ho ri-fatto il cut&paste,
ottenendo un
errore su un punto e virgola(;).
Adesso /dovrebbe/ essere tutto a posto!
Andrea
Newsgroup: it.comp.lang.delphi
Titolo: Richedit e Delphi 2005

Ciao a tutti!
Ho un problema con un TRichEdit, che funzionava perfettamente con Delphi 7.
Pare che se lo riempio con più di approssimatamente 1200 righe esso perda
le funzionalità di style etc, presentandomi come risultato una roba come
quella che segue:
{\rtf1\ansi\ansicpg1252\deff0\deflang1040{\fonttbl{\f0\fnil MS Sans
Serif;}{\f1\fnil\fcharset0 MS Sans Serif;}}
\viewkind4\uc1\pard\b\f0\fs16 51 e Pi\f1\'f9 [Anziani]
\par \b0\f0 Via Roma 101 - 41028 Serramazzoni (MO)
\par Tel. 0536/954320 
\par Sintesi: Animazione a favore di persone anziane presso spazio
dedicato.
\par 
Come faccio?
Sottolineo che non ho fatto altro che aprire un progetto delphi 7
funzionante con delphi 2005, niente modifiche se non quelle richieste per
la compatibilità (che comunque non hanno nemmeno sfiorato il trichedit).
Avete idee?
Grazie in anticipo!
Daniele

 quella che segue.
Io ho caricato in un controllo RichEdit circa 7MB di file RTF ma non ho 
notato alcun stravolgimento. :-|
Hai provato a costruire un progetto ex novo sperimentale allo scopo di 
verificare se il problema persiste anche in quel caso?
-- 
Marco «Alka» Breveglieri
(marco [@] abls [.] it )
  ABLS Team S.n.c. - Software & Web
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 verificare se il problema persiste anche in quel caso?
Il problema si è risolto spostando la funzione che riempiva il RichEdit
nell'onshow del form che lo contiente... Prima la chiamavo prima di
visualizzare il form. Rimane un mistero la spiegazione tecnica del fatto,
ma l'importante per ora è che funzioni :)
Comunque grazie!
Daniele

 ma l'importante per ora è che funzioni :)
Se non sbaglio, il *TRichEdit* possiede una proprietà /PlainText/; non 
vorrei che essa venisse impostata a False dopo il caricamento del file 
di testo...anche se rileggendo quello che ho scritto, ammetto che possa 
non aver senso comunque. :-)

Newsgroup: it.comp.lang.delphi
Titolo: TCollection

Qualcuno hai mai derivato classi da TCollection? Come si usa? Io ho provato
a farne una ma ottengo solo che la proprietą Itmes non puņ essere un array?
Chi mi aiuta? Esiste qualche faq in merito?
Grazie.
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

> Chi mi aiuta? Esiste qualche faq in merito?
c'era un bell'articolo su 
delphi.about.com
-- 
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"

 Chi mi aiuta? Esiste qualche faq in merito?
diverso tempo fa mi ero costruito questo semplice esempio, che ti riporto "as 
is"
///////////////////////////////////////////////////////////////////////////
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ComCtrls;
type
  TMyCollectionItem = class(TCollectionItem)
  public
    Name: string;     //public field
    Date: TDateTime;  //public field
  end;
  TMyCollection = class(TCollection)
  protected
    function GetItem(Index: Integer): TMyCollectionItem;
    procedure SetItem(Index: Integer; Value: TMyCollectionItem);
  public
    constructor Create;
    function Add: TMyCollectionItem;
    property Items[Index: Integer]: TMyCollectionItem read GetItem write 
SetItem; default;
  end;
  TForm1 = class(TForm)
    btnAdd: TButton;
    ListView1: TListView;
    procedure FormCreate(Sender: TObject);
    procedure btnAddClick(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
  private
    FMyCollection: TMyCollection;
    procedure UpdateList;
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
uses
  MfDateUtils;
{$R *.dfm}
{ TMyCollection }
function TMyCollection.Add: TMyCollectionItem;
begin
  Result:= TMyCollectionItem(inherited Add);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
  FMyCollection:= TMyCollection.Create;
end;
procedure TForm1.btnAddClick(Sender: TObject);
begin
  FMyCollection.Add.Date:= Now;
  UpdateList;
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
  FMyCollection.Free;
end;
procedure TForm1.UpdateList;
var
  i: Integer;
  li: TListItem;
begin
  with ListView1 do
  begin
    Clear;
    for i:= 0 to Pred(FMyCollection.Count) do
    begin
       li:= Items.Add;
       li.Caption:= FormatDateTime('hh:nn:zzz', FMyCollection[i].Date)
    end
  end;
end;
constructor TMyCollection.Create;
begin
  inherited Create(TMyCollectionItem);
end;
function TMyCollection.GetItem(Index: Integer): TMyCollectionItem;
begin
  Result:= TMyCollectionItem(inherited GetItem(Index))
end;
procedure TMyCollection.SetItem(Index: Integer; Value: TMyCollectionItem);
begin
  inherited SetItem(Index, Value);
end;
end.
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)
Newsgroup: it.comp.lang.delphi
Titolo: Help [x realizzazione componente]

Per la realizzazzione dei componenti sono alle prime armi sapete dove posso
trovare sul web delle informazioni su come si fanno?
Grazie 1K : )
Simone
--
Quasar Computer System s.n.c.
Montichiari -BS-
Tel. 0309650679 Fax. 0309651021
www.qcs.it

 ha scritto nel messaggio
news:zWy97.17466$%7.24...@news6.giganews.com...


Newsgroup: it.comp.lang.delphi
Titolo: [Lungo]AsyncPro Thread e TForm

Salve a tutti,
ho postato pochi giorni fa per un aiuto sull'uso dei componenti in 
oggetto e mi e' stato consigliato di creare un thread separato per la 
gestione della porta seriale.
So che l'argomento e' trito e ritrito, ma proprio non mi riesco a 
raccapezzare. E' da ieri sera che giro per i gruppi, ho letto moltissime 
cose interessanti (Es il tutorial sui Thread di Nicola), ma non riesco a 
comprendere ancora alcune cose
Ecco cosa ho prodotto:
// [CUT]
type
   TPortLogThread = class(TThread)
   public
     // Mostrano e chiudono fmLog, Variabile publica del thread.
     procedure   ShowLog;
     procedure   CloseLog;
     // Ritorna lo stato della porta.
     function    PortIsOpen: Boolean;
     // Apre la porta con indirizzo specificato
     function    OpenPort(Const SerialPort: Word): Boolean;
     // Chiude la porta
     function    ClosePort: Boolean;
   protected
     procedure Execute; override;
   end;
implementation
uses ffmLog;
// [CUT]
procedure TPortLogThread.Execute;
begin
   fmLog := TfmLog.Create(nil);
   fmLog.Top  := 1;
   fmLog.Left := 1;
   { Place thread code here }
end;
procedure TPortLogThread.ShowLog;
begin
   fmLog.Show;  // Quando esegue questgo blocco da errore, come mai???
	       // In fmLog ho porta seriale ed eventi annessi.
end;
procedure TPortLogThread.CloseLog;
begin
   fmLog.Close;
end;
// [CUT]
// Se serve posto il resto della Unit, eliminata per ragioni di spazio.
in fmMain (main form dell'applicazione) eseguo:
TfmMain.Create
procedure TfmMain.FormCreate(Sender: TObject);
begin
   bStart     := True;
   LogThread := TPortLogThread.Create(True);
end;
procedure TfmMain.FormActivate(Sender: TObject);
begin
   if bStart then
     begin
       bStart := False;
       LogThread.Resume;
       // [CUT]
     end;
end;
Quando la formActivate esegue LogThread.Resume; scatta l'errore. Non 
riesco proprio a capirne la motivazione!
Come mai????
Please Help me!
-- 
Davide Gurgone
http://www.gurgone.it/
davide.gurgone_CHIOCCIOLINA_sweetvillage.it

 end;
   procedure TPortLogThread.CreateForm;
   begin
     fmLog := TfmLog.Create(nil);
     fmLog.Top  := 1;
     fmLog.Left := 1;
   end;
Ho anche trovato una cosa molto interessante!
Come far creare a run time un'applicazione, da un thread! Lo posto, 
magari non vi frega, ma ad alcuni puo' tornare utile! (il potere dei NG)
procedure TMyThread.Execute;
var
   xApp: TApplication;
begin
   xApp := TApplication.Create(nil);
   try
     xApp.CreateForm(TForm2, Form2);
     xApp.Run;
   finally
     xApp.Destroy;
   end;
end;
Fico, no?
Ciao!

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 6 PRO & ADO ?

Ciao a tutti.
Ho bisogno di capire se in Delphi 6 PRO c'e' gia' tutto cio' che
server per usare ADO (quello che era AdoExpress per Delphi5).
GRAZIE!
Chris.



http://www.borland.com/delphi/del6/featurematrix/
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"


http://www.borland.com/delphi/del6/featurematrix/
Ottimo, grazie!
Chris
Newsgroup: it.comp.lang.delphi
Titolo: TQuery e post ancora

Salve,
  non sono riusciuto a risolovere il seguente problema gia' postato,
aiutatatemi per favore.
  Il problema e' il seguente: io uso un componente TQuery con il suo
bravo TDataBase e il suo bravo TSession con una strinfa SQl del tipo:
SLECT * FROM miatabella.
Ho settato:
Requestlive:=True
AutoRefresh:=True
Fin qui tutto bene. 
Faccio una serie di inserimenti in un ciclo con la struttura:
...
Query.Insert
...
Query.post
I dati vengono regolarmante scritti sul database, interbase.
Il problema e che se poi faccio un Query.First e vado a scorre la
query mi da EOF e recordcount a zero!!!!
Come mai? Dove sbaglio?
Grazie e Ciao
Checco

| I dati vengono regolarmante scritti sul database, interbase.
|
| Il problema e che se poi faccio un Query.First e vado a scorre la
| query mi da EOF e recordcount a zero!!!!
una soluzione (schifosa) potrebbe essere quella di
di aggiornare la query
q.Close;
q.Open;
cmq e' molto strano...
prova,
ciao
Alan Solo

q.Open;
infatii e' quello che faccio ma su query da un paio di milioni di
record mi viene da paingere!!!!
Ma dove diavolo posso trovare una soluzione?
Grazie Alan
Ciao
  Checco

| >una soluzione (schifosa) potrebbe essere quella di
| >di aggiornare la query
| >
| >q.Close;
| >q.Open;
|
| infatii e' quello che faccio ma su query da un paio di milioni di
| record mi viene da paingere!!!!
lo so e' schifosa!
| Ma dove diavolo posso trovare una soluzione?
non lo so, prova con IBObjects / IBX o IBFreePlus
Ciao,
Alan Solo

Dico alcune ca##ate...
1) verifica la prop cachedupdates della query. Se è true il post da solo non
basta. Se è true, invece di post usa il commit direttamente sul database e
vedi cosa succede.
2) prova ud usare uno statement insert into.. e vedi se ti da lo stesso
problema
3) Hai provato da ide o da eseguibile?
4) Quali programmi hai in esecuzione?
5) Hai molte schifezzelle nel systray?
6) Su quale sistema operativo hai il problema?
7) Il motore interbase è in esecuzione in locale o su server?
8) Hai provato a disattivare l'autorefresh?
Prova....
Saluti
AS
"Se è Microsoft non funziona"
Newsgroup: it.comp.lang.delphi
Titolo: Installare Componenti Free

Posso installare dei componenti Internet gratis? Uso la personal edition di
D4 che non prevede alcun componente Internet e mi domandavo se fosse
possibile usare quelli scaricati da Inernet.
Conoscete qualche buon componente Internet Free?
Ho provato ad installare il TCPIP di Andreas Hoerstemeier (trovato qui:
http://www.westend.de/~hoerstemeier
 ) ma mi da un errore in fase di
installazione del componente, più precisamente dopo avermi ricompilato il
package DCLUSR40.BPL.Gli errori sono (scusate per la lunghezza):
"[Hint] TCPIP.PAS(303): Overriding virtual method 'T_RExec.login' has a
lower visibility than base class 'T_RCommon'
[Hint] TCPIP.PAS(318): Overriding virtual method 'T_Rsh.login' has a lower
visibility than base class 'T_RCommon'
[Warning] TCPIP.PAS(778): Constant expression violates subrange bounds
[Warning] TCPIP.PAS(803): Comparison always evaluates to False
[Warning] TCPIP.PAS(803): Comparing signed and unsigned types - widened both
operands
[Error] TCPIP.PAS(925): Incompatible types: 'sockaddr_in' and 'PSOCKADDR'
[Warning] TCPIP.PAS(1019): Comparison always evaluates to False
[Warning] TCPIP.PAS(1257): Comparison always evaluates to False
[Warning] TCPIP.PAS(1978): Comparison always evaluates to False
[Warning] TCPIP.PAS(3382): Text after final 'END.' - ignored by compiler
[Fatal Error] dclusr40.dpk(34): Could not compile used unit 'TCPIP.PAS'
"
Cosa sbaglio? Devo forse creare una cartella Internet nell'IDE di Delphi o
proprio non posso instalare quei componenti avento l'Edizione Personal?

 possibile usare quelli scaricati da Inernet.
non so dirti al momento quale possa essere la politica di borland sul d4 per
quanto riguarda i componenti internet, ma se vuoi puoi provare ad
installarti i componenti indy che trovi a 
www.nevrona.com
ciao fabrizio

 Cosa sbaglio?
Ci sono degli errori nella unit (che credo fosse per Delphi 3), ricordo di
essermela modificata quando li usavo ma non credo di avere ancora sottomano
il codice (cambio computer in mezzo e sono passato ad Indy)...
In particolare (da quel che ricordo e dagli errori che riporti) c'era un
errore di incompatibilitą di due strutture (bastava accedere al membro di
una struttura invece che alla struttura stessa) e credo che gli "always
evaluates false" dipendano dall'utilizzo dei Cardinal al posto di Int64...
Ciao
--
Andrea /\/\agni
ICQ#: 174108000

OK, grazie ragazzi per le preziose info :-)
Ciao

Newsgroup: it.comp.lang.delphi
Titolo: XML o CFG ????

Ciao a tutti,
secondo voi come file di configurazione è meglio usare un .cfg oppure come
si fà per
i nuovi prodotti .NET un file XML ????
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:81Z73Z60Z26Y1...@usenet.libero.it...


A dir la verità sono proprio a digiuno di XML, sapresti dirmi come potrei
fare
a creare il file e a leggerlo da Delphi ????
Ciao e grazie.

Newsgroup: it.comp.lang.delphi
Titolo: Aggiungere un campo ad una Table?

 
ICQ# 156068277

campo autoincrementante?
Di quale DB si tratta ?? E' fondamentale saperlo.
Dovresti utilizzare componenti che facciano uso della tecnologia DAO.
Cosi' puoi avere accesso alla struttura del database.
Se invece e' un db a tutti gli effetti, credo tu possa utilizzare ALTER TABLE
senza colpo ferire alla tabella in questione.
Io con access ho avuto un problema simile, per un versioning di database, 
il problema dei campi contatori si risolve con un giro particolare di adocommand.
Se ti interessa e il tuo db e' access fammelo sapere che ti posto il codice.
Ciao
Morde

 un amico.
ALTER TABLE NOMETABELLA ADD COLUMN NOMECOLONNA TIPO
e' l'istruzione tipica SQL, ma potrebbe variare, in relazione al DB che usi.
Per farti un esempio banale, aggiungere un campo testo di 20 caratteri ad un
DB Paradox si traduce in:
ALTER TABLE MYTABLE ADD COLUMN MYFIELD CHAR(20)
--------------------------------
Inviato via 
http://usenet.libero.it

ALTER TABLE MYTABLE ADD COLUMN MYFIELD CHAR(20)
Innanzitutto grazie ad entrambi per la rapida risposta. Il DB è
Paradox perchè è l'unico con cui mi è capitato di "lavorare" anche se
la parola è un pò forte visto che programmo solo per hobby e  per
risolvere problemi agli amici.
Adesso provo con la soluzione indicata visto che per pura coincidenza
devo proprio aggiungere un campoi con una stringa di 20 caratteri!
:-))))
Vi faccio sapere...


ALTER TABLE MYTABLE ADD COLUMN MYFIELD CHAR(20)
Graie a questa riga tutto si č risolto ed il programma funziona gią da
un paio di giorni.
GRAZIE MILLE!!!

Newsgroup: it.comp.lang.delphi
Titolo: Riconoscere un'oggetto

Nella mia appl da un form principale creo dei form dallo stesso TForm.
Come faccio, dal form  principale a riconoscere il form creato che mi
interessa? cioè come posso comandare il form creato ad esempio per secondo
invece che quello creato per ultimo?
I form sono creati runtime.
Spero abbiate capito il problema, grazie a ki mi risponderà.
--
Ciao da Marco "Kaiser" Baldini
akira_sendo[at]
libero.it
Togli "NOSPAM" per risposte via E-Mail
----------
http://www.ragnatela.it
----------


Immagino che terrai traccia dei form tramite varibili di dipo TForm, che poi
non sono altro che puntatori alla classe. O no?
Come crei le form?

 > Spero abbiate capito il problema, grazie a ki mi risponderà.


 > Spero abbiate capito il problema, grazie a ki mi risponderà.


 Ho risolto dichiarando form come array di TCanale, cosě sembra
funzionare
...
considera anche TScreen: mantiene una lista delle form della
applicazione (magari anche TApplication stessa).
Oltre che un Array, puoi considerare TList o TObjectList. Quest'ultimo
puo' acquisire l'ownership degli oggetti collegati.
Sul "riconoscere": potresti usare dei nomi univoci per le form che crei.
Saluti
Paolo Arosio

Spero abbiate capito il problema, grazie a ki mi risponderà.
Screen.CustomForms.
Potresti, per esempio usare la "mitica" proprietà Tag diversa per ogni
form che crei
for I := 0 to Screen.CustomFormCount - 1 do
    if (Screen.CustomForms[I] is TMiaForm)  and 
       (TMiaForm(Screen.CustomForms[I]).Tag = X) then begin
        TMiaForm(Screen.CustomForms[I]).Metodo
        Break;
    end;
-----------
Ore 18.30: premo invio.

 ha scritto nel messaggio
news:0fbOO+rXy73y0S...@4ax.com...

Newsgroup: it.comp.lang.delphi
Titolo: Disegno Veloce

Salve a tutti,
sto cercando di fare un oscilloscopio in delphi.
Ho già creato un thread per l'acquisizione dei dati,
dalla parallela, che vengono messi in una listbox.
Un secondo thread disegna un grafico in una paintbox,
(tramite l'oggetto canvas) acquisendo i valori dalla listbox.
Funziona tutto, ma il thread di disegno è molto più 
lento di quello di acquisizione, e la listbox si riempie
subito...il prog si impalla.
Esiste qualche componente o sistema per disegnare in 
tempo reale??? Come faccio a risolvere il prob??????
--
Fusyllo

 ha scritto nel messaggio
news:aac3d901.04050...@posting.google.com...

Se il PC non ci sta dietro, non hai una cippa da fare... il "realtime" non
lo raggiungi.
Non puoi fare che il thread che disegna, quando ricomincia si faccia una
istantanea dei dati da disegnare e gli altri li lasci perdere? Così disegna
solo quello che può disegnare senza ingolfarsi..
Tieni presente che una listbox, sotto win9x ed me, ha un limite di 32K
mentre su NT praticamente è la RAM disponibile. In ogni caso, è meglio che
tu preveda un qualche sistema per visualizzare solo quelli necessari e
magari gli altri salvarli per permettere una successiva elaborazione.
Ciao
Matteo

)

Newsgroup: it.comp.lang.delphi
Titolo: Lookup da DBGrid

Salve
chi mi sa spiegare come fare un lookup di un campo di una DBGrid con il
campo di un altro DB.
Esempio:
ho una DBGrid che mostra i record della tabella Fattura.bd, in uno dei campi
c'č un codice che vorrei venisse scelto tra i campi della tabella Codici.db,
tramite un combobox.
Come fare per settare le proprietą della griglia e del campo di Fattura .db
nel proprio Field Editor?
Grazie
-- 
Gilberto Marzuillo
Via Ceccano, 13
81100 Caserta
Italia
Tel. 
+39 0823351859
Fax 
+39 06233239522
Cell. 
+39 3476496431
Cell. 
+39 3287141100
web: 
www.marzuillo.com
e-mail: 
gilb...@marzuillo.com
icq: 35603715

 nel proprio Field Editor?
Devi definire un campo lookup direttamente nell'oggetto table.
Doppio click sulla table, taso destro -> new field
Poi scegli filetype come lookup collegghi e sei a posto
Ciao
Massimiliano

 > Come fare per settare le proprietą della griglia e del campo di Fattura


Newsgroup: it.comp.lang.delphi
Titolo: Installare servizi scritti in Delphi4 su server NT

Salve a tutti.
Come tutti sapete D4 permette di creare dei service per NT. Pero', da
nessuna parte è spiegato se installshield fornito con D4 possa occuparsi
anche della installazione dei service su NT4.
Domanda: se IS non lo fa come cacchio si fa a realizzare lo stesso  a mano
al fine di creare un CD di installazione da dare ai clienti?
Grazie
Saluti
AS


Basta lancianciarli con /install come parametro.
Ciao Uberto

TNX!
AS
Newsgroup: it.comp.lang.delphi
Titolo: Stampare da servizio su stampante utente dominio

Ho scritto un servizio che, tra le varie attività che compie, esso riceve
un file e un nome di stampante. Su quella stampante deve mandare il file in
stampa. Il servizio risiede sul server dell'applicativo, al quale si
connettono tutti gli utenti mediante terminal server.
Il problema che ho è il seguente: l'utente pippo usa stampare le fatture
sulla stampante del suo ufficio, \\DOMAIN\HP LaserJet fatture. Quando al
servizio arriva la richiesta di stampare la fattura su quella stampante, il
servizio in quanto account di tipo system local non è in grado di vedere
quella stampante.
Che soluzioni usereste voi per far si che il servizio, che risiede sul
server, possa redirigere tutte le stampe sulle stampanti di ogni utente?
Il mio problema e' nel gestire le mappature.. e devo farlo come servizio
lanciato da un account che potrebbe non vedere le stampanti di dominio: qui
potrei chiedere al sisitemista di attivarmi un account di dominio con i
privilegi di stampa.
Ma come faccio poi a rimappare tutte le stampanti utente?
Ho anche valutato di scatenare un batch di tipo RunAs,per impersonare ogni
utente, ma qui dovrei ottenere le credenziali di tutti gli utenti... non so
se è pulita questa cosa.
Nessuno ha mai dovuto risolvere un problema di questo tipo?
-- 
Morde

 Ma come faccio poi a rimappare tutte le stampanti utente?
Non penso che sia neccessario rimappare le stampanti. Dovrebbe bastare 
sapere il loro nome UNC (come l'hai descritto \\NomeServer\NomeCondivisione 
. Il sistema poi dovrebbe prevedere a tutto il resto.
Non ti sei mai accorto che ti appaiono delle stampanti disponobile nella 
rete che non hai mai istallato? Questo vale per stampanti condivisi per via 
di windows. È un'altra cosa per stampanti di tipo "Standard TCP/IP Port". 
Loro non mettono a disposizione il driver neccessario - occorre quindi 
istallarli tutti su tutti i computer che ne si devono servire.
Spero che ti aiuta questo.
Saluti,
Fritz

Newsgroup: it.comp.lang.delphi
Titolo: domanda difficile... socket unix

Salve!
Dovrei leggere da un applicazione delphi i dati su un socket unix
(nella fattispecie quello creato da snort).
Come posso fare? (a parte installarmi un compilatore C ed andare ad
usare il codice C standard x i socket...)
Grazie,
Matteo


Su windows si accede ai socket tramite le api di Windows, che sono 
disponibili tanto in C quanto sotto Delphi, quindi non hai nessun 
bisogno di passare al C.
Ora non so se con "socket unix" intendi normali socket tcp/ip o se sono 
una categoria a parte, ma comunque puoi gestire qualunque socket "standard".
Su google trovi tutte le informazioni.. puoi partire da qui per vedere 
le api che ci sono a disposizione:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winsock/winsock/socket_2.asp
Inoltre troverai sicuramente qualcosa su torry.
Ciao!
Newsgroup: it.comp.lang.delphi
Titolo: Thread for ever....

Nell'EXECUTE di un thread ho scritto questo pezzo di codice:
-----------------------------
    while not(terminated) do
      begin
          if   ATTIVO(dato)
                      then Synchronize(procA)
	   else Synchronize(procB);
        sleep(200)
      end
ATTIVO e' una funzione alla quale viene passato un dato (qualunque
esso sia...tanto e' un esempio).
-----------------------
Ho un paio di domande:
1)Da quello che ho capito nel mio caso e' preferibile sincronizzare le
varie chiamate a procedure effettuate dentro l'EXECUTE. Devo fare lo
stesso discorso con la funzione (ATTIVO)?
2) come faccio a sincronizzare un funzione e/o procedura che
necessitano di parametri? Facendo Synchronize(procA(dato)) il
compilatore si incazza  :-(
~Guybrush~

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

Newsgroup: it.comp.lang.delphi
Titolo: Debug DLL

Salve a tutti, non riesco a debuggare una dll fatta in Delphi 5
Anche se su Run-->Parameters metto una Host Application valida al momento di
compilare la mia DLL non mi da la possibilità di mettere breakpoint e quindi
di verificare l'origine dell'errore.
Potete aiutarmi ?
Grazie.
Paolo Tarabelli
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 di verificare l'origine dell'errore.
Controlla in "Project Options/Compiler" di aver attivato le opzioni di
debug.
Dopo la compilazione vengono visualizzati dei "pallini" a sinistra delle
righe di codice?
Indicano le istruzioni sulle quali è possibile mettere un breakpoint.
Ciao
Alf


Ciao



Mancano su tutte le righe di codice o solo su alcune?
Mancano anche subito dopo aver eseguito un "build" del project oppure solo
una volta avviato il debug?
Utilizzi Windows XP?
Acc quante domande, meno male volevo fornirti una spiegazione.
Ciao
Alf

 Alf


 Access. Ti viene in mente qualcosa?
Indaga sulla creazione e distruzione dei vari oggetti che usi con il
ritrovato debug!
Ciao
Alf

Grazie, gentilissimo e utilissimo.
Alla prossima.
Paolo


 che tu prema il tasto OK
[...]
Complimenti per questa descrizione, e' proprio un ottimo tip e oserei
definirlo piuttosto raro...
:)
-- 
Morde. 
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 :)
Grazie, ho soltanto ricambiato il favore che mi era stato fatto da un altro
frequentatore di NG.
Piu' di una volta il NG mi ha tirato fuori dai problemi, quando posso mi
piace ricambiare.
Ciao,
Alf
Newsgroup: it.comp.lang.delphi
Titolo: gestioni eccezioni

salve ragazzi ho implementato il seguente codice
UdpSocket1.SendBuf(mess,2);
Sleep (500);
if (UdpSocket1.ReceiveBuf(str,3)=3) then
begin
connected:=true;
colorbutton9.ForeColor := clgreen;
colorbutton10.ForeColor := clblack;
Timer1.Enabled:=True;
end
else
begin
MessageDlg ('ERRORE: dispositivo non connesso', mtError, [mbOK], 0);
connected:=false;
end
adesso perň dovrei implementare usando le eccezioni cosě che da poter
eliminare l'attesa di 500ms ed adattare tutto ad una condizione di ritardi
in rete dinamici.
ho provato con delle eccezioni personalizzate ma non le riconosce.
non ho trovato niente sulla gestione delle eccezioni dei socket.
Qualcuno puň darmi una mano???
--- posted by geoForum on 
http://www.delphiedintorni.it

Puoi essere più preciso....



si certo, anzi spero, dato che sono nuovo del delphi.
mi è stato chiesto di verificare se un dispositivo è online o meno.
questa verifica viene effettuata attraverso il controllo del vettore di
byte mess e del vettore di char str.
fatto il codice mi è stato detto che un'implementazione più effeciente si
potrebbe ottenere utilizzando le eccezioni al posto del ci ciclo if.
solo che non sono riuscito a trovere nessun esempio di eccezioni con
udpsocket...

Newsgroup: it.comp.lang.delphi
Titolo: aggiungere pulsante su linguetta tab di un TPageControl

vorrei "emulare" l'aspetto di Firefox aggiungendo un bel pulsantino
sulle linguette delle tab di un TPageControl per chiudere le relative
pagine.
Qualcuno mi potrebbe aiutare?
Preferirei fare la cosa da codice piuttosto che utilizzare componenti
di terze parti.
Ringrazio anticipatamente chiunque potrà e vorrà aiutarmi.

gfantuzzi ha scritto:

La linguetta di un TPageControl è un TTabSheet dunque (IMHO):
1) erediti TPageControl e TTabSheet e ti fai un custom aggiungendo un 
TSpeedButton al componente TTabSheet
2) Lavori sulla proprietà OnDrawTab del TPageControl per quanto riguarda 
il disegno del bottone e poi con i vari eventi OnMouse per il click
3) guardi i componenti Jedi che sono free ed open source se fanno cio' 
che ti serve (perchè reinventare l'acqua calda ??)
^_Goblin_^
-- 
Ibis et redibis non morieris in bello
http://goblinland.myminicity.com/

 ^_Goblin_^
Grazie mille Goblin
sto realizzando un progetto "importante" per cui vorrei utilizzare
componenti che non mi lascino a piedi tra qualche anno.
Posso fidarmi degli Jedi ?
Ciao e grazie ancora.

 Ciao e grazie ancora.
Se è un progetto dove hai un "importante" ritorno economico forse ti 
conviene guardarti in giro per dei componenti "seri" che fanno nello 
specifico quello che cerchi.
I componenti Jedi sono "vivi" da quasi 10 anni, se non ricordo male sono 
nati con D3/D4 si chiamavano RxComponent, per poi migrare in jedi 
project con D6 e adesso sono a disposizione anche per D2007.
Non avendo la sfera di cristallo, ovviamente, non posso assicurarti che 
domani ci siano ancora, ma lo stesso discorso vale per tutti i vari 
componenti sia free che a pagamento


 Posso fidarmi degli Jedi ?
Sono open source e sono distribuiti con il codice sorgente:
quale migliore garanzia?
Scarica, installa e prova: non te ne pentirai.
http://www.delphi-jedi.org/index.html
P.S: magari dai una sbirciata alla licenza con la quale sono distribuiti,
FORSE, e ribadisco FORSE, hanno qualche limitazione commericale.
Ciao
-- 
ACSH
[TurboDelphi]
Chi fa da se', fatica il doppio


ho dato uno sguardo ai controlli TjvPageControl e TjvgPageControl però
non ho trovato alcuna possibilità di mostrare la X sulla linguetta.
Mi sapete indicare il controllo che fa al caso mio?

 Mi sapete indicare il controllo che fa al caso mio?
Oltre i componenti Jedi hai provato a cercare "nel solito sito" 
(
www.torry.net/
) ???
Mi vengono in mente 2 suite a pagamento, i componeti TMS 
(
http://www.tmssoftware.com/site/
) e i componenti devexpress 
(
http://www.devexpress.com/
)
^_Goblin_^
Newsgroup: it.comp.lang.delphi
Titolo: AIUTO TFILESTREAM

Ciao a tutti.
Stò cercando di utilizzare gli offetti TFileStream.
Io devo leggere un filee ricercare al suo interno alcune particolari
sequenze di byte.
Se realizzo un ciclo del tipo:
AssignFile(f,'xxx.xxx');
Reset(f);
While non eof(f) Do
Begin
    Read(f,ch);
    ifi ch = XX then......
End;
Funziona tutto ma ci mette un sacco di tempo in quanto per ogni byte il
programma esegue un accesso al disco.
Ho tentato di utilizzare il BlockRead ma può capitare che la sequenza di di
byte di mio interesse capiti a "cavallo" di bue Buffer letti in successione
e quindi non riesco a riconoscerli correttamente a meno che non mi inventi
delle cose estremamente strane.
Ho pensato di utilizzare gli oggetti TFileStream.
Io credo che posso caricare il contenuto del file in un oggetto di questo
tipo e poi scorrerlo e cercare le sequenze di mio interesse.
Io ho agito in questa maniera:
var
  f_s:TFileStream;
begin
    f_s.Create(OpenDialog1.fileName,fmOpenRead);
End;
Sin qui tutto OK, Ma se io ora voglio leggere i byte contenuti all'interno
di f_s?
Io ho provato ad usare
    f_s.Read(Buffer,Count); Il quale dovrebbe leggere un Buffer di byte dal
f_s costituito da Count elementi.
Ma Buffer che tipo di struttura è?
Come la devo definire?
E' forse un record di Byte?
Grazie per la gentile attenzione,
Giorgio.
**************************************
Giorgio Marinangeli
ICQ 12941403
http:\\
web.tiscalinet.it/gmsoft
Attenzione: in febbraio 2001 l'indirizzo
mgio...@cronosnet.com
VERRA' DISABILITATO.
Il nuovo indirizzo già disponibile è:
E-Mail: 
ma.gi...@tiscalinet.it
.
*************************************
--
**************************************
Giorgio Marinangeli
ICQ 12941403
http:\\
web.tiscalinet.it/gmsoft
Attenzione: in febbraio 2001 l'indirizzo
mgio...@cronosnet.com
VERRA' DISABILITATO.
Il nuovo indirizzo già disponibile è:
E-Mail: 
ma.gi...@tiscalinet.it
.
*************************************

Ciao Giorgio,
ti ho risposto sopra. Magari cerca di non postare messaggi identici nello
stesso newsgroup a distanza di tempo brevissima.
Insomma se nessuno ti risponde 10 minuti( per dire ) prima, NON lo farà
certamente 10 minuti dopo nel messaggio successivo e per di più identico. In
pratica i messaggi identici innervosiscono chi vuol rispondere.
Ti saluto....se non hai capito qualcosa sopra ( dove ho risposto ) fammi
sapere.
Ciaooooo !!!
Antonio Tarolla
Newsgroup: it.comp.lang.delphi
Titolo: smtp letto in automatico

salve, dovendo configurare una parte di software scritto per inviare email
merge collegate ad un db, dovrei far impostare l'smtp al cliente, cè un modo
per proporre direttamente quelli impostati su outlook?? qualche chiave di
registro o simili??
Simone

 outlook?? qualche chiave di registro o simili??
Non č un metodo molto bello, ma puoi provare in
HKCU\Software\Microsoft\Internet Account Manager\Accounts\xxxxxxxx
il problema č che xxxxxxxx cambia e ce ne possono essere piů di uno: puoi
provare a cercare i primi 10 con un ciclo e vedere quanti ne trovi e che
valori hanno, per poi scegliere quello ripetuto + volte.
E' un metodo da scarpolino, ma io lo sono :)
--
Jax
Journeying Artificial Xenomorph

 ha scritto nel messaggio
news:VToDa.39942$pR3.8...@news1.tin.it...


 ha scritto nel messaggio
news:VToDa.39942$pR3.8...@news1.tin.it...


 ha scritto nel messaggio
news:VToDa.39942$pR3.8...@news1.tin.it...


 non cè nessun contatore??
Ho notato adesso che nella chiave
HKCU\Software\Microsoft\Internet Account Manager
c'è il valore "Default Mail Account" che ti dice appunto quale di quelle
chiavi è quella dell'account di posta predefinito.
Direi che così è meglio :)


Rispondo a Simone P. che, tra le altre cose, ha scritto:
<cut>
Già che ci sei:
http://www.marco5x.net/usenet/quoting-3.php


 Direi che cosě č meglio :)


ecco come ho fatto:
uses registry;
function DefaultSMTP:string;
var
 reg:TRegistry;
 cKey:string;
 cSmtp:string;
begin
 cSmtp:='';
 reg:=TRegistry.Create;
  reg.RootKey:=HKEY_CURRENT_USER;
  cKey:='';
  {False because we do not want to create it if it doesn't exist}
  if Reg.OpenKey('\Software\Microsoft\Internet Account Manager',False) then
   begin
     cKey:=Reg.ReadString('Default Mail Account');
   end;
  if cKey<>'' then
   begin
    if Reg.OpenKey('\Software\Microsoft\Internet Account
Manager\Accounts\'+cKey,False) then
     begin
       cKey:=Reg.ReadString('SMTP Server');
       cSmtp:=cKey;
     end;
   end;
 reg.free;
 DefaultSmtp:=csmtp;
end;
-----
Simo


http://www.marco5x.net/usenet/quoting-3.php
Scandaloso il banner di progetto internet, con gli importi ancora in lire...
LOL
azz... scusate l' OT
-- 
Morde. 
morde[at]programmer[.]net

 lire... LOL
Ma no... sono sterline :D


Newsgroup: it.comp.lang.delphi
Titolo: Quick Report

C'è qualcuno che sa dirmi da che parte devo cominciare per utilizzare Quick
Report ?
Non l'ho mai utilizzato.
Per le stampe fino ad ora ho usato solo Report Builder.
Ora però dovrò usare anche Quick Report.
Grazie


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

Newsgroup: it.comp.lang.delphi
Titolo: RecNo e Query

Sto usando una query con RequestLive=True.
La proprietą RecNo č sempre = 0.
Come posso conoscere in maniera alternativa il la posizione del record
corrente all'interno della Query ?
Grazie.
--
Posted from 
smtp2.libero.it
 [193.70.192.52] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Non puoi. Normalmente usi la Primary Key.
ciao
Solid Snake

Come immaginavo, cmq grazie per la conferma!
--
Posted from 
pop09-acc.tin.it
 [212.216.176.72] 

Newsgroup: it.comp.lang.delphi
Titolo: MsJet.CompactDatabase

Salve a tutti, ho un piccolo problema ho trovato il codice per la procedura 
di ripristino e compattazione di un database access con delphi, ma il mio 
database e' protetto da password,
e quindi la procedura si blocca perche' mi da l'errore "password non 
valida".
Come faccio ad impostare la password ?
vi allego codice utilizzato:
MsJet := CreateOleObject('JRO.JetEngine');
  MsJet.CompactDatabase('Data Source=' + 
ExtractFilePath(Application.EXEName) + '\systems.mdb;', 'Data Source=' + 
ExtractFilePath(Application.EXEName) + '\systemsbak.mdb;');
  DeleteFile(ExtractFilePath(Application.EXEName) + '\systems.mdb');
  RenameFile(ExtractFilePath(Application.EXEName) + '\systemsbak.mdb', 
ExtractFilePath(Application.EXEName) + '\systems.mdb');
grazie.

Devi aggiungere la proprietą:
    Jet OLEDB:Database Password="password"
alla stringa di connessione al database.
    Saluti,
    Antonio 

 ha scritto nel 
messaggio news:egiskv$bnh$1...@area.cu.mi.it...


 dove e come imposta questo parametro che mi suggerisci?
Ecco un esempio:
    MsJet := CreateOleObject('JRO.JetEngine');
    MsJet.CompactDatabase('Data Source="databaseOriginale.mdb";Jet 
OLEDB:Database password="password";', 'Data 
Source="databaseCompattato.mdb";Jet OLEDB:Database Password="password";');
questo esempio funziona a patto che tu abbia impostato la password per il DB 
tramite la voce "Imposta password database" nel menu "Utilità database" di 
Access.
    Antonio 

 ha scritto nel 
messaggio news:egj3od$pbf$1...@area.cu.mi.it...


Newsgroup: it.comp.lang.delphi
Titolo: DBComboBox e data

ciao,
programmo da poco in delphi e vorrei sapere se è
possibile far si che un DBComboBox mi visualizzi l'elenco delle
date come se fosse un calendario
o in alternativa come assegno il valore date selezionato da TDateTimePicker
a un dbedit che si riferisce ad un campo di tipo date di una tabella?
spero di non essere stato criptico
grazie
ciao Marco

 programmo da poco in delphi e vorrei sapere se č


grazie x la risposta
ma se invece lo volessi fare a mano
cosa dovrei fare?
non voglio il codice ma solo sapere in che direzione andare
cmq grazie 1000
ciao Marco

"Marco" ha scritto nel messaggio
| come assegno il valore date selezionato da TDateTimePicker
| a un dbedit che si riferisce ad un campo di tipo date di una tabella?
 dbedit1.Field.AsDateTime := DateTimePicker1.DateTime
| spero di non essere stato criptico
;)
Ciao.
---------------------------
ACSH
"Non voglio un mondo migliore:
 voglio un mondo piu' interessante!"
Newsgroup: it.comp.lang.delphi
Titolo: [D6] Data Module Designer?

Non riesco a trovarlo in D6:
in D5 quando creavo un nuovo DataModule, si apriva già nel Data Module
Designer, ma in D6 non riesco proprio a trovarlo, neanche sulla guida in
linea...
Non ditemi che non esiste...
--
Mauro Falzari.
"Se guardi nell'abisso, anche l'abisso guarda in te."
(Friedrich Nietzsche)

Riporto qui quanto mi è stato suggerito dal gentilissimo Nando Dessena (nel
NG libero.delphi, della gerarchia 
news.marcocantu.it
), perchè magari
potrebbe essere utile a qualcun altro:
"""
Guarda in basso nel code editor e vedrai due tab: Code e Diagram.
L'abero invece lo trovi facendo View/Object TreeView.
La novità è che la vista Diagram è disponibile per tutti i moduli, non
solo per TDataModule e derivati.

Newsgroup: it.comp.lang.delphi
Titolo: Guida x imparare linguaggio Delphi!!

Come in oggetto, chiedo disperatamente dove possa trovare guide gratuite per
imparare a programmare in DELPHI !!!
(Anche ricevendole via E-Mail, o andandole a trovare sul web).
Grazie!!

...

Sarą la centesima volta che passo questo link :
http://www.kaposnet.hu/books/tysdelphi4/
 [libro di D4 completo in Inglese!]
poi puoi dare un'occhiata a 
www.programmazione.it
 e a 
www.manuali.net
Quando poi apriremo il famigerato sito magari troverai anche qualcosa di +!
Ciao
--
- Carlo -
BSSoftware Tips Mailing-List Support

Newsgroup: it.comp.lang.delphi
Titolo: [OT]News Group Marco Cantu - On Line

E' in funzione il newgroup di Marco Cantů
speriamo bene.
Ciao Enzo
www.scozzaro.it

Scusate, ma ho un altro piccolo problema, nel risolvere gli altri, se ne
fanno altri. Credo che sia dovuto all'uso degli Indy. Allora ho un
PageControl con 2 pagine.
Nella prima c'è un RichEdit, nella seconda una ListView.
Uso il IDTCPCLient, mi connetto, uso il componente IdThread, e faccio quello
che devo fare. Quando chiudo l'applicazione però da errore Handle di
Finestra non valido. Come mai? Se io passo a click tutte e 2 le pagine del
PageControl, l'errore non esce. Come mai?
Delucidazioni?

 speriamo bene.
ci si accede con?
aldo
--
јЄКА`АКЄј,ИИ,јЄКА`АКЄј,ИИ,јЄКА`АКЄј,ИИ,јЄКА`АКЄј,ИИ,јЄКА`АКЄј,И
http://www.HyperPublish.com
  Catalogs, CD and sites with 1 tool
http://www.EasyWebEditor.com
 Create a nice Web site with ease
http://www.1site.info
        A professional Website quickly
http://www.EBooksWriter.com
  Exploit the artist inside you!
http://www.PaperKiller.com
   Create manuals or HTMLHelp quickly
http://www.CdFrontEnd.com
    Create autorun CD visually
Visual Vision - 
http://visualvision.com
 
http://visualvision.it
leader in hypertext authoring       [ASP members, ESC members]

Newsgroup: it.comp.lang.delphi
Titolo: [OT] Mandare i fax da win98 senza quella "chiavica" di OutLook2000

Salve a tutti.
Stasera sono estremamente ..zzato!
Non concepisco questa cazzata cher per mandare fax mi tocca tenere
OutLook2000 e i suoi ammenicoli.
Sarei molto grato a chiunque mi sappia indicare un saciccio che serva a
mandare i fax senza essere costretti a tenere quella robaccia di zio Billy.
Scusate lo sfogo, ma ne combina certe....!
Un ultima cosa: qualcuno usa Nt Fax Server? Se si, fatemi sapere se va!
Tnx
AS
"Se è Microsoft non funziona."

Ciao,
interessa anche a me!!!... io utilizzo exchange con microsoft fax....ma hai
ragione è una schifezza...ho provato anche winfax pro ma ho dei problemi con
le DDE...
bye Max

 wrote in message
8fbm0s$g25$1...@fe1.cs.interbusiness.it...




Ciao,
hai provato a utilizzare i componenti DDE per mandare Fax a Winfax pro?
Il Fax non mi appare in lista di attesa per essere inviato a te risulta???
bye Max
Newsgroup: it.comp.lang.delphi
Titolo: Componenti trasparenti

Lo scenario è questo
una Form, un TPageControl con TabSheet1 e TabSheet2.
A questo punto aggiungo in TabSheet1 un componente qualsiasi
poniamo un TEdit.
Come mai questo componente che normalmente viene visto solo
nella TabSheet dove è stato piazzato viene visto in tutte le TabSheet1
e addirittura se sposto la TPageControl anche nella Form
Sembra appartenere per l'appunto alla form piuttosto che alla pagecontrol
in cui l'avevo inserito.
Con molta probabilità qualcuna delle properties della form o dell 
TpageControl è stato cambiato
Ma quale??
Un'idea per un link al problema o una risposta sarebbero  gradite.
Grazie a tutti 

 TpageControl è stato cambiato
Che versione di delphi stai usando? Ti capita regolarmente o solo su un 
certo progetto o su una form specifica? Se riavvi il problema rimane?
Ho finito le idee! :)
E' davvero strano... a me non e' mai capitato niente di simile con 
nessuna versione che abbia mai visto (a partire da D1)
ciao
Giacomo


si
 

 e addirittura se sposto la TPageControl anche nella Form
Sicuro che si tratti di un *TTabControl* invece di un *TPageControl*?
Scusa per la domanda banale, ma una svista può sempre capitare... ;-)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)


E' una TPageControl, l'ho riverificato di nuovo....
il problema e che non sempre ottego questo comportamento strano...
Ad esempio oggi nell'applicativo su cui lavoro o inserito una form
e poi questa PageControl, che mi ha il comportamento descritto
Allo stremo della pazienza, non sapendo più dove girarmi ho recuperato una 
form scritta in
precedenza e con un taglia e incolla ho sostituito il pagecontrol
Il tutto ha funzionato come si doveva.
Da quaste si puo dedurre che il comportamento strano e nella pagecontrol...
ma quale sara????
salve gianni 

 ma quale sara????
Non avendo mai riscontrato un problema di questo tipo, è possibile che 
l'effetto collaterale sia dovuto a qualcos'altro.
Quando visualizzi la finestra "Structure View" nell'IDE di Delphi, sei 
certo che i controlli all'interno del *TPageControl* vengano 
visualizzati effettivamente come tali?
Agisci in qualche modo sul controllo *TPageControl* o sui controlli 
*TTabSheet* al suo interno tramite codice?
Quando ti si presenta il problema, prova a fare un "copia e incolla" qui 
del DFM del Form difettoso, tanto per avere una minima "fotografia" 
della situazione che consenta di indagare più a fondo.



Marco senza ombra di dubbio lo farò.
saluti gianni

Newsgroup: it.comp.lang.delphi
Titolo: proprietà form

Salve,
io vorrei realizzare una forma tipo l'ide di delphi.
Cioč una form che quando la massimizzo lei si adatta allo schermo ma  la sua
Altezza rimane costante.
Sapete se per fare questo c'č qualche proprietą da settare o devo scrivere
del codice io?
Saluti Nicolas
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.611 / Virus Database: 391 - Release Date: 03/03/2004

 Sapete se per fare questo c'è qualche proprietà da settare o devo scrivere

Newsgroup: it.comp.lang.delphi
Titolo: DBGRID e TIBDataSet

Ciao a tutti
 DBGRID e TIBDataSet: (TIBDataSet .CachedUpdates= false)
Eseguendo insert di record nuovi (utilizzando mediti Insert e Post) anche se
ForcedRefresh=true ed è impostato RefreshSQL mi ripete valori 1° record
(quindi aumenta nr righe ma a video non mette valori inseriti)
Questo anche se eseguo inserimento in momenti differenti.(chiudendo
applicativo e rieseguendolo)
Sul DB invece memorizza giusto i dati infatti se chiudo applicativo e
rieseguo tutto ok ma se inserisco nuovi record a video sul DBGrid
(utilizzato solo per visualizzare i record inseriti es. righe fattura) mi
riporta dati primi record (ripeto solo a video nel Dbrid in DB memorizza
ok).
Probabilmente il problema è dovuto alla transaction che chiudo solo a fine
documento es. fattura
Ho notato che se vado in modifica delle righe (es. riga 2, riga 7, riga9 )a
video mi riporta sempre i dati della riga 1 (primo record del dataset) e non
mostra i valori effettivamente variati mentre se vario riga1 la variazione
appare subito anche nel DBGrid.
(sul DB invece scrive tutte le modifiche in modo regolare).
Come si può ovviare a questo problema ?
Ho assoluta necessità di mostrare subito a video righe aggiunte o modificate
(si pensi ad es. Righe fattura) come posso fare ?.
Guido.


Ciao Guido,
intanto vedo con piacere che sei riuscito ad inserire/modificare i record.
Per quanto riguarda la visibilità dei record appena inseriti io fatto un
semplice esempio con un dbgrid ed un bottone che mi inserisce un
nominativo, appena premo il bottone il record viene inserito e
visualizzato immediatamente nella dbgrid. Controlla eventualmente che la
transazione collegata al componente TIBDataSet sia "ReadCommited". Qui di
seguito ti posto il codice che ho utilizzato.
    IBDataSet1.Append;
    IBDataSet1.FieldByName('Codice').AsString := '5';
    IBDataSet1.FieldByName('Cognome').AsString := 'rossi';
    IBDataSet1.FieldByName('Nome').AsString := 'Mario';
    IBDataSet1.FieldByName('Eta').AsString := '33';
    IBDataSet1.Post;
    IBTransaction1.CommitRetaining;
Ciao da Enrico Giudici
ico...@tiscali.it
--- posted by geoForum on 
http://www.delphiedintorni.it

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

Utilizzo Delphi 3. Sapete se č possibile usare Sql con la suddetta versione
di delphi?
Grazie.

 Grazie.
è si che è possibile !! Ora non so se con la versione Standard hai delle
limitazioni ( in quanto mi pare che manchino dei componenti per la gestione
dei database ) , ma non so nemmeno che versione hai tu !! Se hai
l'Enterprise o del 3 o di un'altro Delphi, allora vai tranquillo.
Comunque io ho la Professional ed SQL si può utilizzare tranquillamente. Poi
se usi l' SQL applicato alle tabelle Paradox, allora hai delle limitazioni,
altrimenti con Oracle o Interbase credo che puoi sfogarti come vuoi !!
Ti saluto.....ciao !!!
Antonio Tarolla