mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Clonare Tabelle In Access.

Come posso dupplicare una tabella già esistente in un database Access ????
Grazie Per le Info .
                 Ciao Damiano.


In che senso, innanzitutto esiste il copia/incolla,
ma questo penso che non sia ciò che ti interessa,
se invece vuoi copiarla da sql, in alcuni ambienti
sql basta fare
create table copia as select * from originale
ma non so se funziona in Access, provalo.
                                danilo

 ha scritto nel messaggio
news:abqigm$kckme$1...@ID-111402.news.dfncis.de...



Non ho capito è una domanda o una affermazione.
Nel caso fosse una affermazione,
(ripeto non so in Access) ma in Oracle
vale la CREATE TABLE nuova_tabella as select * from Vecchia_tabella
l'ho appena riprovato.
                                                    danilo

 ha scritto nel messaggio
news:abr09q$kdib6$1...@ID-111402.news.dfncis.de...


 Come dici è probabile che Access non lo supporti
Si ho provato e non funziona purtroppo.
                                            danilo

Newsgroup: it.comp.lang.delphi
Titolo: [d5][zeos mysql] lookup con query chiusa

ciao a tutti, ho 2 Query (una di elenco vendite e una con i clienti), se 
per� la query clienti non � aperta in     quel momento oppure c� presente un 
filtro (where nome='pippo') il lookup mi ritorna 0 nella casella... 
normalmente voi cosa usate per effettuare lookup del genere? una query 
separata sempre aperta? oppure meglio fare un left join che preleva i nomi 
dei clienti?
Simone 

> normalmente voi cosa usate per effettuare lookup del genere?
io non uso MAI oggetti tipo dblookupcombobox.
A.

cosa usi?

 cosa usi?
La dblookupcombobox va bene se il tdataset dal quale devi selezionare
contiene pochi records.
Ma visto che spessso capita che si parte magari con 10 per poi
arrivare ad averne sempre di piu, preferisco usare un edit con
pulsante di qualhe tipo e far uscire una form con una griglia.
A.
Newsgroup: it.comp.lang.delphi
Titolo: Colori su RichEdit

Ciao a tutti ho un problema con un componente richEdit......
Praticamente eseguo una traduzione di un testo e come risultato - che
verrà scritto in una RichEdit - voglio che:
se la parola non la trova la proponga in rosso, altrimenti se la trova  la
proponga in nero.
Grazie in anticipo.
Simone. 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:bg327m$e7j$1...@news.newsland.it...


 Simone
con un ciclo for 
  for i:=0 to mDaTradurre.Lines.Count-1  do
già che ci sei per fare visualizzare la situazione della traduzione su una
progress?quale proprietà devo usare? io in pratica controllo gli spazi e
mi faccio restituire la posizione e lui estrapola la parola.
ho provato a fare restituire nella proprietà progress della progressbar la
posizione dove si trovava ma la traduzione e la progress non combacia
perchè la progress arriva a fine corso prima che abbia finito di tradurre
e fa una sorta di elastico,cioè si vede che arriva in fondo e poi continua
a tornare indietro un po' e poi ancora alla fine.
Grazie in anticipo.


 a tornare indietro un po' e poi ancora alla fine.
-----
io credo che così vada bene..
 var
i,x:integer;
begin
x:=0;
for i:=0 to length(RichEdit1.Text) do
if pos(' ' ,RichEdit1.Lines[i])>0 then  x:=x+1;
progressbar1.Max:=x;
questa è la procedura per sapere quanti spazi hai
e nel tuo ciclo metti ProgressBar1.StepBy(1);
ciao
erik

Newsgroup: it.comp.lang.delphi
Titolo: Porta seriale del c###o

Salve.
Uso un componete per leggere dati via porta seriale.
Il componente si chiama TCommPort e lo trovate su torry.
Alla seriale su com2 ho collegato un sensore.
Su Com1 ci sta un mouse.
Ho fatto 4 righe di codice che mi sparano su video la robaccia che arriva
via seriale ed ho notato una assurdita':
se muovo il mouse mi arrivano dati sporchi.
Ma non finisce qui!
Se nel programma di pprova metto un TMemo e mentre il programma gira vado a
scriverci dentro o, peggio che mai, uso i tasti cursore,, mi arrivano dati
sporchi.
Vorrei sapere se altri che usano la seriale hanno rilevato un problema
simile, magari con componenti diversi per gestire la seriale.
IO SPERO che sia il componente, ma la logica mi dice che "Se è Microsoft non
funziona", quindi qualcosa nella gestione della coda dei messaggi forse
porta questi scompensi.
Grazie a tutti.
AS
"Se è Microsoft non funziona"

 sporchi.
Se non ricordo male quel componente non pulisce il buffer di ricezione,
quindi il buffer lo devi troncare alla lunghezza dei dati ricevuti.
Ciao,
-=SIMO=-
Newsgroup: it.comp.lang.delphi
Titolo: Caption su Tpanel

Salve,
ho un pannello con una parte superiore colorata e vorrei usarlo, su un form
trasparente, come caption
mi spiego meglio...
il pannello in questione ha i bordi arrotondati.. l'ombreggiatura ed altre
migliorie grafiche.. io vorrei usarlo su di un form, rendere il form
invisibile e visualizzare il pannello come se fosse egli stesso un form..
quello che mi manca e come spostare il pannello come si fa con il form
quando si tiene premuto e si sposta... c'è soluzione?

 quando si tiene premuto e si sposta... c'č soluzione?
Se ho capito bene quello che vuoi fare, devi gestire gli eventi 
OnMouseDown(), OnMouseUp() e OnMouseMove() della form (o del pannello) 
ed in funzione del tipo di messaggio spostare le coordinate della form 
sullo schermo (basta posizionare top e left della form).
Ciao.
Mimmo.

 quando si tiene premuto e si sposta... c'č soluzione?
Prova a guardare il messaggio di windows WM_NCHITTEST.
Per degli esempi metti il nome del messaggio su google e su questo NG.
trovarai degli esempi interessanti sui quali basarti.
ciao
Matteo
Newsgroup: it.comp.lang.delphi
Titolo: Thread, Ping e classi

Ciao a tutti. 
Sto sviluppando un'applicazione multithread che ha lo scopo di
monitorare (tramite ping) una rete di medie-piccole dimensioni (~400
nodi).
Ora il problema è: come faccio a pingare più host _contemporaneamente_
in più thread? Ho letto un interessantissimo reply di Acqua ad un
quesito simile
(
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&threadm=ce20577841be08b88da98b12a3c48ab4.60519%40mygate.mailgate.org&rnum=7&prev=/groups%3Fhl%3Dit%26lr%3D%26ie%3DUTF-8%26selm%3Dce20577841be08b88da98b12a3c48ab4.60519%2540mygate.mailgate.org%26rnum%3D7
)
ma non mi è chiaro come utilizzare l'oggetto TIdIcmpClient da un
thread secondario. Ho già creato tutte le routine che mi servono, ho
dichiarato un oggetto TIdIcmpClient nel thread secondario, ma quando
chiamo il metodo Ping() va in Access Violation.
Ho così scoperto che l'oggetto va prima creato :) ma quale parametro
devo passare a TIdIcmpClient.Create()? Dalla dichiarazione è un
TComponent, ma quale gli passo visto che il thread primario non è
accessibile?
Spero che la mia poca dimestichezza con questo linguaggio non abbia
offuscato a sufficienza la mia richiesta di aiuto...
Vi ringrazio anticipatamente per una eventuale dritta.... Matteo

 nodi).
[ cut ]
Mi rispondo da solo... ecco il codice
procedure MultiPing.Execute;
begin
  FreeOnTerminate := True;
  Host := '127.0.0.1';
  IdIcmpClient := TIdIcmpClient.Create(Application);
  IdIcmpClient.ReceiveTimeout := 500;
  IdIcmpClient.Host := Host;
  IdIcmpClient.Ping;
  if IdIcmpClient.ReplyStatus.FromIpAddress = Host then
    begin
      Attivo := True;
    end
  else
    begin
      Attivo := False;
    end;
  Synchronize(InformaUtente);
end;

     end;
Volendo fare i sofisti ...
Attivo := IdIcmpClient.ReplyStatus.FromIpAddress = Host;
Ciao.
--
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio

devo passare a TIdIcmpClient.Create()? 
TIdIcmpClient.Create(Self);
--- posted by geoForum on 
http://www.delphiedintorni.it

  if IdIcmpClient.ReplyStatus.FromIpAddress = Host then
Forse, ti converrebbe però controllare al posto di FromIpAddress (o in
contemporanea)  
if cmpClient.ReplyStatus.ReplyStatusType <> rsEcho
in modo di sapere in caso di errore qual'è la causa.
Ciao.
-- 
Ore 18.30: premo invio.

Newsgroup: it.comp.lang.delphi
Titolo: Rilevamento connessione RAS in ingresso su Win XP

Dovrei rilevare l'avvento di una connessione remota in ingresso  su Win
Xp  
Come fare ?
Maurizio Montanari.

 ha scritto nel messaggio 
news:1142968572.8...@i40g2000cwc.googlegroups.com...

Potrei sbagliarmi ma forse con le funzione esportate dalla Wininet.dll ci 
riesci.
Ciao Giorgio
Newsgroup: it.comp.lang.delphi
Titolo: Problema nella conversione di funzione in C

ho questo pezzo di codice in c che ho provato a tradurre in pascal
purtroppo i risultati sono diversi, mi e' sfuggito qualcosa oppure e'
sbagliata la traduzione del codice
se potete aiutarmi vi sarei grato, io gia' ho difficolta' a
programmare in Pascal tradurre il C e' un dramma, grazie Brunello
Polynom: x16 + x12 + x5 + 1 => CRC_POLYNOM = 0x8408;
Start Value: 0xFFFF => CRC_PRESET = 0xFFFF;
C-Example:
unsigned int crc = CRC_PRESET;
for (i = 0; i < cnt; i++) /* cnt = number of protocol bytes without
CRC */
{
crc ^= DATA[i];
for (j = 0; j < 8; j++)
{
if (crc & 0x0001)
crc = (crc >> 1) ^ CRC_POLYNOM;
else
crc = (crc >> 1);
}
}
function Crc16(s: string): word;
var
  i, n, x: integer;
  crc: word;
begin
  crc := $FFFF;
  x := Length(s);
  for i := 1 to x do
    begin
      crc := crc xor Ord(s[i]);
      for n := 0 to 7 do
        if (crc and $0001) = 1 then
          crc := (crc shr 1) and $8408
        else
          crc := (crc shr 1);
    end;
  Result := crc;
end;

mi rispondo da me la linea
          crc := (crc shr 1) and $8408
va corretta con
          crc := (crc shr 1) xor $8408
colpa del caldo, non ho l'aria condizionata, ciao a tutti
Newsgroup: it.comp.lang.delphi
Titolo: ClientDataSet & Inserimento Dati

Ciao a tutti,
ho la seguente configurazione :
TADOQuery --> TDataSetProvider --> TClientDataSet --> TDataSet -->
TDBGrid
Il db è ACCESS.
Poichè è una piccola applicazione ho optato per la scrittura dei dati
direttamente
sulla griglia.
Il problema sta nelle chiavi duplicate...
Quando inserisco un nuovo record, e tale record provoca un errore di
chiave duplicata,
l'applicazione, dopo i messaggi di errori di chiave duplicata, si
blocca e non mi permette
di fare più niente....
D'altrocanto non mi sembra neanche giusto effettuare una query al
beforepost del CDS
per verificare l'esistenza del record.
Qualche consiglio in merito?
Grazie
Rino

> Qualche consiglio in merito?
usare come primary key un campo non accessibile all'utente?
A.

> usare come primary key un campo non accessibile all'utente?
non posso, il db è già esistente e non posso modificare le tabelle
esistenti...

>Qualche consiglio in merito?
Sull'evento OnNewRecord del CDS settare la nuova chiave ?
qualcosa del tipo
procedure TForm1.CDSNewRecord(DataSet: TDataSet);
begin
  CDS.FieldByName('ID').AsInteger:= CalcolaNewKey;
end;

Newsgroup: it.comp.lang.delphi
Titolo: Ciao a tutti

Mi chiamo Francesco, da poco ho ricominciato a fare qualche pasticcio
con Delphi e sono arrivato a questo newsgroup. Vi leggo con piacere e
volevo salutarvi: prima di scrivere penso dovrà passare molto tempo
viste le poche idee confuse che mi ronzano per la testa :-)
Un saluto a tutti
Francesco

 volevo salutarvi: prima di scrivere penso dovr� passare molto tempo

Newsgroup: it.comp.lang.delphi
Titolo: !!offerta lavoro!!

Ricerchiamo per inserimento immediato,  analisti/programmatori militi
esenti, automuniti e disponibili a trasferte.
Le figure richieste sono:
- 1 capo progetto
- 2 programmatori senior.
I candiati sono in possesso di buona/ottima conoscenza dell'ambiente di
sviluppo Delphi.
Per entrambe le posizioni ed in particolare per quella di capo/progetto
sono richieste ottime capacità di analisi e progettazione ad oggetti e
la conoscenza di uno o più db relazionali. Si richiede inoltre capacità
di lavorare in team
Il tipo di inquadramento è da definire sulla base delle esperienze e
competenze del candidato. Costituisce titolo preferenziale la
residenza/domicilio in Romagna (provincie di Ra, Fo, Rm, Fe).
Gli interessati possono inviare un curriculum a:
curri...@sphera-group.com









Newsgroup: it.comp.lang.delphi
Titolo: Repaint di una finestra

Un'applicazione che ho realizzato in Delphi 4 apre alcune finestre sul
desktop di windows...
Se da Win98 apro altre applicazioni e riporto poi il focus su un form della
mia applicazione Delphi questa ci mette un bel po' a comparire... Se poi in
particolare, la finestra in questione che è stata richiamata, sta svolgendo
un'elaborazione su di un db Access, questa viene visualizzata un pezzo alla
volta (prima un paio di animazioni avi che ci sono dentro, poi i contorni,
poi tutto il resto..)...
Avevo pensato di risolvere il problema gestendo l'evento OnActivate (che si
scatena ogni volta che i firm ricevono il focus) con una
Application.ProcessMessages, ma senza risultati...
Pensate debba forzare in questo evento un .Repaint di tutti i componenti
visuali del form ?
Esiste un modo per farlo in un unica volta ? Un qualcosa del tipo
Window.Repaint ?
Grazie..

Window.Repaint ?
andiamo al dunque.
Innanzitutto sono d'accordissimo con Nando (come si fa a non esserlo ?
:-))), il tuo problema sta proprio nel fatto che l'applicazione essendo
bloccata, se ne frega sei messaggi che arrivano alla coda per essere
elaborati. Quindi anche il metodo dell' OnActivate non viene invocato e
nemmeno il tuo Application.ProcessMessages !!
L' Application.ProcessMessages non fa altro che processare (elaborare) i
messaggi che sono nella coda
dell' applicazione, ma dovrebbe ( anzi deve ) essere richiamato in un ciclo
o in una procedura lunga con una certa frequenza altrimenti se la procedura
dura 10 minuti ed il ProcessMessages lo richiami solo due volte, questo
processerà i messaggi per due soli istanti, mentre per il resto del tempo
l'applicazione rimane bloccata !!!!
Ora non so che genere di operazione svolgi, ma se questa è ciclica oppure
puoi intervenire in qualche modo nelle singole operazioni, dovresti mettere
li il processmessages.
Se non riesci ad intervenire all'interno della procedura, dovresti eseguirla
all'interno in un thread in modo che la form rimane libera.
Vabbè, ti saluto.
Ciaoooo !!!
Antonio Tarolla
BSSoftware Tips Mailing - List Support
Newsgroup: it.comp.lang.delphi
Titolo: Aiutate un aspirante lamer

ciao a tutti ho letto qualche articolo sugli hackers e già mi e' venuta
voglia di cominciare, qualcuno di voi sa suggerirmi qualche sito o qualche
newsgroup dal quale potermi documentare?
Un ringraziamento a tutti coloro che mi risponderanno
Andrea


a parte che se ti etichetti lamer non ci hai capito molto di quello che hai
letto... comunque puoi andare su alt.hackers.cough.cough.cough e
www.spippolatori.com
n.

Andrea
A parte il fatto che sei ot, ci sono gia' tanti lamer in giro... meglio
sarebbe se ti mettessi a fare qualcosa di utile..
Cmq guarda qui:  
www.bismark.it

 newsgroup dal quale potermi documentare?
prova anche 
neworder.box.sk
 (ci sono link)
cmq come ti è già stato detto fai qualcosa di utile,
o, almeno, usa uno spirito da _hacker_
byez
Alan Solo
--
Posted from [194.242.220.6] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Andrea
newsgroup free.it.hackers
Però ti avverto..se esordisci in questo modo verrai coperto di insulti..
E' già successo la settimana scorsa.
PS: [OT]
Ciao,
-=SIMO=-

 ciao a tutti ho letto qualche articolo sugli hackers e gią mi e' venuta


Newsgroup: it.comp.lang.delphi
Titolo: Testo pulsanti decisionali

Salve, sapete qual'č la corretta sintassi per definire il testo di
nuovi pulsanti oltre quelli standard OK, CANCEL, ecc, da utilizzare in
finestre messaggio decisionali. Grazie.
---------------------------------------------
Io queste cose tecnologiche non le capisco...

 Io queste cose tecnologiche non le capisco...
Ed allora perché fai il programmatore? :D)
Andrea

Andrea
cia'


Non credo sia possibilr inquanto MSGTEXT e il wrapper di una api di window e
gli unici pulsanti a disposizione sono questi:
 MessageDlg('prova', mtInformation, [mbYes, mbNo, mbOK, mbCancel, mbAbort,
 mbRetry, mbIgnore, mbAll, mbNoToAll, mbYesToAll, mbHelp], 0);
pero basta semplicemente utilizzare un dialog standard di delphi con due
bottoni e una label è l'effetto è lo stesso.
Ti fai una funzione  tipo
function MioMessaggio (messaggio,caption1,caption2:string):word;
var
MiaDialog:TMiadialog;
begin
MiaDialog:=TMiadialog.create(Self);
Miadialog.Label1.caption:=Messaggio;
Miadialog.bottone1.caption:=Caption1;
Miadialog.bottone2.caption:=Caption2;
Result:=MiaDialog.showModal;
end;

Newsgroup: it.comp.lang.delphi
Titolo: le informazioni sulla colonna chiave non sono sufficienti...

Salve NG,
ho questo problema:
Ho un DB ACCESS con 2 tabelle
bollette(...)
società(...)
per visualizzare i record contenenti i campi correlati ho usato i componenti 
DBCTRLGRID, ADODATASET e ovviamente DATASOURCE
Ora il mio problema è quello di modificare (o cancellare) i campi dei 
record...come posso fare essendo i record composti da campi correlati?
Quale tecnica è meglio utilizzare in questi casi?
Grazie 

 ha scritto nel messaggio 
news:wvGmf.30551$S6.5...@twister2.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: Interbase

Ciao a tutti,
x Daigo, il tuo programmino SMS funziona benissimo.
Seguono alcune domande x tutti:
1) Secondo voi interbase riesce a gestire con tutta tranquillitą 100.000
record?
2) Si puo distribuire Interbase versione LOCAL gratuitamente?
3) Quando si installa un programma Delphi con Interbase come DB, che opzione
devo dare a IS?
Grazie mille,
    Marco Olivieri


Devi installare i SQLLinks di Interbase. Poi dovrai configurare l'alias in
modo corretto e installare Interbase client perchè IS versione Express
(ovvero quella fornita con Delphi) non ti installa anche interbase.
Ciao
Solid Snake

 wrote in message
8fgl0g$8ua$1...@fe1.cs.interbusiness.it...


 records?
Questa è esperienza personale !!! :
ho fatto un megatest con una tabella creata in automatico di 300.000 records
paradox ha iniziato a dare problemi (table full). la cosa incredibile è che
NON ERA VERO !!!
comunque, su questo ng, diverse persone hanno avuto esperienze negative con
paradox.
un altro db utilizzato è dbase : pare sia stabile (anche note società di
software lo utilizzano); certò non è il massimo ma se la sicurezza è
garantita...
secondo me ti trovi davanti a un bivio:
strada n. 1: usi un db relazionale (interbase, sql server, oracle,...). Hai
tutti i pro del mondo ma paghi
srada n. 2: usi dbase, paradox,...(non costano nulla ma non sono certo
indicati per applicazioni che trattano una grossa mole di dati)
vedi tu !
ciao
Solid Snake


Non se usi come server db una piattaforma linux (interbase 4.0g è libero
così come lo sarà il 6.0)
Ciao ZioPino
 
.
Newsgroup: it.comp.lang.delphi
Titolo: ..e per inviare un file in allegato ?...

Salve a tutti:
rieccomi con l'ennesimo quesito per chi vuole darmi un aiuto.
Stavolta vorrei sapere come fare per realizzare la stessa funzione di
'destinatario posta' dal menů del tasto destro del mouse;
cioč: come faccio per allegare al client di posta predefinito il file
selezionato nel FileListBox?
Grazie anticipatamente...
    Renato Belloni.
--
Posted from 
gnbts.univ.trieste.it
 [140.105.50.5]
via Mailgate.ORG Server - 
http://www.mailgate.org

 selezionato nel FileListBox?
Non ho Delphi sottomano adesso ma penso che la FileListBox abbia una prop.
FileName (anche se  non ricordo se ritorna _tutto_ il percorso o solo
"nomefile.ext" ...)
Cmq, ti basta chiamare la ShellExecute (includi la unit ShellAPI):
Shellexecute(0,nil,'mailto:
Pi...@Pallino.it
?subject=Oggetto&add="c:\Tuofile.
doc"',nil,nil,0);
e ti si aprirà un nuovo msg (col client di posta predefinito) in cui
troverai compilati il campo To, Subj e pure Allegato...
Se vuoi fare qualcosina in + potresti usare l' OLE automation e "pilotare"
Outlook (non so se anche da parte Netscape abbiano qualcosa di simile)..
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply

Newsgroup: it.comp.lang.delphi
Titolo: scritta mobile

Salve
come faccio a fare una scritta (magari un label1) la quale la posso
spostare per la form cliccandoci sopra con il mouse??? trascinandola
in pratica
danke

 in pratica
Ho risposto alla stessa domanda su uno dei gruppi di Cantů, solo che la era
relativa ad un panel, quindi cambiano solo gli event-handler in gioco!
Risposta su gruppo Cantů:
--
con qualche operazione manuale ...
procedure TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  Mousepressed := false;
end;
procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
   if mousepressed then
   begin
      Panel1.left := Panel1.left - (MyX-x);
      Panel1.top  := Panel1.top  - (MyY-Y);
   end;
end;
procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
   Mousepressed := true;
   MyX:=X;
   MyY:=Y;
end
--
Saluti
--
- Carlo -
c.b...@libero.it
http://members.fortunecity.it/cbertu

Newsgroup: it.comp.lang.delphi
Titolo: MD 6 (Cantù)

Ciao a tutti,Non sto facendo pubblicità!!!!!
Volevo solo un parere disinteressato riguardo
l'ultimo libro di Cantù appunto Mastering Delphi 6.
Tenete presente che di Cantù ho già letto,anzi
consumato d2,d3,d5.
Ciao.............

 wrote:

dato che hai già letto tre libri e il Delphi lo
conosci...acquistalo pure..male non ti fa :)
--
Lawrence Oluyede
rhy...@myself.com
Newsgroup: it.comp.lang.delphi
Titolo: elaborazioni con ZMySQLQuery

La mia domanda è frutto di inesperienza con dei database come MySQL.
Stò utilizzando il componente Zeos ZMySQLQuery per eseguire appunto
delle query e dei join su alcuni miei archivi.
Il risultato è in sola lettura, ma esiste un sistema per poter modificare e
aggiornare i campi interessati ?
Se si come posso fare ?
Sono sulla strada sbagliata ?
Ciao e grazie
Enrico

 aggiornare i campi interessati ?
Controlla la proprietà RequestLive del componente (deve essere = true).
Se usi Query complesse che coinvolgono diverse tabelle, devi usare il
componente ZUpdateSql
(le regole sopra sono valide anche per i componenti standard di Delphi)
Ciao
Gianni Giusti
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.delphi
Titolo: [OT?] Lazarus

Ciao a tutti,
oggi ho scoperto per la prima volta Lazarus (v. 0.9.4b) e devo dire che non 
sembra davvero niente male :)
Mi chiedevo se parlare di questo compilatore qui sia OT o no... (dopo tutto 
è molto vicino a Delphi e non ci sono ng dedicati)
In caso fosse IT vi chiedo se è un mio problema (del pc, uso win xp sp2 per 
la cronaca) o una mancanza il fatto che non ci sia la funzionalità che apre 
tutti i medoti da selezionare per una scrittura più veloce del codice dopo 
la pressione del "." nell'utilizzo degli oggetti... spero non sia troppo 
incasinata come domanda e che sia abbastanza chiara :-p
Non riesco a trovare il modo per abilitare (o disabilitare) questa cosa... 
qualcuno sa aiutarmi?
Ciao e grazie! 

 Ciao e grazie!
prego.
-- 
Ciao, Anto', [37, 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

 prova a premere ctrl+barra spazio
Perfetto, funziona alla grande anche come completamento automatico delle 
parole.
C'č modo perň di farlo fare in automatico alla pressione del "."? (Cone un 
Delphi insomma :) )
Ciao e grazie ancora ;)
Newsgroup: it.comp.lang.delphi
Titolo: Leggere dati monitor

Navigando in Internet ho appreso che c'è la possibilità di leggere
alcune informazioni del monitor interrogando delle librerie di Windows.
Ho inoltre saputo che tali informazioni sono racchiuse in librerie(?)
che portano il nome di EDID oppure DDC (se non ho capito male sono i due
standard esistenti). Sono così andato sul sito della 
www.msdn.com
 per
avere maggiori informazioni sul come interrogarle, ma qui mi sono perso:
non ci ho più capito un tubo!!! Qualcuno potrebbe essere così gentile da
darmi due dritte su come ottenere quelle informazioni?
Grazie! :)
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 alcune informazioni del monitor interrogando delle librerie di Windows.
la variabile globale Screen, di classe TScreen, fa il caso tuo
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

 la variabile globale Screen, di classe TScreen, fa il caso tuo
Mmm ne sei sicuro? Io ho bisogno delle informazioni circa il modello, la
marca, il numero seriale del monitor (che da qual che ho capito trovo 
all'interno delle librerie citate nel mio msg precedente) . Mi pare 
invece che dalla variabile Screen ottengo solo i valori delle
impostazioni
locali. O mi sbaglio? 


darmi due dritte su come ottenere quelle informazioni?
Ho visto che questi componenti
http://www.mitec.cz/msi.htm
contendono proprio una classe TMonitor che restituisce tutte le informazioni
possibili ricavate usando le API per EDID da delphi.
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 possibili ricavate usando le API per EDID da delphi.
Già, le conosco anche io. ;)
Però volevo arrivarci da solo a leggere quelle informazioni senza 
l'ausilio di componenti esterni. Se ce l'ha fatta lui ce la devo fare
anche io!!!


 marca, il numero seriale del monitor 
no, allora la Screen non ti basta


 l'ausilio di componenti esterni. 
se hai i sorgenti, inizia a guardare come sono state implementate le varie 
funzioni


 funzioni
Purtroppo no. I sorgenti sono a pagamento   :(


 Purtroppo no. I sorgenti sono a pagamento   :(
Ehm, qui lo dico e qui lo nego, ma sul mulo si trovano.
C'è solo una persona che ce l'ha (tra poco due :D ) ma con la pazienza...
^___^;
--
Jax
====
Dacci le cose superflue, e faremo a meno del necessario.
Newsgroup: it.comp.lang.delphi
Titolo: [OT] Aggiornamento Delphi 7

Salve a tutti.
Scusate se la domanda potra' sembrarvi banale, ma io non riesco ad uscirne.
Un mio collaboratore ha acquistato Delphi 7 Enterprise, lo ha registrato
attraverso il programma presente a menu', ma ora non riusciamo a scaricare
gli aggiornamenti, in quanto Borland ci chiede per accedere la mail che
abbiamo usato per la registrazione del prodotto. Ma nella procedura di
registrazione non ha chiesto nessuna mail!!!!
Qualcuno di voi ha avuto lo stesso problema?
Grazie a tutti.
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 registrazione non ha chiesto nessuna mail!!!!
Si tratta dell'indirizzo email utilizzato per l'iscrizione a BDN 
(Borland Developer Network):
http://bdn.borland.com
Suppongo che la registrazione a BDN sia obbligatoria; il login può 
essere successivamente effettuato con l'indirizzo email o con un "login 
name", appunto.
Ciao,
   Marco.
-- 
Marco «Alka» Breveglieri	
http://www.marco.breveglieri.name
  «bvmcnxsjlkhròhyeq, potrei scrivere a questo punto,
   se mi addormentassi sui tasti» (Daniele Luttazzi)

 name", appunto.
Grazie!


Newsgroup: it.comp.lang.delphi
Titolo: Help facile facile per newby

Ciao ragazzi
Come faccio a prendere la data da sistema?
Di che tipo deve essere la variabile dove andrň a metterla?
Grazie
    Bart

     Bart
Prego, salutami Homer! ;)
Ciao,
Alan Solo

 Prego, salutami Homer! ;)
DOH!
--
- Carlo -
c.b...@libero.it

 Di che tipo deve essere la variabile dove andrò a metterla?
Ciao, guarda la funzione Now   il tipo è TDateTime
Bye, Davide DG

 DOH!
dehiihohu, just DOH it! :)

Newsgroup: it.comp.lang.delphi
Titolo: Aggiungere un Columns.DataField ad un DBGrid

Devo scrivere una procedura che aggiunga dei nuovi campi all'interno del
Editing DBGrid.Columns
potete aiutarmi.....
vi ringrazio in anticipo
Ciao Max.

 potete aiutarmi.....
Non sono sicuro di aver capito bene.
Se vuoi aggiungere o modificare le colonne della DbGrid a runtime puoi
fare così:
with DbGrid1 do
  begin
  columns.clear;
  columns.add;
  columns[0].FieldName := 'CAMPO1';
  columns[0].Title.Alignment := taLeftJustify;
  columns[0].Title.Caption := 'Titolo campo1';
  columns[0].Width := 82;
  columns[0].ReadOnly := true;
  columns[0].Color := clSilver;
  columns.add;
  columns[1].FieldName := 'CAMPO2';
  columns[1].Title.Alignment := taRightJustify;
  columns[1].Title.Caption := 'Titolo campo2';
  columns[1].Width := 58;
  ecc.
  end;
Per sapere quante colonne ci sono nella DbGrid puoi usare
DbGrid1.Columns.Count;
Mirko
--
--------------------------------------------
Mirko Guidolin
Non rispondete in E-Mail
--------------------------------------------
Newsgroup: it.comp.lang.delphi
Titolo: EXE CONSOLE

E' possibile eseguire un applicazione console da un programma delphi e
catturare l'output che questa restituisce?

 catturare l'output che questa restituisce?
prova a farlo eseguire così "nomeprog > nomefile" e leggere il
nomefile...
anche se l'utente non vedrà l'output xkè ridirezionato al file   
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:e4f47870449cdfe4d37...@mygate.mailgate.org...


 catturare l'output che questa restituisce?
Scarica il componente TDosCommand.
Fa quello che hai chiesto nel modo in cui va fatto, cioe' con le pipe e la
redirezione.
Ciao!                {MSX}
--
{MSX}  -  
http://msx.rules.it
Mantenitore delle FAQ di it.comp.lang.delphi,
reperibili qui: 
http://gpi.infomedia.it/abc/delphi/FaqDelphi.txt

Grazie 1000 perň non ho idea di dove scaricarlo!
Su Google trova solo un sito giapponese che non ha link per download...
"{MSX}" <nlugat...@THISinwind.it> ha scritto nel messaggio
news:2xAp8.100157$1S3.3...@twister1.libero.it...


Una ricerchina su torry no eh ? :)
Ecco il link:
http://www.torry.net/vcl/system/tasks/doscommand.zip
il componente e' piuttosto facile da usare..
ha un evento OnNewLine che ti permette di catturare l'output appena viene
generato, senza attendere la fine del task.
Ciao!            {MSX}
P.S. tra l'altro e' pure sulle FAQ


GRAZIEEEE!!
P.S.: carini i giochetti sul tuo sito!
"{MSX}" <nlugat...@THISinwind.it> ha scritto nel messaggio
news:j7Bp8.100288$1S3.3...@twister1.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: FieldDefs.Update

Un saluto a tutti.
Mi trovo costretto a usare il metodo in oggetto.
Ho una TAdoQuery esposta come Iunknown da un com.
La sudetta maledetta query viene associata ad un tdatasetprovier a sua
volta appioppato ad un tclientdataset.
Su questo clientdataset creo dei campia runtime che ovviamente nn
esistono nella query...
Da qui la necessita di creare campi persistenti...
Ergo, in tutto 'sta tarantella ad un certo punto mi tocca scrivere
miocds.fielddefs.update...
Ma questa cosa è lenta un accidente...
Mi chiedevo se esiste una tecnica che permette di creare campi a
runtime senza il calice amaro del fielddefs.update...
Pax vobiscum
A.

 miocds.fielddefs.update...
Perché?
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

ciao, andrea.
in tutti i post relativi a creare campi a runtime sui quali devi
assegnare l'evento OnGetText viene indicato che devi eseguire
fielddefs.update...
forse è una ca##ata??
A.

 ha scritto:

...ma perche' non usi i DBexpresssssss...ma cazzo.....ma come si faaa?
perche' se esiste qualcosa che funziona bene ..devi usare cagate che
funzionano maleeeee !?

 Ma questa cosa è lenta un accidente...
Ma quante volte lo fai per accorgerti che e' lenta?
Comunque, sono tutte operazioni fatte su TCollection: sono per
definizione lente.
Se non usi D2007 o D2006, prova ad usare questa "patch" che velocizza
le chiamate di sistema sostituendo le funzioni della RTL con altre piu'
veloci (di tre volte!):
http://fastcode.sourceforge.net/challenge_content/FastMove.html
HTH
Ciao
-- 
ACSH
[TurboDelphi]
Chi fa da se', fatica il doppio

fielddefs.update...
Ma perché crei i campi a questo modo? sono campi calcolati? perché li
aggiungi a run-time?

 funzionano maleeeee !?
Non sempre ti vengono dati requisiti tali per cui hai la libera scelta 
di usare ciò che ti pare.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 aggiungi a run-time?
no, peggio che calcolati..
sui campi creati a runtime *devo* gestire OnGetText.
Credimi, andrea..nn ho alternative.
A.

> Ma quante volte lo fai per accorgerti che e' lenta?
una sola volta...
solo che il db è stato progettato seguendo una metodologia cinofallica
peggiore di quelle che ho visto in tanti anni di lavoro..
la tabella in questione ha circa 240 campi...
io nn dico una 5a forma normale..ma qui forse nn si arriva manco alla
2a....
Newsgroup: it.comp.lang.delphi
Titolo: Fuzzy string matching

Qualcuno saprebbe indicarmi un codice sorgente con questa funzione in Pascal 
o ObjectPascal?
Salute e saluti a tutti,
Francesco 

i soliti siti?
AS

i soliti siti?
Tutta roba non open source :-( 

questa funzione mi ha gia' aiutato parecchie volte.
Peppe
function Approx(k: Integer; const Pat, Text: shortstring): Boolean;
{               |                  |     |
{               |                  |     +-- testo
{               |                  |
{               |                  +--- pattern
{               |
{               +--- n. errori possibili
}
var
   i,j,m,Tj,Tj1: integer;
   T: array[0..254] of integer;
   a,b:char;
begin
   m := length(Pat);
   if m <= k then {se la lunghezza di Pat e' minore del n.}
   begin  {degli errori ammessi, result:=True}
      result := True;
      exit;
   end;
   for j:=0 to m do
      T[j]:=j;
   for i:=length(Text) downto 1 do
   begin
      Tj1 := 0;
      for j:=1 to m do
      begin
         Tj := T[j];
         a:=Text[i];
         b:=Pat[length(Pat)-j+1];
         if a<>b then
            Inc(Tj1);
         if (Tj+1)<Tj then
            Tj1:=Tj + 1;
         if (T[j-1]+1)<Tj1 then
            Tj1:=T[j-1]+1;
         T[j]:=Tj1;
         Tj1:=Tj;
      end;
      if T[m]<=k then
      begin
         result:=True;
         exit;
      end;
   end;
   result := False;
end;
Newsgroup: it.comp.lang.delphi
Titolo: [d5] spostamento finestra

salve a tutti, ho provato FindWindow e SetWindowPos, però non riesco a farla 
funzionare... ovvero prendo handle della finestra della tastiera su schermo 
(osk.exe di windows), poi però SetwindowsPos mi ritorna False, perchè???
     // cerca finestra
 hWind := FindWindow('Tastiera su schermo', nil);
 lOk:=SetWindowPos(hWind, HWND_TOP, 0,0, 0,0,  SWP_NOREPOSITION OR 
SWP_NOSIZE  or SWP_SHOWWINDOW);


Con una rapida ricerca in google...
function FindWindowByTitle(WindowTitle: string): Hwnd;
var
  NextHandle: Hwnd;
  NextTitle: array[0..260] of char;
begin
  // Get the first window
  NextHandle := GetWindow(Application.Handle, GW_HWNDFIRST);
  while NextHandle > 0 do
  begin
    // retrieve its text
    GetWindowText(NextHandle, NextTitle, 255);
    if Pos(WindowTitle, StrPas(NextTitle)) <> 0 then
    begin
      Result := NextHandle;
      Exit;
    end
    else
      // Get the next window
      NextHandle := GetWindow(NextHandle, GW_HWNDNEXT);
  end;
  Result := 0;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
 hWind : HWND;
 lOk : boolean;
begin
 // cerca finestra
 hWind := FindWindowByTitle('Tastiera su schermo');
 lOk := SetWindowPos(hWind, HWND_TOP, 0,0, 0,0,  SWP_NOREPOSITION OR
SWP_NOSIZE  or SWP_SHOWWINDOW);
end;

risolto con:
 hWind := FindWindow(pchar('OSKMainClass'), nil);
 nPosxTast:=0;
 nPosYTast:=0;
 lOk:=SetWindowPos(hWind, HWND_TOP, nPosxTast,nPosYTast, 0,0, 

Newsgroup: it.comp.lang.delphi
Titolo: [OT] Oracle rilascia il primo database light free

Per la gioia dei tanti sviluppatori che utilizzano oracle, e' di oggi la
notizia su punto informatico
(
http://punto-informatico.it/p.asp?i=55913&r=PI
) che la oracle sta
distribuendo la beta della prima versione "lite" del noto db enterprise.
Una sorta di MSDE2000 ma di marca oracle.
Cito dall'articolo di PI queste sigificative frasi "La licenza che
accompagna Oracle Database XE blinda il codice sorgente del software,
tuttavia consente agli sviluppatori di ridistribuire il programma e di
inglobarlo all'interno delle proprie applicazioni senza pagare alcuna
royalty."
Questo significa poter lavorare con un db veramente massiccio e poterlo
redistribuire ai clienti.
Se non sbaglio, con oracle ci si interfaccia tramite ADO ?
O ci sono dei componenti dedicati specifici per Delphi?
Ciao!
-- 
Morde. 
ICLDweb: 
http://www2.samatel.com/icld/

 O ci sono dei componenti dedicati specifici per Delphi?
I più diffusi sono sicuramente i DOA 
(
http://www.allroundautomations.com/
), ma c'è anche il driver 
dbExpress della CoreLab (
http://crlab.com/dbx/
).

 enterprise. 
Giusto per la cronaca, l'installer del 28-Oct-05 per Windows ha vari
bug che ne pregiudicano totalmente il funzionamento, per cui se volete
provarlo vi consiglio di aspettare il prossimo update.
-- 
I am what I am, I do what I can
Do. Or do not. There is not try.

Newsgroup: it.comp.lang.delphi
Titolo: [d5] e nuovi processori

ciaoa  tutti, qualcuno sa se con i nuovi pentium 4 di intel ci siano 
incompatibilità con eseguibili delphi5?
Simone 

 Simone
E' più probabile che le incompatibilità escano con XP SP2, piuttosto che con
il processore stesso.
Io ho avuto molte noie con D5 Pro + XP SP2 (indipendentemente dal
processore).
Fai attenzione alle librerie Jedi, se le usi scarica l'ultima versione (mi
sembra la 1.98).
Ciao
Marco

Newsgroup: it.comp.lang.delphi
Titolo: dipendenze con Tipi API (o qualcosa del genere)

    Ciao Ragazzi,
ho un problema con un programma:
Voglio chiamare un'altro programma per dos e farmi ridare l'output sul
mio
programma stesso. Ho provato a vedere in giro ma tutto quello che ho
trvovato mi parla di tipi che non riesco a trovare.
Si fa sempre riferimento ad alcune chiamate API come CreatePipe,
CreateProcess ecc.
Il problema e' che i parametri di tutte queste chiamate sono sempre dei
THandle, TStartUpInfo, TSecurityAttributes, TProcessInformation, che non
riesco in nessun modo a trovare.
Qualcuno di voi sa in quale libreria o altro possa cercare questi
riferimenti?
Grazie.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

La TStartUpInfo č definita in Windows.pas
Mi č bastato dichiarare una variabile di questo tipo
e poi cliccarci sopra 2 volte con il tasto control premuto.
Bye
AS


Ciao e grazie.
Me ne ero accorto esattamente 5 minuti dopo aver mandato il Mex.


Glacier    Ciao Ragazzi,

Newsgroup: it.comp.lang.delphi
Titolo: Help File text

Salve a tutti avrei un quesito da porvi io in una procedura mi scrivo un
file txt per vedere gli errori ma vorrei scriverli concatenati e non
riscreve da capo l'intero file, vi prego aiutatemi.
AssignFile(Log_file,ExtractFilePath(Application.exeName)+ 'Log.dat');
Rewrite(Log_file);
.....
quando c'è l'errore
writeln (log_file,'File GDB non trovato');
closefile(log_file);
vorrei aggiungere in concatenazione il giorno e l'ora in cui si verifica
questo errore, invece come ho scritto io me lo scrive una sola volta.
grazie a tutti
--------------------------------
Inviato via 
http://usenet.libero.it

 Rewrite(Log_file);
hai visto nella guida la procedura Append?
Bye
A.

Newsgroup: it.comp.lang.delphi
Titolo: ancora conversione pixel -> mm

ciao a tutti ho effettuato la seguente prova:
preso un'immagine con photoshop, fotografato lo schermo con la barra 
righello in mm di photoshop e misurata in pixel, risultato è stato 12pixel = 
1 mm.
ho fatto la stessa cosa da un altro pc con risoluzione diversa e il 
risultato è stato sempre 12 pixel... può essere attendibile?
Simo

 risultato è stato sempre 12 pixel... può essere attendibile?
Purtroppo no. Non puoi considerare per certa un'equivalenza pixel/mm.
Dipende, come già detto, dalle caratteristiche hardware.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

hehe pensavo di aver trovato l'acqua calda!!!

Andrea vuoi un consiglio ?
Al posto di postare col nome di altri, prenditi una bella Russa e fatti 
un giro, per me ti può solo fare bene...
www.italiachiamami.com
--- posted by geoForum on 
http://www.delphiedintorni.it

Dipende, come già detto, dalle caratteristiche hardware.
Si può ! Guarda bene quanto detto nel post sotto: (Metti tutto 
l'indirizzo WEB sulla stessa riga... Ciao :)
http://www.delphiedintorni.it/geoxml/forumgetthread
?
groupname=it.comp.lang.delphi&messageid=
58gt6eF...@mid.individual.ne
t&displaymode=all

Newsgroup: it.comp.lang.delphi
Titolo: binario...

Salve
Come posso ricavare il corrispettivo binario di un numero?
Grazie..
Sent via Deja.com 
http://www.deja.com/
Before you buy.

Molto semplice:
Per ricavare il binario di un numero (suppongo decimale), devi dividere
successivamente il numero per 2 finché il risultato è 0, prendendo via via i
resti.
Esempio: 11 in decimale,
11/2 = 5,  resto 1 (inizia a scrivere 1, si parte dalla cifra meno
significativa)
5/2 = 2,   resto 1 (il numero binario diventa 11)
2/2 = 1,   resto 0 (scrivi 011)
1/2 = 0,   resto 1 (ecco il numero binario: 1101)
STOP
L'implementazione dell'algoritmo in una funzione è, direi, semplicissima:
function DecimalToBinary(dec : integer) : string;
begin
  if dec = 0 then Result := '0'
  else Result := '';
  while dec <> 0 do
    begin
       Result := IntToStr(dec mod 2) + Result;
       dec := dec div 2;
       //
       if (dec = 0) and ((dec mod 2) = 1) then
        Result := Result + '1';
    end;
end;
Alessia Mazzeo
CCS Tecnologies s.r.l.
e-mail: 
maz...@ccstech.it
tel: 0113187070
--
Posted from mail@[213.254.6.80] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Come posso ricavare il corrispettivo binario di un numero?
Dividendo per due e catturando i resti nell'ordine inverso a quelli
con cui li ottieni.
Es.:
132 / 2 = 66  132 % 2 = 0
 66 / 2 = 33   66 % 2 = 0
 33 / 2 = 16   33 % 2 = 1
 16 / 2 = 8    16 % 2 = 0
  8 / 2 = 4     8 % 2 = 0
  4 / 2 = 2     4 % 2 = 0
  2 / 2 = 1     2 % 2 = 0
  1 / 2 = 0     1 % 2 = 1
132 = 10000100

L'implementazione dell'algoritmo in una funzione è, direi, semplicissima:
Ottimizziamo :
function Dec2Bin( n : integer ) : string ;
begin
  Result := '' ;
  repeat
    Result := chr( ord('0') + n mod 2 ) + Result ;
    n := n div 2 ;
  until n = 0 ;
end ;

 L'implementazione dell'algoritmo in una funzione è, direi, semplicissima:

Newsgroup: it.comp.lang.delphi
Titolo: Il TreeView continua ad andarmi in TILT!!!

Ho provato ad inserire nel mio incubo-treeview delle immagini per le diverse
priorità (esattamente come nell'Outlook!) ... pallino rosso se è alta, blu
se è media
e così via...Tutto funziona... se non che quando ci passo sopra col muose mi
cambiano le
icone! Credo di aver intuito che il tutto è causato dalle StateImage... ma
come
faccio a ucciderle quelle? Nel senso, come faccio a non farmi cambiare le
icone? Ho
provato a inserire una linea di codice del tipo    Tree.StateIndex :=
Tree.ImageIndex
... ho pensato dato che uso la stessa struttura (TImageList) lo frego... e
invece lui mi fa
gli accoppiamenti, ossia mi mette 2 immagini prima di ogni riga! O il mio
Delphi mi odia o non
so più che fare....
Riporto il pezzo di codice sorgente che mi manda in TILT il tutto.
Che c'è di sbagliato? HELP ME!!!!
--------------------------------------
With Query Do Begin
    Active := True;
    First;
// semplice ciclo while di una query....
    While Not Eof Do Begin
// qui costruisco le voci principali del TTree
         If NamePrg <> FieldByName('PRG').AsString Then Begin
             NamePrg := FieldByName('PRG').AsString;
             Padre := Tree.Items.Add(Nil, NamePrg);
             Padre.ImageIndex := 3;
             Padre.STATEIndex := -1;      // E' QUI IL BASTARDO!!!
         End;
         Figlio := Tree.Items.AddChild(Padre,
FieldByName('BREVE').AsString);
// qui vado a settare l'immagine in base alla priorità...
         If Query.FieldByName('PRIORITY').AsString = 'A' Then
Figlio.ImageIndex := 0   Else
         If Query.FieldByName('PRIORITY').AsString = 'M' Then
Figlio.ImageIndex := 1   Else
         If Query.FieldByName('PRIORITY').AsString = 'B' Then
Figlio.ImageIndex := 2;
         Figlio.STATEIndex := -1;      // E' ANCHE QUI
         Next;
    End;
End;
-- 
Posted from IDENT:qmailr@[217.57.169.195] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

so più che fare....
L'immagine cambia quando clicchi? se si' allora il problema e' in
TTreeNode.SelectedIndex che ha un valore diverso da ImageIndex.
 Aggiungi: Nodo.SelectedIndex := Nodo.ImageIndex.
Lo stateIndex non centra. Nel TreeView lascia vuota la proprieta'
StateImages.
Ciao,
Massimo.
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"

Newsgroup: it.comp.lang.delphi
Titolo: Collaudo Software

non ho idea se esista qualcosa di simile, ne se sia fattibile.
 
partendo da un eseguibile, esiste "un qualcosa" in grado di replicare in 
automatico le operazioni e simulare l'accesso di n utenti ?
 
del tipo "intercettare i comandi da menu/tastiera", scriverli in uno 
script che possa essere eseguito n volte.
 


Parti da qui:
https://en.wikipedia.org/wiki/Comparison_of_GUI_testing_tools
 
 
-- 
Morde
Newsgroup: it.comp.lang.delphi
Titolo: visual c++ e delphi

Vorrei fornire di interfaccia grafica un programmino scritto tramite Visual
c++ 6. Solo che non so programmare graficamente sotto quell'ambiente.
Sapete come posso fare per fornirli un'interfaccia grafica costruita con
delphi 6?
Devo linkare i moduli obj con il pascal o che altro??
Grazie
Alberto

 ha scritto nel messaggio
news:bitbjl$v9e$1...@lacerta.tiscalinet.it...

Non ho mai fatto un porting da un linguaggio a un altro ma io riscriverei
l'applicazione
scritta in C in Delphi, completamente.

 wrote in message
news:bitbjl$v9e$1...@lacerta.tiscalinet.it...

Potresti mettere la parte che hai fatto in c++ in una dll e poi utilizzare
questa
dll all'interno del programma delphi...

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

Qual'e la funzione di delphi4 che prende un pezzo di stringa partendo
da un certo punto, per una certa lunghezza (vedi mid di Visual Basic)
ciao



Copy

Newsgroup: it.comp.lang.delphi
Titolo: guida FIREBIRD

Ciao a tutti ragazzi....da poco utilizzo Delphi 7...e volevo sapere che 
esiste una guida buona di supporto per utilizzare al meglio FireBird, meglio 
se italiana....cmq sono costretto dal lavoro ad imparare quel database per 
cui non chiedetemi perch� ho scelto quello...
grazie a tutti
Max 

 se italiana.... per 
http://www.firebirdsql.it/
-- 
Morde

Newsgroup: it.comp.lang.delphi
Titolo: Replicare degli oggetti in ScrollBox...

Ciao!
Per un progetto che sto facendo dovei fare una cosa simile: ho una
riga formata da alcuni CheckBox e EditBox... alla pressione di un
tasto ("ADD") dovrei replicare l'intera riga (cambiando ovviamente i
nomi dei vari oggetti in modo sequenziale, che so Check11, Check12,
Check21...) in uno ScrollBox... 
Come è possibile fare una cosa simile (sempre che sia possibile!)
grazie 1000
 Luca
-----------------------------------------------------------------
La mia pagina dedicata all'elettronica:
--> 
http://www.dentella.it/elettronica
-----------------------------------------------------------------

Se vedi sulle faq trovi le indicazioni per creare gli
oggetti dinamicamente.
L'unica rottura nel tuo caso è che devi crearti un 
qualcosa per calcolarne i nomi.
Puoi o incrementare un contatore ad ogni pressione del tasto ADD
oppure calcolare un valore partendo dalla data e ora di sistema
letta al momento della pressione del tasto ADD.
Poi, per le coordinate, aggiungi un valore fisso alla Y della
ultima riga.
Bye
AS
"Se è Microsoft non funziona"
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG