mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Come posso far lampeggiare i led della tastiera

Mi servirebbe sapere come poter accendere e spegnere i tre led della
tastiera, se qulcuno potrebbe darmi una mano, ne sarei riconoscente.
Ciao a Tutti Alfio
Alf...@hotmail.com

Ciao a Tutti Alfio
ti ho preparato questo codice:
=====================================
var KeyState:TKeyBoardState;
begin
  GetKeyBoardState(KeyState);
  if GetKeyState(VK_CAPITAL) = 0 then
   KeyState[$14]:=1
  else KeyState[$14]:=0;
  if GetKeyState(VK_SCROLL) = 0 then
   KeyState[$91]:=1
  else KeyState[$91]:=0;
  if GetKeyState(VK_NUMLOCK) = 0 then
   KeyState[$90]:=1
  else KeyState[$90]:=0;
  SetKeyBoardState(KeyState);
end;
=====================================
$14, $91 e $90 sono i valori esadecimali che identificano il tasto.
Oltre al tasto, identificano l'elemento dell' array contenuto nel record
"TKeyBoardState" (che dovrebbe essere definito nella unit Windows )
Questi valori li puoi trovare nell' SKD alla sezione "Virtual-Key Codes"
dove ci sono elencate le costanti di ogni tasto nella forma "VK_NomeTasto"
ed accanto trovi il valore esadecimale e il tasto corrispondente.
Il codice che ho scritto, lo dovrai inserire dentro un timer.
Il timer esegue il codice e ti fa lampeggiare i led della tastiera.
Ah....un' ultima cosa !!
Per far lampeggiare i led, il codice si basa sull' attuale stato dei led.
(acceso o spento 1/0 )
Se uno dei led è acceso e gli altri due sono spenti, ti capiterà che mentre
lampeggiano, due sono accesi e
l' altro è spento (e viceversa). (insomma non sono sincronizzati)
Per risolvere il problema puoi settare lo stato dei tre led prima di avviare
il timer.
Setta lo stato di tutti e tre allo stesso modo, così lampeggieranno
sincronizzati.
Il codice io l' ho scritto al volo. Puoi sistemalo come vuoi tu, guardati
pure se ci sono altre API .... fai come
vuoi !!
N.B. Fatto questo, passa in un negozio di elettronica e compra tre led di
ricambio. Sai....quando lampeggiano si potrebbero fulminare dopo un po' !!
heeh
Ehi.....scherzo !! :-)))
Ci sentiamo e buon lavoro.
Ciaoooo !!!
Antonio Tarolla
BSSoftware Tips Mailing - List Support

 tastiera, se qulcuno potrebbe darmi una mano, ne sarei riconoscente.
Ecco qua, il tutto si basa su Get/SetKeyBoardState che riempie una struttura
(un array 0..255 di bytes) con lo stato attuale dei tasti...
var Tastiera:Tkeyboardstate;
begin
 GetKeyBoardState(Tastiera);
  Tastiera[VK_CAPITAL] := 1;
  Tastiera[VK_NUMLOCK] := 1;
  Tastiera[VK_SCROLL] := 1;
 SetKeyBoardState(Tastiera);
ShowMessage('Adesso li spengo');
 GetKeyBoardState(Tastiera);
  Tastiera[VK_CAPITAL] := 0;
  Tastiera[VK_NUMLOCK] := 0;
  Tastiera[VK_SCROLL] := 0;
 SetKeyBoardState(Tastiera);
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: Da colori LAB a RGB





Qualcuno conosce qualche algoritmo per 
convertire un colore LAB in RGB?



Ciao,
Qui c'è qualcosa...mi sa che devi fare un doppio passaggio
CIE-L*ab -> XYZ -> RGB
http://www.easyrgb.com/math.html
bye Max
Newsgroup: it.comp.lang.delphi
Titolo: [OT] : Scaricare dalla DSP...

Un saluto a tutto il NG e scusate l'Off topic...
Volevo chiedere se qualcuno di voi ha dei problemi con la DSP, io non riesco
a scaricare quasi nulla, compaiono sempre messaggi di errore.
E' un problema mio? Vi risulta che stiano facendo delle modifiche al sito
per cui certi link non sono 'momentaneamente' attivi?
Grazie!
Ciao
--
- Carlo -

 ha scritto nel messaggio
news:_Z_c5.8959$z%4.10...@news.infostrada.it...


finalmente puoi fare il download...
Grazie per l'aiuto, proverņ come hai detto.


Newsgroup: it.comp.lang.delphi
Titolo: Problema con query e Driver MS ODBC per Oracle

Salve a tutti,
anche se il problema è + direttamente inerente a tematiche di DB spero
in un vostro aiuto.
Allora eseguo una query con un componente THstmt: la query è una
semplice "select Max(campo) from Tabella".
La connessione THdbc è collegata ad un driver Microsoft ODBC per
Oracle.
Il DB è Oracle 9.2
Il problema è che se il valore massimo (di tipo Number) è < di 127 va
tutto ok, se invece è >127 mi dà eccezione: '[Microsoft][ODBC driver
for Oracle]Error in row 1'.
Cosa dovrei fare: cambiare driver ODBC?
cambiare il tipo di campo?
Tra parentesi chiedo un consiglio da principiante: questa query mi
serve per inserire in una tabella i log mettendo come chiave un valore
ID uguale al massimo presente +1. E' un modo corretto di agire o è
meglio trattare il problema in un altro modo?
Grazie mille dell'aiuto
Ciao 
Matteo


Non è certo il metodo migliore. Quando nel tuo log avrai 1.000.000 di record
sai quanto ci metterà a fare il MAX ?
La cosa migliore in questo caso è usare una sequence.
Nel tuo script SQL creerai una sequence:
CREATE SEQUENCE seq_log START WITH 1 INCREMENT BY 1;
La tua query diventerà:
SELECT seq_log.nextval FROM dual;
e impiegherà sempre un tempo infinitesimale per essere eseguita.
Per l'altro problema, il fatto che il valore limite sia 127 mi da molti
dubbi, forse mettendo il tipo di campo a Integer il problema si risolve.
Ciao
Giuseppe Garzotto
--- posted by geoForum on 
http://www.delphiedintorni.it


Scusami per il ritardo nei dovutissimi ringraziamenti: ora è tutto a
posto e molto + corretto!
Ciao e grazie per il consiglio
Matteo
Newsgroup: it.comp.lang.delphi
Titolo: icona nella systray

Vorrei che quando il programma è ridotto a icona apparisse l'icona solo
nella systray
Grazie a chi vorra darmi qualche suggerimento
Alessandro

Intanto guarda un po' sulle FAQ

 ha scritto nel
messaggio news:QMmP8.120435$g04....@tornado.fastwebnet.it...

Ciao.
Scarica il componente CoolTrayIcon vers. 4: è freeware e lo trovi su
http://it.torry.net
La particolarità di questo componente sta nel fatto che supporta i "Balloon
Tips" di Windows XP, quindi puoi far sì che accada qualcosa quando clicchi
sul fumetto.
Ciao.
Matteo Riso
www.zipgenius.it

 ha scritto nel messaggio
news:fYqP8.28761$Kt3.7...@twister2.libero.it...


 ha scritto nel
messaggio news:QMmP8.120435$g04....@tornado.fastwebnet.it...

Io, uso questo metodo:
In PRIVATE section dichiara
TrayIconData: TNotifyIconData;
procedure TrayMessage(var Msg: TMessage); message WM_ICONTRAY;
nella FormCreate (o dove ti pare) metti:
        with TrayIconData do begin
                cbSize := SizeOf(TrayIconData);
                Wnd := Handle;
                uID := 0;
                uFlags := NIF_MESSAGE + NIF_ICON + NIF_TIP;
                uCallbackMessage := WM_ICONTRAY;
                hIcon := Application.Icon.Handle;
                StrPCopy(szTip, Application.Title);
        end;
        Shell_NotifyIcon(NIM_ADD, @TrayIconData);
Nel FormExit o destroy o quando vuoi:
Shell_NotifyIcon(NIM_DELETE, @TrayIconData);
Nel Form metti:
//--------------------------------------------------------------------------
----------------
procedure lamiaTform.TrayMessage(var Msg: TMessage);
//--------------------------------------------------------------------------
----------------
var
  CursorPos : TPoint;
begin
  case Msg.lParam of
    WM_LBUTTONDOWN:
    begin
      //ShowMessage('Left button clicked - let ''s SHOW the Form!');
      TRC.Show;
    end;
    WM_RBUTTONDOWN:
    begin
        GetCursorPos(CursorPos);
        PopupMenuClient.Popup(CursorPos.x, CursorPos.y); // se presente.....
:)
    end;
    else
        inherited;
  end;
end;

Newsgroup: it.comp.lang.delphi
Titolo: Componente particolare cercasi

Ciao,
avrei bisogno di un bottone tipo il tasto "Back" dei browser, quindi con 
bottone e freccina a fianco. So che tempo fa qualcuno aveva dato qualche 
indicazione in merito ma non riesco a ritrovarla (vorrei evitare di 
rifarlo, se esiste già).
Riuscite a darmi qualche dritta su dove poterlo trovare (o se per caso 
ha un nome tecnico)?
Grazie mille.
Fabio

 rifarlo, se esiste già).
un semplice BitBtn con un Glyph appropriato...
-- 
Mauro Falzari 
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

 
Forse mi sono spiegato male.
A me serve un bottone che abbia la freccina a lato che fa comparire un 
menù. Quindi un bottone che sia un bottone e che abbia ANCHE la 
possibilità di far comparire un menù.
Ad esempio il pulsante 'Back' di IE o di FireFox.
Non so come spiegarlo meglio.
Fabio

menù.
Il TToolButton ha la proprietà Style impostabile su tbsDropDown.


Grazie mille
Fabio
Newsgroup: it.comp.lang.delphi
Titolo: Componenti Delphi

Salve ragazzi,
sapete elencarmi dei siti che producono componenti free per delphi (oltre a
www.maxcomponents.net
, ovviamente), grazie a tutti...
Lorenzo

Lorenzo Villani wrote:

http://www.torry.net
http://delphi.icm.edu.pl/
-- 
I'am what I'am, I do what I can

Newsgroup: it.comp.lang.delphi
Titolo: Nuova Griglia per FM

Il primo dell'anno trovo un'annuncio di un produttore di cui stiamo 
usando un suo componente per QT: una griglia molto simile (se non 
migliore) alle famose devexpress.
La buona notizia č che l'api cross platform (o cross compiling, a 
seconda dei gusti..) di Firemonkey incomincia ad attrarre i produttori: 
infatti per il primo quarto del 2012 č previsto un porting su FM della 
griglia in questione.
 
http://www.devmachines.com/home/123-roadmap-for-2012-year.html
 
 
La portability č diventata quasi d'obbligo oggi come oggi dove se non 
fai una versione dl tuo software per tablet, ipad o smartphone sei quasi 
tagliato fuori dalla maggior fetta del mercato end user.
 
Saluti e buon anno a tutti.
 
-- 
morde
QT 4.7
Delphi (5,6,7.. expired)
Firebird Database
 

 quasi tagliato fuori dalla maggior fetta del mercato end user.
 
non tutti i sw sono adatti a girare su smartphone. E poi la gente li
cerca gratis o a prezzi stracciatissimi (ho visto un gestionale (si fa
per dire) magazzino (si fa per dire) per Ipad a 2,99 euro.. il
programmatore avrà già comprato la seconda villa in Costa Azzurra..)
 
-- 
Alessandra
 
Per te io sono ateo, ma per dio io sono una leale opposizione - Woody
Allen


 
Sono d'accordo che il gestionale su ipad (o tablet che dir si voglia, a 
me piace android) per quello che fa dataentry di bolle, fatture, sia 
inutile.
Tuttavia su un classico client server, non è male costruirci una app per 
il commerciale, il rappresentante, il capo, che va a guardarsi i dati 
delle vendite, fa statistiche, query, ecc.
Il tablet per questo tipo di uso è ottimale ;)
 
Non mi stupirei se quest'anno incominceranno ad uscire versioni per 
ipad/android dei gestionali più popolari.
 
ciao


 ipad/android dei gestionali pi� popolari.
 
Per curiosit� sono andato a googlare e ho trovato riscontri con quanto 
da me appena ipotizzato:
http://tiny.cc/zucc_ipad
 
http://tiny.cc/passepart_tablet
 
 
PS: � chiaro che magari sono dei semplici appserver o webserver 
aspnet/java, ma questo cmq non sminuisce le potenzialit� di un'app per 
tablet perfettamente integrata con il tuo sistema di vendite.
Interessante sar� vedere con quanta velocit� FM incomincer� ad arruolare 
sviluppatori, sia dal lato delphi che da freepascal.

Newsgroup: it.comp.lang.delphi
Titolo: Delphi e array dinamici

Scusate la banalità della domanda, ho capito che il tipo array dinamico in
delphi si dichiara ad esempio così :
TVettore  = Array of TRecord;
Ora in c++ se volevo aggiungere un elemento al vettore usavo l'operatore
new,
Mi date un esempio per la sintassi in delphi?
Grazie mille
Antonio.
-- 
uno standard deve essere standard. windows non e` uno standard, e` solo
un OS molto diffuso.

 Mi date un esempio per la sintassi in delphi?
Puoi usare la procedure *SetLength* che permette di ridimensionare il 
vettore allocando lo spazio necessario a contenere il numero di elementi 
specificati.
Generalmente, io preferisco usare la classe TList al posto di vettori 
dinamici: sebbene, sotto sotto, anche la lista sia implementata come un 
vettore, l'interfaccia di programmazione mi risulta di gran lunga più 
comoda e intuitiva.
Fai attenzione all'uso dei vettori dinamici, magari leggendo un po' di 
documentazione prima (se ne parla anche nella Guida in linea): vi sono 
alcuni casi in cui un'operazione apparentemente semplice fornisce in 
realtà un risultato differente da quello che ci si aspetta; ad esempio, 
assegnando ad un vettore dinamico un secondo vettore, ciò che viene 
scambiato è il /riferimento/ ai vettori, non i valori in esso contenuti.
Ciao! :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 scambiato č il /riferimento/ ai vettori, non i valori in esso contenuti.
Penso che sotto questo punto di vista dovrebbe funzionare come il c++ se non
sbaglio il mio problema era proprio l'allocazione di nuovi elementi nel
vettore in quanto non conosco molto bene alcuni elementi della sintassi del
delphi venendo dal c++.
Grazie Mille.
Ciao
Antonio.
Newsgroup: it.comp.lang.delphi
Titolo: DELPHI 2005 - comp d6

DOMANDINA
secondo voi, componenti per d6 possono funzionare su delphi 2005? 

 secondo voi, componenti per d6 possono funzionare su delphi 2005? 
La maggior parte dei componenti per D6 funziona egregiamente anche con 
D2005, poichè la portabilità del codice è estremamente elevata, 
soprattutto se parliamo di sviluppo sulla stessa piattaforma, cioè Win32 
nel caso in esame.
Spiega nel dettaglio qual è il problema che hai riscontrato durante il 
tentativo di installare un package o un componente in D2005 se desideri 
ulteriori informazioni...
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 secondo voi, componenti per d6 possono funzionare su delphi 2005?
Credo che se porti i sorgenti e ricompili in D2005 non hai problemi di
sorta, Delphi infatti in fatto di retrocompatibilita' e' uno dei migliori
rad. 
Tant'e' che la compilazione  di un demo della versione di Delphi 1 con
tutte le versione che si sono susseguite, rimane un antico cavallo di
battaglia degli uomini borland.
-- 
Morde. 
ICLDweb: 
http://www2.samatel.com/icld/

 ha scritto nel messaggio 
news:436a7...@newsgate.x-privat.org...


 ha scritto nel messaggio 
news:9jawdztvwc8x.1998nke1mombt$.dlg@40tude.net...


 compatibilità, chiacchere a parte questa sera lo installo e guardo.
Attenzione perchè è previsto a breve il rilascio di D2006... ;-)

Newsgroup: it.comp.lang.delphi
Titolo: Problema database

Io dovrei creare un database con la descrizione, la grandezza, l'articolo e
varie altre info su alcuni documenti.
Perň non voglio usare un database perchč poi non vorrei instaalre anche il
BDE su ogni computer in cui faccio girare il programma, cosa mi consigliate?
La mia scelta di non usare il database č dettata solo dal fattore di
installazione, per cui se no nesistono altri modi (anche se piů laboriosi
non ho problemi) lo uso lo stesso.
Ciao

BDE su ogni computer in cui faccio girare il programma, cosa mi consigliate?
Utilizza ADO (cosi' poi dai la colpa al cliente, se non ce
l'ha installato, eh eh eh)...
--
Naquern Yansbetevn
naquern.y...@africamail.com

 wrote:

esitono componenti in grado di leggere e scrivere database standard
senza aver bisogno di ado o bde (senza supporto multiutente e simili).
un volta me ne avevano sugerito uno... ma adesso non ricordo
cerca su torry
-------------------------------------------------
Kirys <Remove DELTHIS from the address to reply>
 /|// /____/ Kirys Tech 2000: 
http://www.kt2k.com
/_|\\  // 2000


mmmh purtroppo il cliente sono io che mi devo spostare da un pc all'altro

 cerca su torry
provo, grazie

mmmh purtroppo il cliente sono io che mi devo spostare da un pc all'altro
A parte gli scherzi : se installi il software sotto
Windows2000 ADO ce l'hai gia' e per macchine Win9x basta
scaricare MDAC_TYP.EXE (l'ultima versione disponibile) dal
sito Microsoft.  Credo che alcune versioni di IE installino
i componenti automaticamente, ma non ne sono sicuro.
Ti consiglio di usare ADO perche' e' una tecnologia
Microsoft (e quindi supportata).
--
Naquern Yansbetevn
naquern.y...@africamail.com

 ha scritto nel messaggio
news:nZNc7.3347$Xf5.1...@news.infostrada.it...

Se hai la versione 5 pro o ent usa interbase, hai i componenti nativi IBX e
devi installare il ibserver sul server e per i client c'č una versione a
parte, e' supportata dalla borland e non hai problemi.
ADO te lo consiglio solo se vuoi avere dei problemi
Massimo
Newsgroup: it.comp.lang.delphi
Titolo: Somma  ore

Salve a tutti
piccolo aiutino per sommare le  ore .
esempio :
3,30
4,30
 se sommo i numeri viene 7,60
ma nella realtà per le ore sono 8,00
Grazie anticipatamente

 ma nella realtà per le ore sono 8,00
Questo perché sbagli a interpretare i numeri.
Se 3,30 per te sono tre ore e mezza, in realtà sono le ore sono 3,5.
Quindi, 3,5+4,5 = 8.
-- 
Jax
====
Ogni minuto nasce un gonzo. (T.Barnum)

 ma nella realtà per le ore sono 8,00
No, _nella realtà_, 3,30 ore + 4,30 ore danno giustamente 7,60 ore.
3,30 è ben diverso da 3,50 (che sono effettivamente 3 ore e mezza).
In ogni caso, quando si compie questo genere di calcoli, si trasforma
tutto in un'unità di misura fondamentale (es. i secondi o i minuti, se non
vai al di sotto di questi).  Ricordati anche che i tipi
TDate/TTime/TDateTime di Delphi non sono pensati per contenere delle
"quantità", ovvero somme di ore, ma sono solo indicatori.  In realtà una
somma di due date o due ore non ha alcun senso.  Motivo per cui, se devi
memorizzare questi valori, fallo utilizzando la trasformazione nell'unità
di misura che hai usato per i calcoli.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

                    Eccoti la risposta al tuo problema.
function TotHours(sec : Integer) : string;
var
  H, M, S : Integer;
begin
  H := sec div 3600;
  M := (sec div 60) mod 60;
  S := (sec mod 3600) mod 60;
  Result := Format('%s.%s.%s', [IntToStr(H), FormatFloat('00',M),
FormatFloat('00',S)]);
end;
procedure TForm1.Totale;
var
  Bookmark: TBookmark;
  P: TTime;
  Hour, Min, Sec, MSec: Word;
  A, B, C, T, Total : Integer;
begin
  Bookmark := DataModule1.ADOTable1.GetBookmark;
  DataModule1.ADOTable1.DisableControls;
  Total := 0;
  try
    DataModule1.ADOTable1.First;
    while not DataModule1.ADOTable1.EOF do
    begin
      P := DataModule1.ADOTable1Tempo.Value;
      DecodeTime(P, Hour, Min, Sec, MSec);
      A := Hour * 3600;
      B := Min * 60;
      C := Sec;
      T := A + B + C;
      Total := Total + T;
      DataModule1.ADOTable1.Next;
    end;
  finally
    DataModule1.ADOTable1.GotoBookmark (Bookmark);
    DataModule1.ADOTable1.FreeBookmark (Bookmark);
    DataModule1.ADOTable1.EnableControls;
  end;
  if Total = 0 then Edit1.Text :='0.00.00' else Edit1.Text := TotHours(Total);
end;
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ma nella realtà per le ore sono 8,00
PM,
ma in che formato memorizzi le ore?
3,30 è una stringa?
miyomo 

 ha scritto nel messaggio 
news:_utge.146970$%I2.8...@tornado.fastwebnet.it...


3h 30' sono 3.5 ore o 210 min..
puoi trasformare tutto in minuti e salvarti quel dato...
min := (parte intera * 60) + (parte decimale * 100)
--- posted by geoForum on 
http://www.delphiedintorni.it
Newsgroup: it.comp.lang.delphi
Titolo: ORDER BY :CAMPO

E' possibile scrivere una query con un paramentro?
A me risponde sempre con un messaggio di errore!
-- 
Ciao da Giuseppe Fraddosio
    // FidoNET 2:335/727.2    
 \X/  
fradd...@libero.it
 
fradd...@tin.it
 
Membro AGI Puglia Sez. Bari 
Powered By Amiga2000T/060@50Mhz/CV3D 4Mb/AmigaOS 3.5

A me risponde sempre con un messaggio di errore!
dal LocalSQL.hlp (quello del BDE): "Parameter markers can be used in DML
statements in place of data values"; ed anche "Parameters cannot be used
to pass values for metadata object names (table and column names)"
quindi non credo possano essere usati per lo scopo indicato nel subject.
hth
Paolo Arosio

var
  OrderCriteria: string;
[...]
OrderCriteria:= 'Campo1, Campo2';
with YourQuery do
begin
  SQL.Clear;
  SQL.Add('SELECT etc etc');
  SQL.Add('FROM etc etc');
  SQL.Add('WHERE etc etc');
  SQL.Add('ORDER BY '+OrderCriteria);
  Prepare;
end;
[...]
Non è possibile farlo con i parametri.. ;)
Ciao,
-=SIMO=-

 quindi non credo possano essere usati per lo scopo indicato nel subject.
limitazione assurda che non ho mai capito, mah.. 8)
Ciao,
Alan Solo

A me risponde sempre con un messaggio di errore!
Forse così?
MyQuery.Close;
MyQuery.SQL.Clear;
MyQuery.SQL.Add(Format('select * from Tabella order by %s',
[CampoScelto] ));
MyQuery.Open;
Robin

> limitazione assurda che non ho mai capito, mah.. 8)
La query non potrebbe essere preparata, il preprocessore non potrebbe
computare un piano di esecuzione della query, ecc..
Ciao,
-=SIMO=-

 wrote in message
yam8354.63...@mail.libero.it...


 computare un piano di esecuzione della query, ecc..
si', hai ragione, se si cambiano ad es. i campi nel where
il plan della query cambia, pero' perche' non si potrebbe fare una cosa
del tipo
q.ParamByName('ORDINAMENTO').AsString := 'CAMPO';
q.Open; // l'open prepara automaticamente la query se non specificato
oppure:
q.Prepare;
q.Open;
non vedo in che casi cio' potrebbe portare a problemi, mah...
Ciao,
Alan Solo

 quindi non credo possano essere usati per lo scopo indicato nel subject.
Grazie per aver risposto, ma purtroppo mi aspettavo una cosa simile :-(


 Sql.lines.add(Linea di codice SQL)
E' una soluzione un po' grezza secondo me e preferivo evitarla!


 q.Open;
La preparazione della query viene effettuata prima che i parametri vengano
sostituiti dai valori effettivi e rimane valida a prescindere dai valori
assegnati ai parametri.
Ciao,
-=SIMO=-

non vedo in che casi cio' potrebbe portare a problemi, mah...
forse il problema e' che se metti un parametro come nome
di campo poi questo viene sostituito con il valore racchiuso
tra apici e quindi da nome di campo diventa un'espressione
stringa costante...

> non vedo in che casi cio' potrebbe portare a problemi, mah...
grazie ad entrambi per i chiarimenti
Ciao
Alan Solo
Newsgroup: it.comp.lang.delphi
Titolo: Imprecisione dei float [quasi-lungo]

Salve a tutti,
sono alle prese con un problema di arrotondamenti ed imprecisioni delle
rappresentazioni in virgola mobile dei numeri, e vorrei sottoporvi un
quesito:
qualcuno sa dirmi se esiste qualche sistema (direttiva al compilatore,
override di metodi..o altro) per limitare il numero di decimali tenuti in
considerazione dai float (double o extended) nelle operazioni e soprattutto
nei confronti?
Faccio un esempio del mio problema:
ho tre campi BCD size 2 in una tabella Paradox
  with TempTable do begin
    if FieldByName('A').AsFloat+FieldByName('B').AsFloat <
FieldByName('TOT').AsFloat then begin
      ShowMessage('pippo');
   ....  ...
  end;
end;
nelle mie prove con A = 387,34, B=77,47, TOT=464,81 mi visualizza lo
showmessage.
Facendo ulteriori prove ho visto che si tratta (credo) di un problema di
rappresentazione di numeri in virgola mobile. Ho aggiunto degli showmessage
(ed anche in debug), ho visto che:
A+B=464,81
TOT=464,81
A+B-TOT = -2,xxxxE^14
Potrei risolvere il singolo problema facendo un round del risultato o
mettendolo in una var Currency (virgola fissa), ma vorrei capire se esiste
una soluzione migliore (anche perchè questo caso si ripresenterà centinaia
di volte nell'applicazione).
Grazie
Michele

 showmessage.
Se i numeri sono proprio quelli allora la cosa non si spiega, se invece
questi che ci hai dato sono quelli che tu hai accorciato per comodità allora
la cosa è diversa
--
__________________________________
http://digilander.iol.it/snarchio
 
snar...@tin.it

Il confronto con gli operatori "=" e "<>" tra float (a meno che non siano di
tipo currency) e' praticamente sempre inaffidabile, per ammissione della
Borland stessa.
L'unico modo per dire se due float sono uguali o diversi e' verificare che
la loro differenza sia minore della massima precisione che pretendi. Ad
esempio, se tu consideri due decimali:
1,234 sara' uguale a 1,235 in quanto il terzo decimale non e' significativo
(salvo arrotondamenti)
In termini di sorgente: if abs(a-b)<=0.01 then uguale else diverso
Ciao, Sandro



In termini di sorgente: if abs(a-b)<0.01 then uguale else diverso
Ciao, Sandro

 ha scritto nel messaggio


 ha scritto nel messaggio


 le operazioni di confronto tra float del progetto?
Si potrebbe creare una funzione generica che calcola la potenza di 10
elevato a -d (dove d e' il numero di decimali che intendi usare come
precisione), ma questo calcolo di potenza rallenterebbe l'esecuzione del
programma. Fissati tu una precisione e fai una procedurina ad hoc. Ad
esempio, considerando la precisione al 2' decimale:
function uguale(a,b:double):boolean;
begin
 result:=abs(a-b)<0.01;
end,
ed e' fatta.
Ciao, Sandro

 end,
In effetti quello che ho fatto è una procedura che sposta la virgola con
l'elevazione a potenza di 10, il problema, anche qui, è quello di doverla
applicare a tutti i confronti che già fà il programma.
Mi pare di capire che non ci sia un metodo (conosciuto) per impostare a
priori il numero di decimali nei confronti tra float.
Grazie comunque.
Michele
Newsgroup: it.comp.lang.delphi
Titolo: D6 o D7? Quale comprare?

Ciao ragazzi,
non starò qui a chiedervi le differenze tra D7 e D6 credo che tra
manuali ed help queste informazioni si possano reperire.
Vorrei un consiglio su quale versione comprare perchè visti i vari
commenti in rete, la versione 7 mi sembra una versione beta e comunque
di passaggio per evolversi in quello che forse si chiamerà «Galileo».
Riporto una sfare trovata in rete:
"Delphi 7 Studio non è una versione dichiaratamente di transizione, ma è
indubbio che ponga le basi del futuro «Galileo», la soluzione per lo
sviluppo visuale di Borland in aperta concorrenza con Visual Studio
.Net, attesa per il 2003.
Galileo offrirà sia Delphi che altri linguaggi di programmazione: tra
gli indiziati, C# e Visual Basic .Net; tra i sicuri esclusi, Java.
Insomma, Delphi 7 svela la strada di Borland, che passa per .Net
piuttosto che per Java 2."
Non avendo necessità di scrivere applicazioni su web, ma client/server
(e forse un piccolo CAD) penso che la versione 6, ampliamente utilizzata
e testata, sia la scelta migliore.
Credo di iniziare con la Professional per poi eventualmente arrivare
all'Enterprice se ne avrò la necessità.
Cosa ne pensate ? Se le mie considerazioni sono corrette, la Borland
vende ancora la versione 6? Un'eventuale porting verso la 7 o Galileo (o
chissà cosa...), sarà un bagno di sangue?
Grazie e Buon Lavoro
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:c0037e716fa597f4d59...@mygate.mailgate.org...

Newsgroup: it.comp.lang.delphi
Titolo: Directory del programma in eseguzione

Come si fa a sapere la directory in cui il programma
in eseguzione e' installato?
 
 

>
hai perso piu' tempo a scrivere che a cercare con google.
 
su google cerca ... delphi directory applicazione , avrai risposte
 
es:
http://www.programmersheaven.com/mb/delphikylix/252113/252113/how-do-i-get-the-application-path/
 
http://www.delphipages.com/forum/showthread.php?t=181694
 
 

 ha scritto nel messaggio 
news:4f19ad41$0$16645$5fc...@news.tiscali.it...


> Scusa se ti ho fornito una soluzione non più valida.
 
Fino a Delphi 2006 è valida. Comunque si puo' usare anche 
Application.ExeName
 
 

 Application.ExeName
 
Giuseppe:
Prendo confidenza col nuovo XE2, è valida anche qui, infatti 
Application.ExeName si rifà a questo codice qui
 
function TApplication.GetExeName: string;
begin
  Result := ParamStr(0);
end;
 
Per app Win32 e Win64 dovrebbe funzionare. Nel caso che si facciano 
Applicazioni con finestra secondo me è meglio usare Application.ExeName, 
come giustamente indichi (prevedendo implementazioni future); nel caso di 
applicativi console, o codice prima che venga istanziata Application, 
ParamStr(0) credo vada tranquillamente. :)
Ciao

Newsgroup: it.comp.lang.delphi
Titolo: [OT] - shareware e freeware su CD e bollini SIAE

Ciao a tutti
sapete in linea di massima se per distribuire un proprio applicativo
software (share o freeware ma al limite anche in altra modalità) ovviamente
sviluppato con delphi quali adempimenti SIAE (e +- i relativi costi) sono
necessari?
Ad es. in alcune scatole di prodotti mi pare di aver visto a volte qualcosa
come "esente da vidimazione etc." invece in altri casi c'è il bollino :-?
C'è ad es. un limite di copie sotto il quale non ci sarebbe eventualmente
bisogno di tali bollini?
Grazie in anticipo per qualsiasi info!

> sapete in linea di massima se per distribuire un proprio applicativo
io distribuisco le mie demo senza bisogno di bollino. I cd vanno
direttamente da me (l'autore) all'utente finale con licenza d'uso intestata,
non usano canali di distribuzione generici (edicole, ad esempio) e non c'e'
alcun rischio di pirateria in quanto si tratta di demo.
Ciao, Sandro

 ha scritto nel messaggio
news:bpg1l2$1nhehm$1...@ID-43509.news.uni-berlin.de...


 del famigerato bollino!
sul sito SIAE dicono che occorre il bollino su programmi per
elaboratore "posti in vendita", e cio' presume che il cd sia esposto al
pubblico. Se tu, autore, il cd lo consegni personalmente all'utilizzatore,
il discorso del "posti in vendita", e quindi del bollino, cade. Sul fatto
che poi ci siano delle esenzioni, so che esistono, ma non ho mai
approfondito, perche' la mia distribuzione e' fatta in modo molto specifico
(diciamo pure che ho "aggirato l'ostacolo" ;) ) quindi non mi interessa. Una
ricerca su google con bollino+siae+software, dovrebbe esserti d'aiuto.
Ciao, Sandro
Newsgroup: it.comp.lang.delphi
Titolo: Campo MEMO

Salve, ho un problemino con i campi memo.
Vorrei poter convertire un campo memo in campo stringa ELIMINANDO EVENTUALI
"fine paragrafo".
Mi spiego, durante la lettura di un campo memo per scriverlo su file, mi
sono accorto che nella stringa caricata (memo convertito in stringa) vi
erano caratteri (che non riesco a trovare facendo la scansione della
stringa) strani che mandavano a capo la stringa, io vorrei eliminare questi
caratteri, come si fa?
Grazie
    Marco

...


 caratteri, come si fa?
Usa la proprieta' Lines del Memo. Non e' elegante andare a cercare i
caratteri che terminano le singole linee.

Newsgroup: it.comp.lang.delphi
Titolo: Server SQL Freeware (o quasi)

Salve a tutti,
avrei bisogno di un server SQL "a gratis" o a costi accettabili, che
possa essere installato su NT (Workstation o Server), accessibile via
rete e liberamente distribuibile con una applicazione commerciale.
Chiedo troppo o c'e' qualcosa in giro?
Ho visto che Interbase e' open source, ma non ho capito un tubo di
cio' che dice nella licenza, e di questi tempi non si sa mai...
Qualcuno ne sa di piu'?
- Mariano La Via.-

 sa di piu'?
lo puoi usare, copiare, modificarne il codice,
distribuirlo, ridistribuirlo con le tue modifiche, ecc...
Ciao,
Alan Solo

 Qualcuno ne sa di piu'?
Non ho letto i termini del contratto di licenza di IB, cmq non dovresti
avere alcun problema in quanto Freeware e Open-Source.
Ciao!
--
- Carlo -
c.b...@libero.it
Newsgroup: it.comp.lang.delphi
Titolo: GIF animate

Esiste un componente che mi permetta di utilizzare una gif animata su
una form?
Ciao Gulma

si
Bye
A.

 una form?
Io ho trovato un componente tipo il TImage del delphi che supporta anche le
gif animate.
Lo trovi qui:
http://www.tmssoftware.com
e si chiama TAdvPicture o qualcosa di simile

Newsgroup: it.comp.lang.delphi
Titolo: Tabelle principali/dettaglio

Sono in possesso della guida Completa a Delphi 4 (Apogeo) e uso
delphi 5.
Tra gli esempi sui database, c'è uno su come creare delle tabelle
principale/dettaglio, che usa le tabelle customer.db e order.db .
Facendo click sul bottoncino ... della proprietà MasterFields del componente
tabele collegato a order.db, viene visualizzata la finestra Field Link
Desinger, qui
dalla casella combinata Aviable Indexes si possono scegliere due voci
per poi creare una relazione...
Ho provato ad usare due database fatti da me con Desktop Database
ma Aviable Indexes è vuoto. Perchè?????????????????????????????

 ma Aviable Indexes č vuoto. Perchč?????????????????????????????
Hai creato gli indici sulle tabelle?
Bye
A.

 Hai creato gli indici sulle tabelle?
Ho tentato di farlo ma Aviable Indexes è ancora vuoto.
Portesti indicarmi come creare questi indici???

Newsgroup: it.comp.lang.delphi
Titolo: Colori IDE

Ciao a tutti!
Qualcuno di voi sa dove sono salvate le configurazioni di colore dell'IDE?
(Twilight, classic, ecc).
Ne vorrei fare delle altre.
Chris
P.S.: AUGURI! :-)

"Christian Meneghini" ha scritto nel messaggio
| Qualcuno di voi sa dove sono salvate le configurazioni di colore
| dell'IDE? (Twilight, classic, ecc).
Qui (per D6):
HKEY_CURRENT_USER\Software\Borland\ETM\6.0\Color
--
Ciao.
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio
Newsgroup: it.comp.lang.delphi
Titolo: DBGrid e calcolo valori...

Salve amici!
Ho una dbgrid fatta con questi campi:
campo1= numerico , campo2=numerico,campo3=numerico
Vorrei che quando sono in fase di inserimento e passo dal campo 2 al campo3,
il campo 3 risulti come somma di campo1+campo2.
Ho immaginato di dover usare l'evento OnColExit,ma non sò come fare la somma
e mettere il risultato in campo3. Premetto che non posso usare campi
precalcolati (fkCalculated).
Grazie a chiunque sappia darmi la soluzione o una dritta.

Risolto così :)
valore:=dbgrid1.SelectedField.DisplayText;
if colonna='Shift' then
 begin
  varia:=dbgrid1.SelectedField.Value;
  if String(varia)<>'' then
   begin
    dbgrid1.DataSource.DataSet.FieldByName('Frequenza_in').Value:=
     StrToInt(dbgrid1.DataSource.DataSet.FieldByName('Frequenza').Value)+
     StrToInt(dbgrid1.DataSource.DataSet.FieldByName('Shift').Value);
   end;
 end;

 Grazie a chiunque sappia darmi la soluzione o una dritta.
Utilizza i campi persistenti e nell'evento OnValidate dei primi due campi 
inserisci la chiamata ad una routine che effettui il calcolo del terzo. In 
questo modo l'aggiornamento è slegato dalla griglia, ma impacchettato nella 
gestione della tabella.
Un'altra soluzione, migliore, è quella di non avere il campo3 in tabella ma 
di definirlo come campo calcolato (o campo estratto da una query). Migliore 
dal punto di vista dell'integrità dei dati, che non rischiano di essere 
incoerenti in caso una delle operazioni di aggiornamento fallisca.
Ciao,
Gianluca.
Newsgroup: it.comp.lang.delphi
Titolo: guida Indy

salve a tutti sapete se esiste una guida in italiano sui componenti Indy?
al massimo mi potrei accontentare anche di alcuni esempi...
grazie a tutti
Francesco P 

 salve a tutti sapete se esiste una guida in italiano sui componenti Indy?
Non mi risulta vi sia documentazione specifica in italiano sui 
componenti Indy, poiché già è poca per Delphi in generale. :-)
La documentazione ufficiale online non ti aggrada?
http://www.indyproject.org/docsite/html/
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Newsgroup: it.comp.lang.delphi
Titolo: W2K Services

Salve a tutti, 
come si fa diventare un programmino delphi in servizio windows.
Mi spiego, devo fare un programmino che si avvia allo boot della macchina, una
volta avviato si posiziona sulla tray di windows (tipo SQL-Server, o NAV o
minchiate del genere), richiamabile da tastierino destro (semplice con i
componenti tray in giro). Il mio unico problema e farlo diventare un servizio
di windows.
Bye
           Marco
-- 
Posted from  [212.177.57.193] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Delphi ha un wizard per creare un service.
File-new-other-service application
Bye
AS
-- 
Posted from  [212.17.220.41] 


Newsgroup: it.comp.lang.delphi
Titolo: Trasferimento su Linux

Spero di non essere OT
Ho sviluppato con delphi una applicazione che tra le altre cose visualizza 
un ingresso di una telecamera usb sviluppata con Delphi e il plugin di VLC .
Per problemi di licenze e altro devo trasferire questa applicazione su 
Linux.
Ho valutato Lazarus che andrebbe benissimo, ma non ho trovato nulla che mi 
aiuti nell'operazione di visualizzazione di una
streaming USB esterno.
In quale ambiente di sviluppo per Linux posso trovare maggiore aiuto (plugin 
o componenti già fatti) per visualizzare un ingresso da una fonte esterna ?
Accetto consigli
Grazie

la butto li:
http://linuxtv.org/v4lwiki/index.php/Main_Page
A.

 Linux.
Quali problemi di licenze? Guarda che puoi benissimo sviluppare anche su 
windows con la licenza GPL. 

 windows con la licenza GPL.
Dovendo mettere l'applicazione su una scheda embedded da produrre il 
problema è il costo della licenza windows non dell'ambiente di sviluppo

 A.
Grazie, č molto in fase di sviluppo, se possibile cercavo qualcosa di piu 
inscatolato.
Al massimo mi infilo in questo progetto.
Grazie e mille 

 inscatolato.
sorry... :-(
Ho fatto una ricerca brutale e mi sono fermato al 1° risultato...
A.
Newsgroup: it.comp.lang.delphi
Titolo: Cosa distribuire?

Ciao a tutti, ho creato un piccola applicazione con ado con essa 
distribuisco un file.mdb che è la mia base dati quindi in tutto ho un 
application.exe ed un file.mdb prendo sti due file li distribuisco su 
diversi PC e l'applicazione funziona correttamente...
A questo punto mi viene sto dubbio: nel mio componente adoconnection1 ho 
usato Microsoft jet 4.0 per linkare il file.mdb poi se faccio un setup con 
devloper studio 9  mi riporta molti pacchetti: MDAC, Dcom95, Microsoft c 
runtime library, lo stesso Microsoft jet 4.0 ecc.. alla fine mi ritrovo un 
file setup.exe di molti MB rispetto alle piccole dimensioni della mia 
applicazione. Il mio problema non è fare un sutup piccolo perchè posso usare 
Inno setup e mi fa un setup piccolissimo. Però cmq non importo i pacchetti 
citati in precedenza... Sono proprio necessari per far si che la mia 
applicazione funziona su qualsiasi PC ? Sono essi la causa di un setup molto 
grande?
Ringrazio in anticipo per la risposta... 


Fossi in te non mi preoccuperei...
Se lo installi su sistemi operativi recenti
Non  hai problemi ;)
Se qualcosa non torna fai installare MDAC
Saluti :)
  Gigi


In pochissime parole:
1) se la tua applicazione deve funzionare su un Windows 2000 o sistemi piu
recenti, non hai nessun problema, non devi installare nulla.
2) se deve girare su windows 98, devi installare MDAC per il jet engine;
3) se deve girare su windows 95, devi isntallare MDAC per il jet engine e
DCOM95 per gli speedbutton
4) per sistemi operativi piu vecchi .... buttali a mare
Ciao

 Ciao
Butterei a mare pure 95 e 98 ;)
Saluti :)
  Gigi

Newsgroup: it.comp.lang.delphi
Titolo: Criptare un DB

Avrei la necessitą di criptare completamente delle tabelle un DB (o almeno 
qualche campo)
da dove potrei iniziare? (evitando componenti costosissimi)
Daniele aka Gnappo

 da dove potrei iniziare? (evitando componenti costosissimi)
Generalizzo la questione sul criptare qualcosa: puoi scaricarti i
componenti turbopower lockbox, professionali e ora gratuiti, qui troverai
il link ad essi a altri gioielli di turbopower consegnati alla storia come
open source: 
http://tinyurl.com/6lokx
-- 
Morde. 
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 (evitando componenti costosissimi)
Se hai intenzione di usare MySql prova a documentarti sulla funzione MD5 per 
la criptazione dei campi, è semplice e abbastanza sicura.
Ciao
Fabio

 Daniele aka Gnappo
Andrea

 Andrea
Dovrei criptare alcuni campi di una tabella... (oppure tutta la tabella) di 
un semplice DB con delle anagrafiche: monoutenza e che probabilmente 
risiederà su una penna usb.
aspetto le domande successive
Daniele 

 Daniele 
Andrea

 Fabio
con MySql č meglio utilizzare le funzioni 
AES_ENCRYPT(str,key_str) , AES_DECRYPT(crypt_str,key_str)
saluti, brunello

 da dove potrei iniziare? (evitando componenti costosissimi)
Io da un po' di tempo sto' provando questi
http://www.cityinthesky.co.uk/files/dcpcrypt.zip
Molto semplici da usare, implementano sia cifratura a blocchi, stream di
lunghezza arbitraria e i vari hash e digest
Ci sono anche gli esempi
http://www.cityinthesky.co.uk/files/dcpdemos.zip
Ciao
 Max
Newsgroup: it.comp.lang.delphi
Titolo: d2006 e mono

se uso d2006 per una applicazione dotnet riesco poi a farla
girare su mono ?
--  
Postato da Virgilio Newsgroup: scopri i nuovi gruppi 
Eros, foto e video a 
http://newsgroup.eros.virgilio.it

 girare su mono?
Fai riferimento ad applicazioni WinForms o WebForms?
Non so se la prima parte è stata completata dal gruppo di lavoro di Mono.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 Non so se la prima parte è stata completata dal gruppo di lavoro di Mono.
Sembra sia completo al 99%
http://svn.myrealbox.com/mwf/class-status-System.Windows.Forms.html
.....però non chiedermi che significa questo 99% perchè non uso dotnet e
winform e non saprei risponderti nel dettaglio ;-)
Ciao
Gianni

 winform e non saprei risponderti nel dettaglio ;-)
Purtroppo sono (scandalosamente) poco informato a riguardo, ma mi 
piacerebbe sperimentare di più in questo senso.
Magari non appena avrò un po' di tempo ci provo e poi faccio sapere. ;-)

Newsgroup: it.comp.lang.delphi
Titolo: Copia Tabelle

Ciao Ragazzi,
come posso fare una copia di una tabella da un db access ad un altro,
usando ADO?
Ho provato a cercare sull'Helph ma non ho trovato un comando del tipo:
"CopyTable, ecc.."
Grazie.

6 poco chiaro.
Vuoi creare una copia della tua tabella o copiare i suoi records da una
tabella ad un altra?
Bye
A.


wrote:

Ado & DBE del 5/7/2002 (messaggio tuo).
Ti avevo risposto.
Fantastico quando si chiede e non si legge neppure le risposte che
vengono date :/
-- 
Ore 18.30: premo invio.

 vengono date :/
Se non sbaglio tu avevi proposto il datapump... ma se non ri-sbaglio lui lo
vorrebbe fare da codice... oltretutto non da Access a Paradox, ma da Access a
Access... o no? :)
--
Jax

On Fri, 12 Jul 2002 08:47:51 GMT, "Jax" <rispo...@newsgroup.grazie>
wrote:

Beh in tal caso non riposti la stessa domanda dopo una settimana
ignorando le risposte che ti vengono date, ma prosegui il thread:
avrei potuto proporgli altre soluzioni ;) (che ora mi tengo
gelosamante per me ahahahah).
Netiquette ed educazione, no? :)))


 Netiquette ed educazione, no? :)))
Sì, ma... anche da parte di chi risponde, n'est pas? ;)
--
Jax

On Fri, 12 Jul 2002 10:24:30 GMT, "Jax" <rispo...@newsgroup.grazie>
wrote:

domanda 1) c 'è un modo per trasferire i record da un db Access ad un
db Paradox, senza scriverli manualmente?
domanda 2) come posso fare una copia di una tabella da un db access ad
un altro, usando ADO?
A me domanda due sambra domanda uno un po' piu' particolareggiata
(quindi da stesso thread). Per di piu' mi sembra che il sig. Dubrovnik
si possa anche difendere da solo.
Dimmi dove sono stato maleducato e chiedero' scusa .
La realta' e' un'altra: questo gruppo e' sempre piu' un help desk,
cosa che a me non interessa.
UNSUBSCRIBE.


 UNSUBSCRIBE.
Eddai..........
--
Jax

 "CopyTable, ecc.."
imho, chi progetta i ns strumenti di lavoro non puň essere telepatico e
darti
la pappa pronta x fare qualsiasi cosa ci possa venire in mente con un solo
passaggio.
In genere, se una cosa non puň essere fatta direttamente, esistono altre
funzioni
metodi, etc il cui uso combinato puo risolvere un elevato numero di
problemi.
Il fatto che tu non hai trovato cio che ti serve nell'help e subito dopo hai
postato qui
il tuo msg lascia capire che non hai fatto alcun tentativo di risolvere la
cosa da te, mettendo
insieme altri strumenti per creare una soluzione ad hoc al tuo problema.
Sii + elastico e meno statico ;-))
Bye
A.
Newsgroup: it.comp.lang.delphi
Titolo: Ricerca incrementale case insensitive

TTable.Filtered := True;
ma vorrei poter fare la ricerca usando il case insensitive.
Avete presente come fanno le Gexperts quando aprite al procedure list (CTRL+G)
e incominciate a scrivere? Ecco, vorrei fare una cosa proprio come quella: e'
fattibile ? 
Dove trovo, se non gia' implementata per le TTable, un codice che mi permetta
di adattarlo al dataset BDE?
Ciao a tutti
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 ma vorrei poter fare la ricerca usando il case insensitive.
basta aggiungere:
TTable.FilterOptions:= [foCaseInsensitive];
da DB.pas:
  TFilterOption = (foCaseInsensitive, foNoPartialCompare);
  TFilterOptions = set of TFilterOption;
Antonio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

TTable.FilterOptions:= [foCaseInsensitive];
Posso dirti che sei un mito o ti offendi??!
:D
thxs!


 Ciao a tutti
Ciao
se il campo è indicizzato non ti può andare bene questo
 NomeTabella.FindNearest([EdRicerca.Text]);
da inserire nell'evento OnChange del TEdit (EdRicerca).
Io lo uso per la ricerca incrementale in una anagrafica il cui
campo (Ragione sociale) e scritto sempre in maiuscolo (per compatibilità
con altri software) e trovo ciò che cerco sia che lo scriva in maiuscolo
che miniscolo 
Ciao
Micky
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Micky
Grazie "ASSAIE" come direbbe Dalla in Caruso
:D

Newsgroup: it.comp.lang.delphi
Titolo: Richiamare 2 BPL che usano le stesse Unit.

Ciao a tutti.
Il mio problema è il seguente: devo richiamare (da applicazione MDI) una BPL
che nelle Uses contiene la Unit "Libreria" da me creata (con qualche
funzione di comodo). Sempre da applicazione MDI richiamo una seconda BPL che
a sua volta contiene nelle Uses la Unit "Libreria".
Ciò non mi è possibile in quanto l'applicazione genera il seguente errore
"Cannot load package ... because it contains Libreria that it's also
contained in package ..."
Le BPL vengono caricate nel seguente modo:
procedure ExecBPL (NomeBPL, TipoForm: string);   //MIA PROCEDURA
var
  PackageModule: HModule;
  AClass: TPersistentClass;
begin
  PackageModule:= LoadPackage (NomeBPL);
  if PackageModule <> 0 then
    begin
      AClass:= GetClass(TipoForm);
      if AClass <> nil then
        with TComponentClass(AClass).Create(Application) as TCustomForm do
          begin
            ShowModal;
            Free
          end;
      UnloadPackage(PackageModule)
    end
end;
Qualcuno sa come posso caricare + BPL che fanno riferimento alla libreria di
comodo che mi sono creato?

Sposta le unit comuni in un terzo package
che sarà referenziato dagli altri due package.
Ciao
Andrea

 ha scritto nel messaggio
news:b2tf0n$1fp7ck$1...@ID-170738.news.dfncis.de...

Grazie Andrea,
ho provato a creare un PKG con la unit utilizzata dagli altri PGKs e siamo
riusciti ad evitare l'errore di prima ma...ora mi presenta il seguente
errore:
"Name not unique in this context" (quando una BPL è già stata creata e vado
a creare l'altra BPL)
Non riesco a capire a cosa si riferisce questo Nome non univoco; sarà il
nome dei componenti contentuti nelle 2 BPL che richiamo da applicazione
(nomi uguali per la griglia contenuta nelle due BPL)?

 applicazione (nomi uguali per la griglia contenuta nelle due BPL)?
Ciao,
Dunque, iniziamo un attimo a capire cosa si intende per "Nome".
Per "nome" non si intende la proprietà "Name" dei componenti, ma
in genere fa riferimento ai NOMI DELLE CLASSI.
Quindi se in tutti e due i package includi il componente TMYGrid, avrai
l'errore.
Ciao
Andrea