mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Menu ad hoc

Ciao,
sto scrivendo un applicativo e vorrei fare in modo che dopo il login
all'utente appaiano solo le funzioni del menu a cui lo stesso è
abilitato.
Qualcuno di voi ha già visto o fatto qualcosa del genere o mi devo
inventare tutto.
Grazie.
Blue Wolf.

 wrote in message
38e1ff8d.15734349@lodi02...

Ciao, una risposta forse un po' semplicistica ma è quello che faccio quando
ho problemi simili al tuo:
utilizza la proprietà Visible (o Enabled, a seconda se vuoi che le funzioni
non consentite restino comunque visibili) della voce di menu', ecco un
esempio spartano:
se hai un menù contenente per es. la voce "Salva" e vuoi che non sia
accessibile, e tale menù si trova sulla Form1 puo scrivere il seguente
codice:
TForm1.Create...
begin
  ...
  Salva1.Visible:=False;
  (oppure Salva1.Enabled:=False);
  ...
end;
Ovviamente il lavoro grosso sta nello scrivere il codice che disabiliti
tutte le funzioni che non devono essere utilizzate da quel tale utente, ma
per questo ci aiuta il Copia e Incolla.
Spero di esserti stato d'aiuto.
Salutoni
Silvio

Newsgroup: it.comp.lang.delphi
Titolo: msde 2000 - ado

Mi hanno detto che il DBMS MSDE, nel suo piccolo, sostituisce SQL
Server per le piccole realtà.
Visto che il mio software funziona molto bene con SQL Server, per chi
non può spendere, ho pensato che MSDE potrebbe andare benissimo.
Ho provato ad installare MSDE dal CD di SQL Server 2000.
Il risultato è angosciante: dopo un pomeriggio intero, non sono ancora
riuscito a capire la logica.
Vorrei creare un piccolo DB in MSDE per fare alcune prove, o meglio,
vorrei eseguire uno script per la creazione di un DB.
Come posso fare?
Ho installato anche SQL Server Client (Manager, Query Analizer,
ecc...).
Qualche anima santa può instradarmi?
Grazie anticipatamente.
Tony

riuscito a capire la logica.
Non ho esperienza con Msde2000 ma uso Msde versione 1 (in pratica
SqlServer 7). Questa versione puo' essere instalata solo in unattended
mode eseguento un file exe (nel mio caso si chiama msdex86.exe)
comandato da un file iss che contiene i pochi parametri da installare.
Le istruzioni che ho trovato a suo tempo sul sito Microsoft in effetti
erano un po' vaghe e spesso facevano riferimento a SqlServer piu' che
a Msde, ma in ogni caso alla fine sono riuscito a superare le
difficoltà. 
Per darti una mano ci occerrerebbe pero' sapere cosa fai e quali
errori ti vengono segnalati.
Ciao, Rocco.
Newsgroup: it.comp.lang.delphi
Titolo: Word - Delphi 7

Vorrei chiedere se qualcuno sa come gestire un file word con Delphi
(possibilmente versione 7) o su dove possa teovare una dettagliata
documentazione su questo problema. 
Sostanzialmente il mio obiettivo sarebbe quello di creare un programma che
mi prende tutto il testo di un documento Word e riuscirlo a portare il
testo compreso di formattazione in delphi per una sucessiva rielaborazione.
Grazie a tutti.
--- posted by geoForum on 
http://www.delphiedintorni.it

 prende tutto il testo di un documento Word lo trasporta compreso di
formattazione, in delphi per una sucessiva rielaborazione.


documentazione su questo problema. 
cercando su google groups proprio in it.comp.lang.delphi, oppure scaricandoti
turbopower office pro, open source e professionale. Troverai il link preciso
in un mio post fatto qualche giorno fa proprio su ICLD (=it.comp.lang.delphi)
http://groups.google.it/groups?&group=it.comp.lang.delphi
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

Newsgroup: it.comp.lang.delphi
Titolo: Come fare per......

Ciao a tutti,
            tempo fa ho lasciato un messaggio ma temo di essermi spiegato 
male.
Quindi ecco passo passo quello che devo fare in delphi 6.0
Nuovo progetto.
Nella form aggiungiamo un panel (P1) e settiamo la proprieta' align su 
bottom.
Aggiungiamo ora nella form un secondo panel (P2) a settiamo la proprieta' 
align su client.
Nel P1 aggiugiamo un bottone.
A questo punto quando si esegue il programma se clicco sul bottone .... nel 
P2 deve girare un programma (come il notepad) senza che si apra un'altra 
finestra (ho trovato diverse unit che fanno questo ... ma non serve ai miei 
scopi),  in piu' quando il mouse entra il quell'area deve restituire i vari 
click al programma che gira li dentro.
Nel caso specifico devo eseguire un solo programma gestionale (che lavora a 
tutto schermo) e alcune informazioni devono passare al mio programma.
Avevo pensato (per evitare continuamente di cambiare visuale) alla soluzione 
di cui sopra.
Nel vecchio DOS c'era un procedura delle turbo power chiamata winexec dove 
definita un'area dello schermo il programma girava in quelle coordinate.
Nel nostro caso il P2 dev'essere il nuovo monitor dove l'applicazione dovra' 
girare.
Credo che non sia una cosa facile facile ..... e' una sfida ai guru del 
delphi.
Esistono in circolazione unit free/shareware/comercial che fanno questo???
Grazie a tutti
Ciao
Daniele

 Daniele
Andrea

Newsgroup: it.comp.lang.delphi
Titolo: Order cannot be opened

Appena eseguo TADOTable.Locate (con ADO) su un database (MySQL)
si verifica la seguente EOleException:
"Order cannot be opened"
Che vuol dire ???
Grazie
Riccardo Fiorenza

Sei sicuro che la tabella sia attiva??

 ha scritto nel messaggio
news:9t002d$duv$1...@nreada.inwind.it...

Newsgroup: it.comp.lang.delphi
Titolo: Monitorare la memoria in Delphi

C'è in Delphi una funzione o procedura che permetta di controllare
passo a passo l'uso della memoria
Mi servirebbe per controllare se tutta la memoria allocata per i puntatori
sia stata restituita al sistema
In Turbo Pascal c'erano almeno due di queste funzioni e/o procedure
di cui non ricordo il nome e che comunque non trovano un corrispondente
(o almeno non lo trovo io) in Delphi
Grazie a quanti rispondessero

sia stata restituita al sistema
AllocMemCount
AllocMemSize
sono due variabili.
Prova a vedere se le "memory management routines" possono
aiutarti.
-- 
The Follet

Newsgroup: it.comp.lang.delphi
Titolo: Domanda su acquisto di D8

Oggi vado da Mondadori a Bologna chiedendo di delphi 8. Preventivamente
avevo telefonato a Borland Italia dove mi hanno spiegato come funziona la
faccenda che insieme a D8 ti danno anche la licenza di D7.
Premesso questo, come dicevo prima, vado da Mondadori chiedendogli di
ordinare una licenza di D8 Professional. Il tipo mi fa: "A si? E' uscito
D8?" e ha concluso il discorso dicendo che forse l'unico modo di averlo è
ordinarlo su Internet. Io però ricordo bene di aver chiesto a Borland dove
era possibile acquistare D8 e loro mi risposero che potevo andare i un
qualsiasi rivenditore ufficiale Borland. A questo punto che devo fare? A chi
devo dare ragione?
Davide

 ordinarlo su Internet.
io lo ordinerei su internet. Ti arriva per corriere e non devi disturbarti a
prenotarlo, chiamare per sapere se e' arrivato, muovere i tuoi piedini in su
e in giu', in lungo e in largo, ecc.
Ciao, Sandro

devo dare ragione?
Il consiglio piu' ragionevole che ti posso dare e' quello di parlare con la
mondadori attraverso l'help desk o con qualche amministrativo e fare presente
l'accaduto. Lo stesso vale per Borland. Probabilmente l'impiegato al quale ti
sei rivolto non era informato adeguatamente.
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

IO sono andato tempo fa alla Mondadori di BO per avere informazioni su
delphi 6 mma mi dissero che nontenevano a magazzino e che lo avrebbero
procurato solo su ordinazione.
Mi č sembrato un negozio piů adatto alla vendita di giochi e libri di
informatica per principianti che un negozio per professionisti del settore.
Ciao
Mario
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/
Newsgroup: it.comp.lang.delphi
Titolo: Una domanda...

Ciao a tutti scusate se perderete qualche minuto a leggere la mia cavolata.
Volevo sapere se la borland ha in progetto qualche tools per la
programmazione di cellulari e palmari. Se è una domanda stupida scusatemi...

 programmazione di cellulari e palmari. Se è una domanda stupida scusatemi...
Trovi tutto qui:
http://www.borland.com/mobile/
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 Marco «Alka» Breveglieri
 Grazie per la veloce risposta ma il linguaggio è sempre il C o si può usare
l'object-pascal?

 l'object-pascal?
Mi pare che alternative viaggino su C++ o Java.
Per l'Object Pascal, attendo di vedere cosa è possibile fare con 
Delphi2005, nonostante si sappia già che a livello di applicazioni per 
il .NET CompactFramework non c'è supporto.
Magari con 
ASP.NET
 o IntraWeb si riesce a produrre qualcosa...
Ciao! :-)


Newsgroup: it.comp.lang.delphi
Titolo: File di grosse dimensioni

Ho generato dei report che hanno come sfondo delle immagini. Ora il report
in se è di soli 400kb ma quando il report cresce e vado a controllare la
dimensione del file inviato alla stampante, vedo che arrivo anche a 26Mb e
rendendo il sistema abbastanza instabile.
Ora come posso gestire questo tipo di stampe??
Mi conviene attivare da Windows la funzione invia direttamente alla
stampante o utilizzare lo spooling?
C'è qualche altra soluzione?
Grazie anticipatamente

 stampante o utilizzare lo spooling?
usa lo spool e lascia che sia Win a gestire il tutto.. non ho capito
chettefrega :)
Newsgroup: it.comp.lang.delphi
Titolo: DLL e processmessages... non ne vengo fuori.

Ciao a tutti,
mi trovo un piccolo problemino da cui non riesco ad uscire.
Ho una DLL caricata da una applicazione che dovrebbe fare alcune cose.
Vado sul pratico che è più chiaro!
1) la DLL crea un oggetto ping: TidIcmpClient
2) imposta i parametri di ping e richiama il metodo ping.
3) all'arrivo del pacchetto, triggera l'evento onreply
Il tutto funziona, senza il minimo problema, ma la procedura chiamata nella
DLL non deve uscire se non dopo aver ricevuto l'onreply.
Per risolvere, pensavo ad un ciclo continuo .. un repeat .... until
variable=true, in modo da settare  variabile:=true quando l'evento onreply
si triggera.
Il problema è: Come faccio a fare qualcosa di simile ad un
application.processmessages in una DLL ?
L'applicazione si blocca e non va più avanti, ed io non so come uscirne!
(ovviamente l'approccio potrebbe essere sbagliato, in tal caso, cosa
consigliate?)
Grazie,
Max

 Max
-- 
Ciao, Anto', [37, 143, AQ] 
MB C SC 220 CDI Magma Rot
"Di sempre cio' che senti e fai cio' che pensi."
    G.G. Màrquez

consigliate?)
Potrei sbagliarmi, ma mi sembra che sia proprio l'approccio ad essere
sbagliato. Perchè una DLL esterna (sicuramente avrai le tue ragioni)? 
A occhio, però,  vedrei meglio una thread separata che si occupa del
ping.
-- 
"La velocità luce non è sufficiente Comandante Nunziatella, 
dobbiamo passare alla velocità smodata!"

 application.processmessages in una DLL ?
Application.ProcessMessages() forza l' applicazione che sta eseguendo codice
a servire la propria message queue in modo da gestire i messaggi inviati dal
sistema operativo e, quindi, non dare quella sensazione di applicazione
freezed. Il modo migliore è quello di instanziare un nuovo oggetto Thread
all' interno della DLL ed eseguire il codice di attesa in questo thread
separato. Prova a dare un' occhio a TThread in Delphi o direttamente alla
chiamata CreateThread() dell' api di Win32.
--
- Carlo -

 application.processmessages in una DLL ?
Puoi interfacciare benissimo l'oggetto Application del programma host,
nella DLL.
Ti basta aggiungere le unit Forms (per l'oggetto Application) e
Windows (per il tipo THandle) alla DLL ed esportare una funzione che
accetti una variabile Handle: THandle e che sia quindi richiamabile
dall'applicazione host.  Questa variabile conterrà l'handle
dell'applicazione, e quindi imposterai Application.Handle := Handle
nella tua DLL.
Alla fine, imposti Application.Handle a 0, nelle operazioni di uscita
dalla tua DLL.

 nella DLL.
Credo che proverò questa soluzione.
Nel trattempo ne è successa un'altra... Delphi lo uso da una vita ma in
questo tipo di problemi non mi ci sono mai imbattuto.
 tcp     : TidIcmpClient;
a runtime lo creo e setto i vari parametri, tra cui host.
Se l'host da pingare esiste bene, altrimento (e correttamente) tira su una
exception.
  tcp.Ping();  <-- questo codice funziona e mi mostra l'exception.
  try
     tcp.Ping();
  except
  end;         <---- questo codice funziona, prende la exception e poi la
DLL mi va in access violation. 
E' incredibile... 
Max
Newsgroup: it.comp.lang.delphi
Titolo: Funzione GetADOVersion e confersione da Stringa a Float!!!!

Ciao ragazzi!
ho trovato questa comoda funzioncina che serve
per verificare se sono installare le ADO e se sono installare rilascia 
la versione...
unico problema... non funziona....
ecco il codice...:
function GetADOVersion: Double;
var
   ADO: OLEVariant;
begin
   try
     ADO    := CreateOLEObject('adodb.connection');
     Result := StrToFloat(ADO.Version);
     ADO    := Null;
   except
     Result := 0.0;
   end;
end;
premetto che uso Delpgi 7.0
l'errore che genera è che non riesce a convertire da Stringa a Float!!! 
"2.8 is not a valid floating point value"
???
perchè?
aiuto sto impazzendo!!
ciao e grazie a chiunque voglia rispondermi...!!!
ciao
Gianluca.

soluzione pane e mortadella però funziona, ciao
function GetADOVersion: string;
var
   ADO: OLEVariant;
begin
   try
     ADO    := CreateOLEObject('adodb.connection');
     Result := ADO.Version;


 
si cosě funziona, ma il problema č a questo punto
- perchč la funzione StrToFloat non funziona ?
ciao.
Gianluca.

perchè la stringa che ti riporta ha come separatore la virgola al
posto del punto, ciao

 posto del punto, ciao
aaaa!!!
OK Grazie Brunello!!
ciao ciao
Gianluca.

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

come si puo' fa suonare un midi in una applicazione Delphi 4?
--
Ciao da Marco "Kaiser" Baldo
akira...@libero.it
ICQ#: 55765146
Kaiser Baldo's Home Page:
http://digilander.iol.it/kaiserbaldo/index.html
(Fantabasket, Fantacinema,
Anime, Manga, Fumetti, Software,
Tribes e molto di piů)
Membro del SSIFC
IHGGER #440
----------
cell. 0347-8248718


Posiziona un componente TMediaPlayer sulla maschera, imposta su True la
proprietà AutoOpen e seleziona un file midi nella proprietà FileName. Poi ti
basta chiamare il metodo Play. Ciao !

come si puo' fa suonare un midi in una applicazione Delphi 4?
Con la Playsound dichiarata nella unit MMSystem.
PlaySound('Percorso\nomefile.mid',0,snd_async);
Bye
--
- Carlo -
BSSoftware Tips Mailing-List Support

 >


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

Qualcuno usa (o ha) CoolControls?
                                                                        Ciao
e Grazie

 wrote in message
85d2f4$epm$2...@fe1.cs.interbusiness.it...


Newsgroup: it.comp.lang.delphi
Titolo: Refresh con cacheupdates

Qualcuno sa dirmi come si puo fare un referesh quando si utilizza il
cacheupdate?
Se faccio piu inserimenti e nella mia query i record inseriti non vegono
ordinati.
Grazie
Marco Cotroneo

 ha scritto nel messaggio
news:96u36q$r2l$1...@fe1.cs.interbusiness.it...


 (la pubblicità ci aiuta a vivere di +)

Newsgroup: it.comp.lang.delphi
Titolo: quicktime

Vorrei un aiuto per capire come poter riprodurre un filmato quicktime in un form di delphi. :o)
saluti!

Io, per riprodurre filmati RealPlayer, ad esempio, ho importato un nuovo
oggetto ActiveX in delphi, ottenendo un simpatico oggettino inseribile nelle
mie form, con tutti i comandi e la grafica di realPlayer (era nella lista
dei codici da importare, avendo installato Real).
Non so se  si può fare anche con QuickTime....oppure se ti basta
RealPlayer/Video.
    Ciao.
___________________> Giulio <____
E-Mail address: 
NOSPAM_g...@iol.it
Ricorda; togli NOSPAM_ per rispondermi.


prova a dare un okkio qui
ftp://delphi-jedi.org/API_Not_Assessed/QuickTime/
spero che sia quello che cerchi ;)
Saluti arturo

Newsgroup: it.comp.lang.delphi
Titolo: restart windows

ok in windows-Me posso disconnettere l'user
windows.ExitWindows(EWX_SHUTDOWN,0);
e chidere il sistema
windows.ExitWindowsEx(EWX_SHUTDOWN,0);
ma per riavviarlo?
se questa procedura non và bene per tutti gli win ditemelo
grazie :)
erik


EWX_REBOOT	
si usa con "ExitWindowsEx"
ciao
-- 
---------------------------------------
Per rispondere in privato togliere 1975

Newsgroup: it.comp.lang.delphi
Titolo: Form Ridotto a icona 2

Ciao,
ringrazio Davide dell'aiuto sei stato utilissimo,
c'e' solo un piccolo problema,
se io clicco sul pulsantino di riduzione icona la cosa funziona,
se io clicco con il tasto destro sulla barra dei titoli del mio programma
funziona,
ma se io clicco con il tasto destro sul programma che si trova sulla barra
delle applicazioni non funziona?
perche'? a cosa e' dovuto?
avete una soluzione?
grazie
Simone


Si ... ho fatto un po' di prove col winsight ... poi mi č venuto in mente
che esiste un bellissimo
evento Application.OnMinimize !!!
Quindi ... quello che ti avevo suggerito si semplifica in :
type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
  public
    procedure OnMinimize (Sender : TObject);
/ ...
end;
IMPLEMENTATION
Procedure TForm1.OnMinimize(Sender: TObject);
Begin
  // Qui puoi mettere il tuo codice...
End;
Procedure TForm1.FormCreate(Sender: TObject);
Begin
  application.OnMinimize := Onminimize;
End;
Ok ... l'ho testato e funziona nei 3 casi che hai esposto.
CIAO!! Davide DG.

Grazie mi sei stato di grande aiuto... :)
Newsgroup: it.comp.lang.delphi
Titolo: Media Player

ciao
come gestisco le associazioni dei file?
cioe come assegno icone e programma da aprire a i file?
in questo caso é un lettore con il mediaplayer quindi mp3,au,wav ecc.
come posso modificare le impostazioni (nel caso venga apero un file Avi o
mpeg ) del ''visualizzatore'' tipo FullScreen,e magari mettere pure un
PopupMenu?
ciao
erik

 cioe come assegno icone e programma da aprire a i file?
Nel seguente esempio ".pcm" è l'estensione del file che voglio associare...
procedure TFrmMain.CreateAssociationFile;
var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  Reg.RootKey := HKEY_CLASSES_ROOT;
  Reg.LazyWrite := False;
  Reg.OpenKey('.pcm\shell\open\command', True);
  Reg.WriteString('', Application.ExeName + ' %1');
  Reg.CloseKey;
  Reg.OpenKey('.pcm\DefaultIcon', True);
  Reg.WriteString('', Application.ExeName + ',0');
  Reg.CloseKey;
  Reg.Free;
end;
--
Acqua
-------------------------------------------------------
Download new version of my PixExperts for Delphi 6/C++ Builder 6 at
http://www.salexander.supereva.it/Pix_Exp171D6.zip

end;

Newsgroup: it.comp.lang.delphi
Titolo: trackbar stile winamp

Faccio riferimento al noto lettore mp3 perchè credo che tutti lo
conosciate...
Vorrei capire come realizzare in modo "elegante" una trackbar basata su
immagini come quella che permette lo scorrimento della traccia o di
impostare il volume!
Si accettano consigli, esempi ecc...
--
Massimiliano Etere
maxe...@infinito.it
da Agosto '99 orgoglioso possessore di FoFi Techno 1.2 16V MY96
Doppio AirBag + Clima + Apparence Pack + 6000CD + Viva Voce + terzo stop +
leggimappa e luce nel portaoggetti! ;)

 impostare il volume!
Ti dico come lo farei io: deriverei un componente da TGraphicControl e nel
metodo Paint inserirei il codice per disegnare la trackbar, basato su
un'eventuale campo Position (implementato normalmente con una proprieta'
published) e/o sui campi Max e Min. Disegnare il tutto e' piuttosto facile,
basta usare il canvas, col quale si possono fare linee, forme, copiare bmp e
altro. Devi inoltre redere published i metodi OnMouseMove, Up e Down. Poi su
questi metodi puoi mettere il codice necessario a rendere la trackbar
editabile.
Se servono info piu' dettagliate, chiedi pure!                    {MSX}

> Ti dico come lo farei io: deriverei un componente da TGraphicControl e nel
Ed infatti è più o meno quello che avevo in mente... non è molto difficile
ma c'è da lavorarci sopra per un po'...
Cercavo magari qualcosa di già fatto... se non dovessi trovare nulla so dove
trovarti... ;)
Max Etere
maxe...@infinito.it
Newsgroup: it.comp.lang.delphi
Titolo: Porint progetto asp.net Bds2006

Un saluto a tutti.
Ho tra le mani un progetto 
asp.net
 scritto in bds2006.
Questo progetto si basa su .net 1.1 e database M$ SqlServer.
 
 
Visto che Per la 1a volta vedo un rad borland funzionare quasi peggio di un rad microsoft chiedo se esiste un modo non da kamikaze per un porting di questa cosa su qualche versione di visual studio che permette di ottenere qualcosa di FUNZIONANTE.
 
 
A.
 
 
 
 
 
 
 
 

 Visto che Per la 1a volta vedo un rad borland funzionare quasi peggio di un rad microsoft chiedo se esiste un modo non da kamikaze per un porting di questa cosa su qualche versione di visual studio che permette di ottenere qualcosa di FUNZIONANTE.
 
In questo caso, direi che "porting" è una parola molto grossa. :)
 
L'unico "automatismo" di conversione che vedo fattibile, con tutte le limitazioni del caso, è decompilare il codice e tradurlo automaticamente in C#, usando dei tool come ILSpy (
http://ilspy.net
) oppure .NET Reflector (
http://www.red-gate.com/products/dotnet-development/reflector
).
 
Comunque, trattandosi di una versione davvero molto vecchia del framework, valuterei una bella riscrittura. :|
 
Ciao,
  Marco.
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
#Home: 
http://bit.ly/marcobreveglieri
 
#Blog: 
http://bit.ly/compilaquindiva
 

 valuterei una bella riscrittura. :|
 
Condivido in toto. Ho solo fatto un tentativo estremo! :-D
 
 
A.

 Condivido in toto. Ho solo fatto un tentativo estremo! :-D
 
Lo comprendo perfettamente. :D
 
Tra l'altro, anche disassemblando, troveresti delle chiamate alle funzioni RTL di Delphi riscritte in .NET, quindi non sarebbe comunque un compito semplice da portare avanti.

Newsgroup: it.comp.lang.delphi
Titolo: FindKey su query

Ciao a tutti come faccio a posizionarmi in un determinato record di una
query senza doverla per forza scorrere tramite un ciclo?
Con una table è facile perchè imposto una Key ed untilizzo un FindKey, ma
come faccio per fare una cosa simile con una query visto che le query "in
teoria" non hanno Keyfields?
Es:
Nella qury ho due campi:  CodiceCliente, DataNascita.
Voglio sapere qual'è la data di nascita del Cliente: '43259823'
Come fare

 query senza doverla per forza scorrere tramite un ciclo?
Le query lavorano in modo diverso dalle TTable.
Il principio della query è "leggi solo i records che ti servono".
Quindi, la tua query, che presumo abbia una sintassi del tipo:
select * from tabella
la devi cambiare in:
select * from tabella WHERE CAMPO = :VALORE
Poi, vai sulla proprietà params e assegni al parametro VALORE il tipo di
dato (string, integer...).
Infine:
With TuaQuery do
begin
  ParamByName('Valore').AsQualcosa := Valore
  Open;
end;
Bye
AS

 query senza doverla per forza scorrere tramite un ciclo?
usa il metodo Locate, guarda nell'help per maggiori dettagli.
Ciao, Antò.

 Ciao, Antň.

 wrote in message
ad22jg$1def$1...@newsreader1.mclink.it...


 wrote in message
xXOI8.97088$zW3.1...@news1.tin.it...



...
Immagino che tu voglia effettuare una ricerca su uno o più campi, giusto?
Beh, il nome di quei campi vanno messi nel parametro KeyFields.
G.

Dovrebbe andarti bene la Locate, se hai D5 o superiore

 wrote in message
ad4fvj$ti054$1...@ID-106993.news.dfncis.de...


>>
Options is a set that optionally specifies additional search latitude when
searching on string fields. If Options contains the loCaseInsensitive
setting, then Locate ignores case when matching fields. If Options contains
the loPartialKey setting, then Locate allows partial-string matching on
strings in KeyValues. If Options is an empty set, or if the KeyFields
property does not include any string fields, Options is ignored.
Locate returns True if it finds a matching record, and makes that record the
current one. Otherwise Locate returns False.
Locate uses the fastest possible method to locate matching records. If the
search fields in KeyFields are indexed and the index is compatible with the
specified search options, Locate uses the index. Otherwise Locate creates a
filter for the search.
bye
AS

 Cioč?
qualsiasi nome di campo gli passi va bene, anche se non č un campo indice.
Ciao, Antň.
Newsgroup: it.comp.lang.delphi
Titolo: [OT][Scuse] utilizzo ng

Mi scuso con chi si è imbattuto in ripetuti miei messaggi di richiesta
informazioni... Ho avuto un piccolo problema con il PC
Inoltre rigrazio MassimoB nella spiegazione al messaggio "test" di The Fox
II
Io sono nuovo in questo ng anche se mi ero iscritto diversi anni fa.
Mi rendo conto però per chi è nuovo che non è sempre facile capire subito
quali sono le regole di comportamento da tenere nel ng.
Nella speranza di essere un giorno anch'io d'aiuto a qualcuno come diverse
persone fanno già ora con me .... ringrazio
Stefano LD

 diverse persone fanno già ora con me .... ringrazio
Un consiglio (che do' a tutti quelli che usano OE): scaricati OE-QuoteFix,
ti eviterai tanti rimbrotti, soprattutto sul quoting (come è successo
prima).
--
Jax
Journeying Artificial Xenomorph

Newsgroup: it.comp.lang.delphi
Titolo: Tedit+evento

Premetto che sono alle prime armi, ma ho tanta voglia di impare.
Il mio problema e' che ho diverse Tedit in sequenza, per passare da
una all'altra, dopo aver inserito un dato, dovrei usare il tasto
Invio, e fin qui tutto normale. Infatti gestendo l'evento OnKeyClick
ci siamo. Ma voglio capire se dopo aver inserito il dato e premuto
Invio voglio gestire un'azione, per esempio scrivere qualcosa in una
text, che tipo di evento si genera. Perche' ho provato nell'evento
OnKeyClick e la mia azione parte naturalmente con la pressione del
primo tasto, io invece vorrei che questa azione venga eseguita solo
con la pressione di Invio.
Grazie a tutti, non so' se sono stato tanto chiaro
Ho Voglia di Imparare

text, che tipo di evento si genera.
mi sembra di capire che non testi nella "OnKeyPress" il tasto premuto,
basterebbe testare se il tasto (scusa il gioco di parole) è l'Invio
per decidere se fare qualcosa o meno.
Se l'Invio per te equivale ad un Tab potresti usare anche la "OnExit"
del tuo TEdit, occhio agli ShortCut però...
PS: spero tu abbia usato la proprietà "KeyPreview" della Form per
gestire il tuo Invio stile Tab...
Ciao



OnKeyPress scusa
io testo ad esempio if Key = #13 then .....
ma questo mi serve per trasformare invio in tab
OnExit propietà di TEdit vuol dire quando esce dal controllo quindi?
grazie

OnExit propietą di TEdit vuol dire quando esce dal controllo quindi?
OnExit si verifica quando il controllo perde il focus.
Ciao

 Ho Voglia di Imparare
Una soluzione elegante consiste nel derivare da tedit, crearti una property
published che controlli la gestione del tasto invio se seleziona il
prossimo controllo o meno, ad esempio.
Usa l'ereditarietà e incapsula la logica nel componente: così facendo lo
potrai riutilizzare senza bisogno di aggiungere logica nei form.
-- 
Morde


A questo ancora non ci arrivo
grazie comunque
cerco di studiare qualcosa in piu'

 cerco di studiare qualcosa in piu'
Parti da questo articolo,
http://delphi.about.com/od/vclwriteenhance/l/aa120603a.htm
scarica il codice e studialo, vedrai che non e' tanto difficile approcciare
la programmazione OO..
:-)
-- 
Morde
Newsgroup: it.comp.lang.delphi
Titolo: Istallazione BDE

Scusate, forse mi sto' perdendo in un bicchier d'acqua....
Ho la necessita' di istallare il BDE (delphi 5) ma senza usare 
installshield od altro. Qualche anima pia mi puo' spiegare come fare ad 
installare il BDE "a mano"?
Grazie

 installare il BDE "a mano"?
Forse non ho compreso bene la domanda, ovvero non mi ï¿œ chiaro se ti 
riferisci a windows installer in generale.
Vedi se questo puï¿œ esserti di aiuto in qualche modo:
http://www.jrsoftware.org/iskb.php?bde
-- 
Design for the future, because it will be here sooner than you think.
(C) Eric S. Raymond, from "The Art of Unix Programming"

cerca con googole 'bdeinfosetup '
lancia l'eseguibile e... fatto
dovessi non trovarlo te lo posso inviare io
gcaramia

:_Recipient_address_rejected:_User_unknown/Giving_up_on_212.97.34.36./
Saluti,
Fritz 

 di tanto utile.
Si lo so se vuoi il mio indirizzo e' microges[chiocciola]
email.it
  grazie

Newsgroup: it.comp.lang.delphi
Titolo: D4 standard e Access

Come si accede da un applicazione scritta con D4 standard ad una tabella
access?
Nel momento in cui imposto la proprietą TableName in design-time mi chiede
username e password e onestamente non so cosa fare
Grazie
-- 
Posted from 
smtp2.libero.it
 [193.70.192.52] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Ciao,
  Componente tDatabase con loginprompt := False
la tabella come proprieta database ci metti il tDatabase
 
  Marco
Come si accede da un applicazione scritta con D4 standard ad una tabella
access?
Nel momento in cui imposto la proprietą TableName in design-time mi chiede
username e password e onestamente non so cosa fare
Grazie
-- 
Posted from 212.177.57.193 by way of 
mailweb5.inwind.it
 [212.141.54.115] 

Newsgroup: it.comp.lang.delphi
Titolo: Tfirebird bel pasticcio con Numeric (size,scale) e Delphi

Buon giorno a tutti.
(Utilizzo i control interbase di delphi)
NON pensavo che usare i campi NUMERIC mi provocasse enormi problemi di
calcolo.
Ho definito con FB 3 campi (peso,cto, importo) come Numeric(9,2) in quanto
avevo bisogno della precisione a due decimali.
Mi capita questo
il peso viene calcolato in precedenza e ha  un valore 1,086 (086 sono
decimali) che giustamente un volta scritto diventa 1,09
Cto =90.5 quindi importo = 1,09 * 90.5 = 98.65 invece memorizza 98,28
Faccio il debug del codice e mi accorgo che questo avviene perché il peso
viene arrotondato solo dopo la scrittura su disco da 1,086 a 1,09.
In memoria utilizzo il valore fieldbyname('peso').asfloat che è ancora 1,086
e quindi
importo = 1,086 * 90.5 = 98.28 che è il valore memorizzato.
L'help dice che delphi converte i valori NUMERIC(x,y) in currency con almeno
per quanto riguarda TIBBCDField . riporto pari pari
TIBBCDField encapsulates the Currency type. Despite the name, TIBBCDField
does not represent a BCD value. Rather, TIBBCDFields represent InterBase
Numeric(x, y) fields, where x < 18 and y <= 4.
 quindi ho provato a usare ascurrency. NON cambia niente in quanto
l'arrotondamento lo esegue solo dopo la memorizzazione.
Non mi dite che devo eseguire io da programma l'arrotondamento con una
routine
perché in questo caso devo eseguire la modifica su una procedura abbastanza
grossa inoltre ho il problema che in alcuni casi ho numeric (9,0) - numeric
(7,2) - numeric (9,3) ecc. e quindi (a meno che non ci sia modo di sapere da
codice il nr di decimali c'è il rischio di combinare un bel pasticcio
eseguendo arrotondamenti errati.
Ho visto che eseguendo il post dopo avere memorizzato i calcoli nei field mi
esegue gli arrotondamenti quindi i valori letti con ascurrency per eseguire
ulteriori calcoli sono esatti, ma se dopo ogni assegnazione di un valore
devo fare post/edit per eseguire un calcolo successivo ho un continuo
passaggio di dati tra client e server che serve solo ad intasare la rete.
Vi scongiuro ditemi che c'è un altra strada.
Grazie a tutti.
Guido.

 con una routine
Una RoundTo dovrebbe essere sufficiente,  peso:=RoundTo( perso, -2);
-- 
Ciao!
Marco Kregar
marco....@FirebirdSQL.it
www.FirebirdSQL.it
"over the bench the goat sings, under the bench the goat dies"
Newsgroup: it.comp.lang.delphi
Titolo: [Semi OT] Domande su strategie per ricerche indicizzate

Ciao a tutti,
volevo condividere con voi qualche opinione su come ottimizzare le
ricerche su una tabelle paradox (solo ricerche, no ins/del).
Piattaforma: D5 con limitazioni sull'utilizzo del BDE.
Ammettiamo di avere una tabella paradox opportunamente indicizzata.
Non posso usare una TQuery (per vari motivi), quindi le ricerche si
debbono fare solo con Filter/Filtered.
Ecco un esempio di record contenuti nella tabella
campo1 | campo2 | campo3
------------------------
0001   | AA     | 15
0001   | AA     | 21
0001   | PP     | 15
0001   | PP     | 21
0099   | AA     | 61
0099   | AA     | 21
La chiave primaria e' campo1+campo2+campo3
Questa tabella e' generata da questi 2 record, dove campo1 e' univoco:
campo1 | campo2 | campo3
------------------------
00001  | AA,PP  | 15,21
00099  | AA     | 61,21
La tabella pdx e' stata generata per poter cercare i singoli spezzoni
"AA" etc, in quanto il parametro Filter non accetta query del tipo
"*AA*
La mia domanda e' questa: se io volessi cercare tutti i record che
contengono sia "AA" che "PP", come posso fare ?
La mia soluzione e' questa: cerco tutti i record della tabella pdx che
contengono "AA"; memorizzo il campo1; cerco tutti i record che
contengono "PP"; confronto i record ottenuto con quelli che avevo
memorizzato in precedenza.
Secondo voi c'e' una soluzione migliore ? (= + efficiente)
Grazie per la pazienza ;) e scusate l'OT se e' tale
Fulvio
================================================================================================
To reply, remove LEVAME
My digital photos: 
http://www.alecab.it/cai

memorizzato in precedenza.
Se ho capito bene....
Nella funzione OnFilterRecord potresti fare una cosa del genere:
Accept := (Pos('AA', Campo.AsString) <> 0) and (Pos('PP', Campo.AsString) <> 0);
Ciao,
Massimo.
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"

Massimo.
Ciao e grazie.


che funzionino per velocizzare le ricerche.
Sě, in effetti se non riesci a prefiltrare in qualche modo il dataset ho paura
che senza uso di query la tua soluzione sia migliore. 

Newsgroup: it.comp.lang.delphi
Titolo: tbitmap e conversione rgb

ciao a tutti...
sono nuovo del forum e nuovo anche nella programmazione delphi...
sto impazzendo con una cosa...
vi spiego cosa devo fare cosi facciamo prima :)
ho un file .bin (so che e' formato bitmap) da 10 giga....
e',come avrete capito, un file di mappa... (tutto il mondo)..
so che e' di dimensioni 384000x192000....
io dovrei dividerlo in n file bitmap da 256x256...
sinceramente nn so neanche da che parte cominciare...
ho fatto un esperimento... partendo da un file bmp invece che quel bin
enorme...
procedure TForm1.crea_bitmap(var bitmap:tbitmap;x,y:integer);
begin
  bitmap:=tbitmap.Create;
  bitmap.PixelFormat:=pf24Bit;
  bitmap.Height:=x;
  bitmap.Width:=y;
end;
procedure TForm1.Button2Click(Sender: TObject);
var
  smallbitmap,bigbitmap:tbitmap;
begin
  crea_bitmap(smallbitmap,256,256);//creo il tbitmap
  bigbitmap:=TBitmap.Create;
  bigbitmap.LoadFromFile('c:\a.bin');// carico il file grande
  for y:= 0 to bigbitmap.Height-1 do
  begin
    p:=bigbitmap.ScanLine[y];   
    for x:= 0 to 255 do
    begin
      r:=p[x*3];//ricavo codice red
      g:=p[x*3+1];//ricavo codice geen
      b:=p[x*3+2];//ricavo codice blue
      smallbitmap.Canvas.Pixels[x,y]:= rgb(r,g,b);disegno il pixel uguale
    end;
  end;
  salva_bitmap(smallbitmap,'c:\small.bmp');//salvo il file
end;
ora.. sta roba sembra funzionare.. pratikamente da un file bitmap di 500x500
mi copia un pezzo e lo salva in un file bitmap di 256*256
ora.. come faccio a fare la stessa cosa con un file di 10 giga formati bin?
come leggo un singolo pixel e come ne ricavo l'rgb?...
vi ringrazio di cuore..
ciao ciao
andrea
--- posted by geoForum on 
http://www.delphiedintorni.it

 ha scritto nel messaggio 
news:439jihF...@individual.net...


ma col timage posso leggere un file un po alla volta?.....
cioe' senza dovermi caricare i 10 giga vero?
hem..
nn e' che mi scriveresti un esempio?...
scusami...:(...
ti ringrazio...


io dovrei dividerlo in n file bitmap da 256x256...
Pensare di poter caricare in memoria l'intero file e poi spezzettarlo
è un'idea folle.  Devi lavorare a livello di struttura del file.  Il
formato Bitmap di Windows ha una struttura molto semplice (si complica
un po' - ma solo un po' - se subisce la compressione RLE).  A te basta
leggere ciascuna delle 192000 linee, a gruppi di 256 byte (1500
letture per riga) e popolare il file bitmap adeguato.  Avrai, alla
fine, (384000x192000)/(256x256)=1500x750=1125000 file.  Procurati un
buon server.

 ha scritto nel messaggio 
news:439t5cF...@individual.net...


No se e' da 10 Gb ritiro quanto detto...
Giorgio, quota corretttamente, please.

fine, (384000x192000)/(256x256)=1500x750=1125000 file.
--- posted by geoForum on 
http://www.delphiedintorni.it

cosa e come uso per leggere il file enorme?(tfilestream?)
Sì.

Sě.

Newsgroup: it.comp.lang.delphi
Titolo: Contenuto Webbrowser

Usando il componente Webbrowser scarico una pagina dalla rete e grazie al 
codice postato lo trasferisco in un Memo così da potere utilizzare salvare e 
modificare il contenuto.
procedure TDownloadDlg.WebToMemo;
var
  Doc: IHTMLDocument2;
  Body: IHTMLBodyElement;
  TextRange: IHTMLTxtRange;
begin
  Doc:= WebBrowser1.Document as IHTMLDocument2;
  Body:= Doc.body as IHTMLBodyElement;
  TextRange:= Body.createTextRange;
  Memo1.Clear;
  Memo1.Lines.Append(TextRange.htmlText);
end;
quando però ricarico la pagina, senza fare nessuna maodifica, spesso non 
ottengo più la stessa cosa.
Esiste qualche metodo per salvare tutta la pagina arrivata?
Grazie 

hai gia visto la execCommand di TextRange?
AS

 ha scritto nel messaggio 
news:1123597945.6...@g14g2000cwa.googlegroups.com...


Gli oggetti che ho usato sono nella unit "mshtml".
Come si può ottenere aiuto su questi componenti? 

1) aprire un browser
2) digitare 
www.google.it
 e premere invio
3) nel campo della ricerca digitare "IHTMLTxtRange"
4) cliccare sul primo link che viene fuori
5) scorrere la pagina in basso e cliccare sul link "execCommand"
6) cliccare sul link evidenziato "command identifiers"
7) scorrere la lista fino a trovare quello che ti serve
AS

Dimenticavo...
Gli oggetti NON SONO NELLA UNIT MSHMTL.
Quella è solo una descrizione della interfaccia.
Gli oggetti che usi sono i COM che incapsulano la logica di
funzionamento di IE....
Gli stessi metodi potresti usarli istanziando i relativi COM usando
CREATECOMOBJECT, avendo pero la rottura di scatole di avere il
cosidetto late binding.
AS

Grazie
Cercherň di trarre il massimo dai tuoi suggerimenti
Ciao 

Grazie 
	Ciao
	MassimoB
 
---------------------------------
http://www.massimobeschi.it/
---------------------------------
Se tu pagare come dici tu ...
Io lavorare come dico io ...
Se tu pagare come dico io ...
Io lavorare come dici tu ...
---------------------------------

Newsgroup: it.comp.lang.delphi
Titolo: Compattare tabelle dbf

Potete indicarmi il codice per compattare tabelle dbf e precisamente DBASE IV ?
Oppure un componente ?
Grazie Gian Luca
-- 
Posted from  [62.98.54.6] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Oppure un componente ?
Nell'help di delphi( più precisamente del bde) se cerchi pack trovi un
esempio già pronto
Saluti

 esempio già pronto
Grazie ;-)
-- 
Posted from  [62.98.134.12] 

Newsgroup: it.comp.lang.delphi
Titolo: Menù su applicazione MDI

Salve, sto realizzando un'applicazione MDI con menů sia sulla MainForm
sia su tutte le MDI Child.
Nella MainForm non ho avuto problemi a inserire il menů, mentre nelle
MDI child a design-time funziona, ma a run-time si posiziona dove si
trova il menů della MainForm nascondendo quest'ultimo. Come posso
risolvere il problema?
Grazie in anticipo.
Alessandro

 Alessandro
prova:
Nella finestra child, seleziona il menu, apri l'editor, selezioni il 
primo meno a sinistra e metti la proprietà "groupindex" ad 1.
ciao
-- 
------------------------------------
Per rispondere in privato togliere:
ADD1975

 ciao
Adesso il menù della child viene visualizzato accanto al menù della
form principale invece di nasconderlo, però vorrei che il menù della
child rimanesse sulla child.
Saluti.
Alessandro

Newsgroup: it.comp.lang.delphi
Titolo: Embedding cursors

Salve a tutti.
Ho questo piccolo problemuccio:
Voglio aggiungere alla mia applicazione due miei cursori che sino ad ora  
ho caricato runtime da due file distinti e separati. Ho proceduto in due  
modi senza ottenere alcun risultato.
Modo 1.
ho creato un file di testo VisualRes.rc con all'interno queste due righe
MANINAAPERTA CURFILE C:\WorksInProgress\RisorseCondivise\ManinaAperta.cur
MANINACHIUSA CURFILE C:\WorksInProgress\RisorseCondivise\ManinaChiusa.cur;
da questo file ho quindi ottenuto il file .res che ho copiato nella  
cartella della unit dove ne ho bisogno.
Modo 2.
Con un il programma ResEdit 1.4-win32 ho creato il file .res inserendovi i  
miei due cursori.
Una volta ottenuto il file .res, in Delphi (2009 su WinXP):
- ho aggiunto {$R VisualRes.res} nella unit dove utilizzo i due cursori
- Nell'OnCreate della form ho scritto
   Screen.Cursors[101] := LoadCursor(HInstance, 'MANINAAPERTA');
   Screen.Cursors[103] := LoadCursor(HInstance, 'MANINACHIUSA');
   VisScrollBox.Cursor := 101;
In cosa sbaglio?
Grazie
Fra.


Dunque... crea il file (.res) di risorse normalmente, poi includilo nel 
tuo progetto mettendo la dicitura {$R <nome file>.res} dopo la clausola 
implementation della tua form principale (o dove userai queste risorse) 
- sotto la dicitura {$R *.DFM} per intenderci ed alla fine compila il 
tutto. Ora le risorse sono linkate all'interno della tua applicazione.
Per usarle usa:
Screen.Cursors[<numero cursore>] := LoadCursor(hInstance,'<nome cursore>');
esattamente come hai fatto tu
Tieni presente di associare il nome giusto ai cursori (ma mi pare che lo 
hai fatto)
bye

 'MANINACHIUSA');
In questa procedura non vedo nulla di sbagliato.
L'unico dubbio č il nome del file passato nella clausola $R, 
che
č CASE SENSITIVE: sei certo che il nome sia VisualRes.res, 
con quelle
maiuscole e quelle minuscole?
Ciao
ACSH 
--- news://
freenews.netfront.net/
 - complaints: 
ne...@netfront.net
 ---
Newsgroup: it.comp.lang.delphi
Titolo: [Delphi 5 + ADO] oggetto TADOCommand

Spero che qualcuno di voi mi sappia indirizzare sulla retta via :)
Io ho il mio oggetto TAdoCommand nel suo bel DataModule, viene popolato con
una insert e settati il tipi dei rispettivi parametri.
Ora il problema nasce quando in un loop vado ad eseguire ripetutamente la
Query contenuta nel Oggetto Ado, nel loop non riesco a ripristinare il
valore dei parametri ora: esiste un metodo che mi consente di ripristinare
la query come nella fase iniziale ?


Ceh io sappia, non c'e': devi salvarti i parametri e ripassarli all' adocommand.
--
Buon      .-""",
 Natale    /____, \
          {_____}`{} 
Buone    (/ . . \)
 Feste   {`-=^=-`}
         {   `   }
          {     }jgs
Morde.     `-,-`
Newsgroup: it.comp.lang.delphi
Titolo: Http

Cercavo un componente che mi permettesse di collegarmi ad una pagina web e
mi ritornasse in una stringa il contenuto testuale della pagina (source).
Fra i componenti gia' installati in Delphi c'e' ne e' una che puo' andar
bene?
Grazie

 ha scritto nel messaggio
news:909981344.66740@fire-int...


Se vai su Torry.net c'č freeware "HTTP Get" della UtilMind, se non erro č
fatto proprio per fare quello che ti serve.
Ciao,
  Fabio

 FPIETTE
Belga, e' belga, non francese (anche se credo sia d'etnia francofona).
Saluti
Paolo Arosio

Newsgroup: it.comp.lang.delphi
Titolo: Componenti per cattura video

Salve.
Avrei bisogno di componenti per la cattura video (anche commerciali).
Avreste qualche consiglio da darmi?
Ho dato un'occhiata ai MultiMedia Tools, ma per quanto riguarda il video 
ho notato che eseguono solo riproduzioni.
Grazie per l'attenzione.
Kayn.

 Grazie per l'attenzione.
Prova a vedere nella jvcl.
-- 
Morde. 
FAQ di icld (beta-version): 
http://icld.altervista.org
 
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 Avrei bisogno di componenti per la cattura video (anche commerciali).
Cerca su 
sf.net
, c'e' una suite abbastanza buona per l'acquisizione da
periferiche analogiche.
Per DV ed altre fonti digitali puoi usare DSPack.
-- 
I am what I am, I do what I can
Vuoi supportarmi? 
http://url.repository.biz/go/3E
Do. Or do not. There is not try.

Grazie mille a tutti per l'interessamento.
Kayn
Kayn ha scritto:


Newsgroup: it.comp.lang.delphi
Titolo: Copia-Incolla

Non capisco una cosa: il copia/incolla di windows funziona benissimo
in tutti i campi di tipo testo (edit, memo, etc) con i comandi Ctrl+C
e Ctrl+V.
Però se io voglio visualizzare il classico popup menù per fare questa
cosa non funziona più :-((
Mi spiego meglio: inserisco un popup menù nella mia form piena di edit
e di memo e al suo interno creo 2 voci (Copia e Incolla) con i suoi
ShortCut (Ctrl+C e Ctrl+V). Assegno il campo PopumMenu della form con
il popup appena creato e la funzione copia/incolla di windows non
funziona più. Nelle altre form invece funziona benissimo.
Qualcuno sa spiegarmi perchè?
Devo sviluppare gli eventi on-click delle 2 voci di menù? Se sì come
devo fare? Devo fare un popup per ogni campo edit e memo della form?
Ditemi di no...

 Qualcuno sa spiegarmi perchè?
i campi testo hanno già di default il loro popup con copia/incolla, non
c'è bisogno di assegnare nessun popup "alla form", basta cliccare col
tasto destro sul contenuto di un campo e scegliere, appunto, copia o
incolla.
Ale

 Ale
A me fa il copia/incolla con la combinazione di tasti (Ctrl+C/Ctrl+V)
ma con il pulsante destro del mouse non mi viene fuori nulla..


Ho capito: bisogna assegnare tramite ActionList le "StandardAction"
riguardanti il menù Edit. A quel punto fa gestisce tutto da solo.

 ma con il pulsante destro del mouse non mi viene fuori nulla..
io se clicco col tasto dx all'interno di una casella tedit, tdbedit,
tmemo, ecc. mi appare il menů di Win, con opzioni: annulla, taglia,
copia, incolla, elimina, seleziona tutto, ecc. ecc.
Ale
Newsgroup: it.comp.lang.delphi
Titolo: Senza installazione del BDE

Navigando, ho trovato un setup che, se ho capito bene, evita a chi 
distribuisce delle applicazioni con BDE di usare un installatore che sappia 
cosa includere (io, per esempio, usavo una vecchia versione dell'installer 
distribuito a suo tempo con Delphi) . Praticamente si avvia un .exe una 
tantum (che non so cosa installi), e la nostra applicazione si potrà 
installare senza preoccuparsi del BDE. Qualcuno ne ha sentito parlare e l'ha 
usato ?
Per provarlo, devo trovare un PC che non abbia il BDE installato, dopodichè, 
se vi interessa, saprò dirvi qualcosa. 
 

 dopodichè, se vi interessa, saprò dirvi qualcosa.
 
Invece di cercare un PC, una macchina virtuale (magari virtualbox) non
farebbe al caso tuo?
 
-- 
morde
Android
QT 4.7
Delphi (5,6,7.. expired)
Firebird Database
 

 
 
"Morde"  ha scritto nel messaggio news:l2tpcm$ji$1...@speranza.aioe.org...

Può darsi, ma non la conosco ...

Newsgroup: it.comp.lang.delphi
Titolo: TImage, Tbitmap e sprites

Sto provando a scrivere un programmino di scacchi.
 
Vorrei gestire scacchiera e pezzi (il drag'n'drop, l'evidenziazione 
delle caselle ecc.) solo con la VCL senza ricorrere a cose più 
sofisticate e complesse: sul mio PC le prime prove funzionano benino, 
sia pure un pochettino scattose. E io ho un quadcore a 3,3GHz + sk 
grafica tosta, quindi un sistema piuttosto veloce... certo, certo, 
sicuramente devo riscrivere il codice in modo da renderlo efficiente, 
queste sono solo le prime prove. Per ora non ho usato TImagelist, per 
esempio (mi conviene farlo o rimanere con un array di TBitmap?)
 
Ma migliorare di quanto? Quanto posso aspettarmi che vada bene il codice 
grafico, una volta ottimizzato? Girerà bene su sistemi più vecchi o meno 
carrozzati? In generale che prestazioni offre la VCL per operazioni di 
grafica 2D come queste, non troppo spinte? Non vorrei perdere tempo su 
una cosa che non funzionerà mai veramente...
 

 per operazioni di grafica 2D come queste, non troppo spinte? 
 
per spostare una singola png (la pedina) di un pò di pixel non c'è
bisogno di scomodare schede grafiche potenti, soprattutto con i
computer di oggi (e pure con quelli di ieri).
Piuttosto, usa il multithreading se vuoi avere animazioni fluide.
Meglio evitare i classici timer.
 
-- 
Alessandra
 
Il clero sa ch'io so che loro sanno di non sapere - Robert Green
Ingersoll

 Piuttosto, usa il multithreading se vuoi avere animazioni fluide.
 
Proverò.
 
Il sospetto m'era venuto perché app grafiche con Delphi + VCL se ne 
vedono assai poche... e allora uno si chiede come mai...

 vedono assai poche... e allora uno si chiede come mai...
Passa su QT che ha un framework grafico potente e semplice. :-)
Scherzi a parte.. il supporto di delphi alla grafica è sempre stato 
scarso quindi cerca di fare qualcosa arrangiandoti con quello che hai, 
come ti ha suggerito Alessandra.
 
-- 
morde
Android
QT 4.7
Delphi (5,6,7.. expired)
Firebird Database