mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: D2006 non parte...

 Dopo avere installato BDS (2006) lancio delphi per win32 e la schermata 
di avvio si ferma quando avviene il caricamento di "stide.bpl".
Qualcuno di Voi ha avuto lo stesso problema? ma soprattutto lo ha 
risolto.
Saluti
Giovanni Brambilla
AtcBrambo
--- posted by geoForum on 
http://www.delphiedintorni.it

Dopo avere installato BDS (2006) lancio delphi per win32 e la schermata 
di avvio si ferma quando avviene il caricamento di "stide100.bpl".


 risolto.
Ti viene segnalato un errore di qualche tipo?
In questi casi, probabilmente, la configurazione dell'ambiente è stata 
compromessa ed è facile che ci sia la necessità di reinstallare il 
software. :-|
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Ho installato e disinstallato BDS2006 almeno quattro volte. 
Nessun messaggio d' errore. Si ferma lì: 
Sul computer di casa va. Sul portatile no. Il portatile (anzi, il 
trasportatibile) è P4, 3.2 Ghz, 1G ram, nVidia 6800 256 ram ddr3, 80g HD.
Non so più cosa fare .... il problema nascerà da futuri clienti di app 
sviluppate con BDS... nessuna modifica on-the-fly....


Newsgroup: it.comp.lang.delphi
Titolo: Database explorer di turbo delphi explorer per windows

Salve a tutti, sto cercando di passare da Visual Basic a delphi e come
primo passo o scaricato e installato la versione turbo delphi explorer
che al momento è free, giusto per cominciare.
Il problema è questo :
Ho un server Mysql vers.4  installato e windows 2000
Con database explorer vorrei connettermi ad uno dei db del server
Mysql.
Ho inserito i dati di connessione al db e testato la connessione con
esito positivo.
Perchè quando clicco sul + di table non visualizzo le tabelle del db ?
Dove sbaglio ?
Grazie in anticipo a quanti risponderanno.

 Dove sbaglio ?
Se ho capito bene, riesci ad implementare correttamente la connessione 
al database, ma non visualizzi alcuna tabella? E questo senza alcun 
messaggio di errore o segnalazione? :-|
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
     Non hai la possibilità di scaricare Turbo Delphi Explorer?
     Te lo spedisco io!! [
http://www.marco.breveglieri.name/?p=48
]

 messaggio di errore o segnalazione? :-|
Si in effetti il problema è proprio questo, la connessione al db
funge, ma non visualizzo le tabelle.... senza nessun messaggio di
errore.
Turbo Delphi Explorer è già installato e funge. Ho controllato il db
mysql con phpmyadmin e tutto funge.
Inizialmente mi dava errore di connessione perchè non trovava la dll
LIBMYSQL.dll, che si trovava nella directory di MYSQL. Ho copiato la
dll nella cartella bin di Turbo Delphi Explorer e non mi ha dato più
errore di connessione, ma non visualizzo cmq le tabelle. Forse questo
potrebbe esserti utile per capire dove sbaglio o perchè non visualizzo
le tabelle.
Newsgroup: it.comp.lang.delphi
Titolo: [Delphi6] progetto client/server

salve a tutti!
ho a disposizione la versione di delphi in oggetto(la 6) e avrei
l'intenzione di creare un software da far girare su un client che
permetta la visualizazione di file multimediali, e fin qui nema
problema. volendo mettere in rete (LAN) qusto client, volevo creare
anche un database server che permetta di sapere quali sono i file
disponibili per il client che fa la richiesta e un altro sever, un push
server che mandi, previa rihiesta del client e accettazione da parte
del database server il file richiesto al client, il quale può
scegliere di eseguirlo subito oppure in un secondo tempo, fermo
restando che il/i file richiesti e inviati dal push server, vengano
cancellati dal client dopo un tot di tempo da quando sono stati
salvati. ora, la mia domanda è semplice: è possibile farlo con delphi
6 oppure necessito obbligatoriamente di delphi 2005 che, a quanto ho
letto è la versione ".net" di Delphi?
grazie a tutti per le eventuali risposte.
--
AlexG:

delphi6 va + che bene.
Prendere ora il 2005 imho non è il caso, visto che entro fine anno
mamma borland sforna la 2006.
AS

 mamma borland sforna la 2006.
A meno che non trovi un'offertona che giustifichi l'acquisto di D2005. ;-)
P.S. per l'autore originale della discussione:
D2005 *non* è esclusivamente .NET (come D8), ma "duale": Win32 (VCL) e 
.NET (Delphi.NET e C#).
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Newsgroup: it.comp.lang.delphi
Titolo: monitor in standby

sapete se esiste un API o un componente che mi permetta di mettere il
monitor nella modalità standby ?
Grazie anticipatamente a chi mi saprà aiutare.
Raffaele.

Ho avuto un problema con windows Nt
il mio applicativo ha sempre funzionato bene sotto windows nt con service
pack 4
da quando č stato installato il service pack 5 non ha piů funzionato !!!
file log del Dr.Watson's :
Exception dell'applicazione:
        App:  (pid=287)
        Ora: 2/20/2001 @ 14:48:26.798
        Numero exception: c0000025
funzione: RtlRandom
        77f8917c eb35             jmp     RtlRandom+0x147 (77f891b3)
        77f8917e f6430401         test    byte ptr [ebx+0x4],0x1
ds:0249e7da=??
        77f89182 7445             jz      RtlRandom+0x15d (77f891c9)
        77f89184 8d459c           lea     eax,[ebp-0x64]
ss:0249e7c2=????????
        77f89187 895da4           mov     [ebp-0x5c],ebx
ss:0249e7c2=????????
        77f8918a c7459c250000c0
ss:0249e7c2=????????
                                  mov     dword ptr [ebp-0x64],0xc0000025
        77f89191 c745a001000000   mov   dword ptr [ebp-0x60],0x1
ss:0249e7c2=????????
        77f89198 c745ac00000000   mov   dword ptr [ebp-0x54],0x0
ss:0249e7c2=????????
        77f8919f 50               push    eax
        77f891a0 e8c7fdffff       call    RtlRaiseException (77f88f6c)
FAULT ->77f891a5 eb0c             jmp     RtlRandom+0x147 (77f891b3)
qualcuno sa darmi una spiegazione ....
Grazie

Guarda nei TIPS su 
www.torry.net
 trovi un esempio che funziona.

 wrote in message
3A93FCF6...@jt2000.it...

Newsgroup: it.comp.lang.delphi
Titolo: Domanda per veri esperti di S.O Windows

Una domanda/curiosità sul mondo Win
Quando clicco col tasto destro su un file qualsiasi mi appaiono oltre ai
normali items del menu di windows anche items che si riferiscono a programmi
(ad esempio WinRar(Add to Archive/Extract Files Ecc)). Se io voglio
aggiungere una mia applicazione a questo menu generale dove diavolo devo
andare a toccare?
ho cercato sul regedit e ho trovato qualcosa circa
HKEY_CLASSES_ROOT\*\ShellExt\ContextMenuHandlers\
 e li ci sono l'elenco dei programmi visualizzati su questo pop up.. non
riesco a capire di più!
Grazie mille a chi mi risponde!

Guarda in torry, c'è un componente che fa quello che chiedi.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.delphi
Titolo: Confronto stribghe

Ciao a tutti,
toglietemi una curiosità: sia qui su NG, sia su alcuni siti dove si trova
codice di Delphi, la comparazione di 2 stringhe viene fatta con StrComp. Io,
abituato a ciò che facevo a scuola con il Turbo Pascal, faccio "if Str1 =
Str2". C'è qualche differenza tra i 2 modi di comparare le stringhe? Uno dei
due è migliore dell'altro?
Grazie in anticipo, Mario
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 due è migliore dell'altro?
So che "StrComp" è stata recentemente ottimizzata grazie 
all'integrazione di parte del progetto "FastCode" nel codice della 
libreria VCL, ma non saprei dirti se ci sono differenze rispetto all'uso 
dell'operatore "=" (cioè, è possibile che quest'ultimo riconduca 
sostanzialmente all'uso del medesimo codice della funzione "StrComp").
In ogni caso, io opto per l'uso dell'operatore "=", solo perché lo trovo 
più intuitivo, ma è ovviamente una posizione del tutto personale. :-)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)


L'operatore = ti dice se sono uguali, StrComp ti dice se sono uguali
ed, in caso contrario, quale delle due e' "maggiore" rispetto all'altra.
Però il discorso della comparazione delle stringhe e' molto piu'
complesso di quello che appare ... (altrimenti non esisterebbero
tutte quelle funzioni che vedi nell'help).
Ciao
-- 
ACSH
[TurboDelphi]
Chi fa da se', fatica il doppio

 C'è qualche differenza tra i 2 modi di comparare le stringhe?
StrComp è la ricostruzione di strcmp() del C che, come ti hanno già detto,
non si limita ad una verifica di uguaglianza. 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.lang.delphi
Titolo: IDE RAD Studio 10

Scusate ma mi stò incasinando da solo...
La barra dei menù dell'IDE è completamente nera e non vedo un tubo.
C'e' qualche impostazione particolare?
Uso windows 7 pro
 
grazie


Strano che appaia completamente nera: dovrebbe essere blu. :)
 
Ad ogni modo, se sei un nostalgico come me, ti copio le chiavi da modificare per cambiare lo stile della barra (colore di sfondo e font): incolla questo contenuto in un file ".reg" per il Registro e fai doppio clic per importare le impostazioni.
 
 
Windows Registry Editor Version 5.00
 
[HKEY_CURRENT_USER\Software\Embarcadero\BDS\17.0\ModernTheme]
"FontName"="Segoe UI"
"FontSize"=dword:00000009
"MainToolBarColor"="clWhite"
 
 
Io uso un colore bianco (clWhite) più affine allo stile di Windows 10, ma puoi sostituire quel colore con quello che preferisci tra le costanti disponibili in Delphi.
 
Ciao,
  Marco.
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
 #Home: 
http://www.marco.breveglieri.name
 
 #Blog: 
http://www.compilaquindiva.com
 
 #DelphiPodcast: 
http://www.delphipodcast.com
 

Grazie infinite

Newsgroup: it.comp.lang.delphi
Titolo: DB ed Array

Ciao a tutti,
     una domanda, forse banale, .......
C'e' la possibilita' di salvare un array dinamico, di word, in una tabella 
??
Ecco il caso, a seguito di un ordine arrivano 25 scatole di materiale 
oleoso, vengono caricate e ad ognuna viene attribuito un numero assoluto che 
identifica la scatolotta.
Quello che pensavo di fare era selvare un solo record, nel quale inserivo la 
bolla di consegna la data di consegna ecc...., ed un array dove andavo a 
mettere i numeri assagnati, per esempio 10,11,12,24,25,30,34,.....N
Dato che una situazione simile non mi e' mai capitata, per ora ho risolto 
andando a salvare nella tabella (come nel nostro esempio) 25 record uguali 
in tutto eccezion fatta per il numero di identificazione.
Grazie per l'attenzione
Ciao, Daniele 

Ciao, 
potresti usare un campo blob nel DB, oppure un campo testo piuttosto lungo
(devi sapere più o meno quante scatole devi memorizzare, al massimo...).
In entrambi potresti scrivere, concatenando e separando con un ; o una ,
vedi tu quello che ti piace di più i campi, manualmente o utilizzando una
TStrings, settando opportunamente il campo Delimiter e prelevando poi il
valore dato da DelimiterText.
Ma a mio avviso, nel caso poi ti occorra fare delle ricerche sulle
scatolotte sarebbe più efficiente la tua soluzione, cioè quella dei record
uguali con solo il numero identificativo diverso... così il lavoro lo
farebbe direttamente il DB, mentre se devi fare una ricerca con l'altro
sistema occorre passarsi tutti i record ed estrarli uno alla volta... e ti
garantisco che a meno che tu non abbia pochi ordini, la cosa è lenta...
nel caso del DB invece puoi usare, senza problemi gli indici e quindi è
molto, ma molto più veloce.
Spero di esserti stato di aiuto.
Ciao.
Cristiano.

Cristiano
--- posted by geoForum on 
http://www.delphiedintorni.it
Newsgroup: it.comp.lang.delphi
Titolo: help JvDBLookupCombo o DBLookupCombo

salve a tutti ho questo problema..
Ho un componente TJvDBLookupCombo come faccio a farli visualizzare 
(ovviamente già presente) nella lista un valore che dico io..
La tabella alla quale è collegato punta ad un valore.. ma lui no!!
Come posso fare..
Questo è l’evento del combo dei dipendenti (dipcombo1).. che deve 
prevaricare il centro di costo predefinito del dipendente scelto (nel 
cc_combo1)..
[i]procedure Tf_consu.dipcombo1CloseUp(Sender: TObject);
begin
 cc_combo1.Locate(Adoquery2id,
 Adoquery1.FieldByName('id_centcosto').AsString,True);
 // ora la tabella punta al record giusto ma nella lista del combo
 // non appare il valore puntato anche facendo un refresh del combo..
 //cc_combo1.DisplayValue := Adoquery1.FieldByName
('Descrizione').AsString;
 // inutile anche questa perché è una proprietà di sola lettura..
end;[/i]
--- posted by geoForum on 
http://www.delphiedintorni.it

salve a tutti ho questo problema..
Ho un componente TJvDBLookupCombo come faccio a farli visualizzare 
(ovviamente già presente) nella lista un valore che dico io..
La tabella alla quale è collegato punta ad un valore.. ma lui no!!
Come posso fare..
Questo è l’evento del combo dei dipendenti (dipcombo1).. che deve 
prevaricare il centro di costo predefinito del dipendente scelto (nel 
cc_combo1)..
procedure Tf_consu.dipcombo1CloseUp(Sender: TObject);
begin
 cc_combo1.Locate(Adoquery2id,
 Adoquery1.FieldByName('id_centcosto').AsString,True);
 // ora la tabella punta al record giusto ma nella lista del combo
 // non appare il valore puntato anche facendo un refresh del combo..
 //cc_combo1.DisplayValue := Adoquery1.FieldByName
('Descrizione').AsString;
 // inutile anche questa perché è una proprietà di sola lettura..
end;
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.delphi
Titolo: Facile

Dovrebbe esserre facile, ma non trovo la causa. Ho la seguente istruzione :
   result:= TPanel(FindComponent(aNome));
e in compilazione ricevo un errore "Undeclared identifier: 'FindComponent' 
".
Cosa ometto o non capisco ? 

 ha scritto nel messaggio 
news:48d7cc1b$0$18158$4faf...@reader3.news.tin.it...

A naso manca la libreria nelle Uses, prova con Classes, giorgio 

 'FindComponent' ".
Dove hai inserito questo codice? E' un metodo di una classe?
Includi anche la parte di codice mancante.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 ha scritto nel messaggio 
news:48d7dabd$1...@news.x-privat.org...


 end.
Ecco: FindComponent è un metodo di WinControls di cui fanno parte anche i 
form. Voul dire, che FindComponent è un metodo p.e. di un form. NomePanel 
invece non fa parte del form, è una funzione statica. Dovresti p.e. mandare 
alla funzione anche un componente il quale viene testato se ha un mebro con 
il nome dato.
Saluti,
Klaus 

 invece non fa parte del form, č una funzione statica. Dovresti p.e. 


 
1) soluzione: Scrivi la funzione come membro della classe dove devi fare 
la ricerca del componente
2) soluzione: Oltre al nome del componente da cercare devi passare alla 
funzione anche la classe contenitore (se i puristi mi passano il termine)
Sotto un piccolo esempio (da prendere come spunto ) delle due soluzioni
type
   TForm13 = class(TForm)
     Panel1: TPanel;
     Button1: TButton;
     procedure Button1Click(Sender: TObject);
   private
     function NomePanel(aNome: string): TPanel; //
     { Private declarations }
   public
     { Public declarations }
   end;
var
   Form13: TForm13;
implementation
{$R *.dfm}
{ TForm13 }
function NomePanelFuoriClasse(oForm: TForm; aNome: string): TPanel;
Var oComp: Tcomponent;
begin
   Result := Nil;
   Try
     if Trim(aNome) <>'' then
     begin
       oComp := oForm.FindComponent(aNome);
       if Assigned(oComp) then
         result:= (oComp as TPanel);
     end;
   except
    // gestione dell'eccezione
    Result := Nil;  // superfluo ma ...
   end;
end;
procedure TForm13.Button1Click(Sender: TObject);
begin
   // chiamata alla funzione dentro la classe form
   if Assigned(NomePanel('Panel1')) then
     ShowMessage('Chiamata In Classe');
   if Assigned(NomePanelFuoriClasse(Self, 'Panel1')) then
     ShowMessage('Chiamata fuori Classe');
end;
function TForm13.NomePanel(aNome: string): TPanel;
Var oComp: Tcomponent;
begin
   Result := Nil;
   Try
     if Trim(aNome) <>'' then
     begin
       oComp := FindComponent(aNome);
       if Assigned(oComp) then
         result:= (oComp as TPanel);
     end;
   except
    // gestione dell'eccezione
    Result := Nil;  // superfluo ma ...
   end;
end;
end.
Goblin
-- 
Ibis et redibis non morieris in bellum
http://goblinland.myminicity.com/

>Ibis et redibis non morieris in bellum
magari:
Ibis et redibis non morieris in bello
--- posted by geoForum on 
http://www.delphiedintorni.it

Grazie, adesso ci studio su ...
"^_Goblin_^" <^__^Nic_^__^sab_^__^@^__^Libero_^__^.it> ha scritto nel 
messaggio news:LD0Ck.3541$Uo5....@tornado.fastwebnet.it...

Newsgroup: it.comp.lang.delphi
Titolo: Windows Vista

Ho trasferito la mia applicazione da un PC con Windows 2000 a un'altro con 
Vista. Purtroppo, dopo un primo momento in cui sembrava che tutto andasse 
per il meglio, ho incontrato un errore che non ho saputo superare. Alla 
esecuzione di determinate funzioni, ricevo il seguente messaggio:
"Network installation failed.
File or directory does not exist.
File C:\
PDOXUSRS.NET
Permission denied.
Directory: C:\ "
Mi pare che avvenga in occasione della esecuzione di query SQL, ma non ho 
potuto verificare bene perchè sulla macchina non ho installato Delphi.
Qualcuno ha qualche idea ?

Ciao
tra i vecchi post ne trovi alcuni di Simone P. che ha risolto già questo 
problema e che ci tiene informati delle sue esperienze con il nuovo S.O. .
Comunque, da quello che ricordo, il problema sta nel fatto che con Vista non 
puoi scrivere in root (C:\) quindi dovrebbe bastarti il fatto di spostare la 
netdir in un'altra cartella oppure avere i permessi come utente per farlo. 
Io non ho Vista quindi non posso provare, segui il post sempre di Simone P. 
del 22/05/2007 che ha questo oggetto [D5] delphi 5 funziona anche su vista
Ciao
Marco

 ha scritto nel messaggio 
news:f345vb$2oo$1...@nnrp-beta.newsland.it...


probabilmente una volta che ho scritto qualcosa di utile nessuna l'ha 
letta!!!
ORA HO UN BEL NOTEBOOK CENTRINO DUE CON:
-delphi3
-delphi5
-delphi6
e tutti i miei componenti funzionanti anche su vista!!!
basta cambiare i permessi nel registro di \borland autorizzando everyone a 
scrivere
-installare ovviamente tutte le applicazioni in c:\applicazioni (ad esempio) 
altrimenti programmi e program files danno errori di autorizzazioni (e devo 
ancora capire come risolverli)
e ovviamente il netdir non farlo puntare in c:\ ma in un altra cartella (es: 
c:\temp)
se non modifichi permessi della chiave borland del registro ti si pianterà 
bde quando salvi (con la x)
Simo 

per eseguire come amministratore io ho creato un file manifest (cerca con 
google)... però serve solo per lanciare delphi (che altrimenti non si 
avvia), per l'applicazione ho creato un file manifest ma non era necessario
Simo 

 ha scritto nel messaggio 
news:4655dac8$0$36444$4faf...@reader5.news.tin.it...



io sto sentendo anche gente che ha installato dentro cartella utente, perň 
secondo me basta avere c:\applicazioni 

 io sto sentendo anche gente che ha installato dentro cartella utente, però 


leggi qualche post precedente... cè un tool che modifica registro da riga di 
comando... l'ho usato dentro wise installer
Simo

Newsgroup: it.comp.lang.delphi
Titolo: proprietà Trasparent di image

Salve
perchè se sovrappongo due immaggini e setto quella più in superficie come 
Trasparent=true
e poi ci disegno un paio di linee, non si vede più l'imagine sotto, ma si 
vede tutto bianco?
avrei giusto bisogno di sovrapporre due imagini e usare le seconda come 
fosse un lucido trasparente
come fare? (tra l'altro su un computer molto vecchio funziona!!!!)
?! 

 ha scritto nel messaggio 
news:44efc16f$0$35068$4faf...@reader4.news.tin.it...

Controlla le proprieta' della Bitmap dell' immagine.
Giorgio
Newsgroup: it.comp.lang.delphi
Titolo: Caselle di testo, come mandarle a capo

Salve, probabilmente non è possibile, ma con una editbox avrei bisogno di
visualizzare il testo su più righe, il classico wordwrap, insomma, ma tale
propietà non esiste.
Qualcuno è riuscito ad implementarla per subclassing?
Grazie

 ha scritto:

un TMemo, no? :)

oops sono arrivato troppo tardi
--
 _______________________________________
        Gnaffy SoftWare
   web: 
http://gnaffy.tripod.com/
   e-mail: Gna...@Wappi.com
   e-mail: 
bmq...@tin.it
   ICQ#: 76488613
 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

perchè non usi un memo ? (che tralatro ha la proprietà wordwrap)


 ha scritto nel messaggio
news:1QCK5.43270$3K3.1...@news.infostrada.it...


 ha scritto nel messaggio
news:NH_M5.19244$fx4.6...@news.infostrada.it...


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

Salve a tutti.
per favore, qualcuno sa dirmi che cosa sono (o a cosa servono) le seguenti
librerie
hha.dll, hhctrl.ocx, hhctrlui,dll ?
Sono di sistema ?
Grazie
Phora

se vai in delphix\bin trovi il tdump.
Se lo lanci ti puoi vedere le funzioni che queste dll esportano per poi
cercarle su MSDN.
Bye
A.


Grazie per il consiglio. Farò.
Che tiu sappia HHA.dll e hhctrlui.dll sono file di sistema ? (hhctrl.ocx
sì).
Grazie
Phora
Newsgroup: it.comp.lang.delphi
Titolo: mailing list da fare.

Salve a tutti.
Ho sviluppato una procedura che memorizza dei dati tra cui l'e-mail in un 
database access.
Fin qui tutto ok.
Ora però è sorta una necessità.
Devo dare la possibilità di mandare un messaggio di posta a tutti i contatti 
inseriti in questo archivio.
Fin quando è uno solo io ho utilizzato il comando :
sendMail(....).
Adesso io praticamente devo dare la possibilità di mandare il messaggio 
magari creo una form dove inserire il testo , che poi devo mandare a tutti i 
contatti o ad una parte.
Sapete darmi qualche suggerimento ?

Sapete darmi qualche suggerimento ?
Perché non usi le MAPI e fai in modo che si apra la finestra del
mailer predefinito ?
Se sei interessato all'uso delle MAPI cerca nei vecchi messaggi di
questo gruppo, se n'è parlato centinaia di volte.

Newsgroup: it.comp.lang.delphi
Titolo: DisplayFormat ed EditFormat

Come si usano questi? Non sono ancora riuscito a capirlo ...
--
Giuseppe Fraddosio
fradd...@libero.it
fradd...@supereva.it

Come si usano questi? Non sono ancora riuscito a capirlo ...
ti faccio un esempio, tipo valuta lire:
DisplayFormat #,###
Editformat #
in pratica nella Visualizzazione mette il punto alle migliaia,
nell'edit no (il punto in un campo numero non è accettato)
Ciao,
Alan Solo

 Editformat #
Questo lo so (dopotutto sono simile al formatfloat), ma come si fa a
cambiare questi valori per una TQuery o TTable a run time?


cambiare questi valori per una TQuery o TTable a run time?
ti ho già risposto...
TNumericField( Query1.FieldByName('Campo') ).DisplayFormat := '#,###';
Ciao,
Alan Solo

Newsgroup: it.comp.lang.delphi
Titolo: Aiuto: Problema con trigger e generatori in interbase

ho configurato il trigger e il generatore per funzionare correttamente
secondo logica, ma quando vado ad inserire il primo record, il generatore
passa a due ( essendo 1) , e il record non viene inserito,dandomi la
seguente risposta: ID: must have a value!;
Dopodichč ad ogni successivo inserimento, sia via SQL, sia via DBExpress di
delphi, non succede niente!
ho anche fatto la seguente modifica al trigger:
CREATE TRIGGER INC_CODICERIV FOR RIVISTE
ACTIVE BEFORE INSERT POSITION 0
as begin
  if (new.codiceriv is null or new.codiceriv = 0) then
    new.codiceriv = gen_id(gen_codiceriv, 1);
end
ma non č successo niente, gradirei suggerimenti, sto sviluppando in delphi
attraverso DBexpress in delphi!
ringrazio fin da ora chi puň essere disponibile a suggerimenti e consigli
sul da farsi.
grazie
Simon

 altro modo? (*)
C'è una proprietà GeneratorField sul dataset. Io tendo a leggere il
valore
beforepost, e non afterinsert come alcuni, ma dipende da quanto presto
ti
serve. Volendolo fare manualmente, basta
select gen_id(my_generator, 1) from rdb$database
<<
Quindi: il trigger non ti esime dal dare un valore al campo; ti assicura
che mettera' un valore se l'applicazione non lo mette. Lo si recupera
_prima_ del post o dell'insert e lo si mette a valorizzare il campo.
Saluti
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: Semi OT - Qualcosa di simile ai frame di delphi in .Net (WinForm)?

Un saluto a tutti.
Per alcuni progetti mi tocca utilizzare vs2010.
Pur ammettendo che rispetto a vs2005 le cose funzionano molto meno peggio, devo comunque sottolineare che alcune differenze dell'IDE le trovo scomode.. Va be.
 
Su msdn ho visto che in .net esiste la classe "frame"...
 
 
1) non ho trovato in giro esempi di utilizzo di questa classe
 
2) non so quindi se la classe frame di winform è simile alla TFrame di delphi/xe
 
3) magari mi serve un cane guida ma nei menu dell'ide una kaz di voce "Add frame" o similare non l'ho vista
 
Da qui la mia domanda.
Ovviamente, se ci sono alternative, mi basta il nome: poi me la sbrigo da me..
 
Scusate per l'OT.
 
 
A.
 
 

 non so quindi se la classe frame di winform è simile alla TFrame di delphi/xe
 
La cosa più vicina a un "Frame" di Delphi nel mondo .NET è lo *UserControl*.
 
Puoi aggiungerlo dallo stesso menu che ti fa inserire Form, classi e altri elementi nel progetto, o dalla finestra di dialogo che mostra tutti gli elementi.
 
Puoi anche ereditare da uno *UserControl*, così come avviene in Delphi, ma devi prima fare un "Build" del tuo progetto.
 
Ciao,
  Marco.
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
#Home: 
http://bit.ly/marcobreveglieri
 
#Blog: 
http://bit.ly/compilaquindiva
 

Ecco: mi sento un idiota. :-((
Avevo notato che se fai new-usercontrol LUI poi ti dice "trascina qua eventuali oggetti" ma non avevo collegato questa cosa ai frame.
 
Grazie, Marco.
 
A.

 Ecco: mi sento un idiota. :-((
 
Di solito, Google (che tu spesso raccomandi agli altri), e` un buon rimedio a questo problema. Tra i primi risultati: 
 
http://bytes.com/topic/c-sharp/answers/245254-delphis-tframe-equivalent
Newsgroup: it.comp.lang.delphi
Titolo: Info

No allora questo e' impossibile...
la form intera del delphi e' un programma, non puoi visualizzarla sulla
pagina..
mi spiace !!
-- 
Posted from 
relay4.inwind.it
 [212.141.53.75] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Scusa ma devo contraddirti. C'e' un esempio se non erro in uno dei libri
di Cantu'. Prova a vedere su 
www.marcocantu.com
 o .it. 
Sostanzialmente si tratta di trasformare la form in un ActiveX.
Saluti
Paolo Arosio

Newsgroup: it.comp.lang.delphi
Titolo: Cache Webbrowser

Salve a tutti,
qualcuno mi sa dire se la cache di Webbrowser è la stessa di IE?
Ovvero viene scaricata nelle medesime directory?
Grazie.
-- 
_________________________________________
Gaetano
"Nel coltellino svizzero ci Chuck Norris c'è McGyver"
 


Ciao Gaetano, 
si è la stessa perchè il controllo webbrowser altri non è che
l'importazione dell'interfaccia activex dell'internet explorer.
Ciao
Cristiano
--- posted by geoForum on 
http://www.delphiedintorni.it

Newsgroup: it.comp.lang.delphi
Titolo: Unit XPMan e TXPManifest object

Ragazzi scusate, ma questo oggetto è presente solo a partire
da Delphi 7 ?
Grazie
Antonello


Open Delphi Manual (
http://groups.yahoo.com/group/delphi_open_manual/
)
Newsgroup: it.comp.lang.delphi
Titolo: mettere quattro panel uguali in un tabsheet e renderli proporzionati al form

Ho un problema curioso, di disegno su un form : questo form contiene un 
pagecontrol. Nel page control vengono create delle pagine, i tabsheets.
Ogni tabsheet deve contenere quattro panel uguali. affiancati in questo 
modo:
12
34
Se ridimensiono il form ingrandendolo o rimpicciolendolo, i quattro 
panel devono ingrandirsi e rimpicciolirsi a loro volta, in modo 
proporzionale. devono sempre restare con quel layout:
12
34
Come faccio a farceli stare tutti e 4 insieme in un tabsheet senza 
scrivere codice, ma agendo solo sulle anchors e sugli align ? Secondo 
voi e' possibile?
Diversamente, in che modo li posso gestire da codice?
Grazie
-- 
Morde


Come farlo senza codice ... nin so :(
ma da codice io farei:
Dati 6 pannelli
2 pannelli con owner il tabsheet
PF1 con allineamento a Sx
PF2 con allineamento a Dx
2 pannelli con owner PF1
P1 con allineamento Top
P3 con allineamento Botton
2 pannelli con owner PF2
P2 con allineamento Top
P3 con allineamento Botton
4 righe di codice
Evento Onresize della form
procedure TForm1.FormResize(Sender: TObject);
Var nWidth: Word;
     nHeight: Word;
begin
   nWidth := cxTabSheet2.Width;
   nHeight := cxTabSheet2.Height;
   PF1.Width := Round(nWidth/2);
   PF2.Width := Round(nWidth/2);
   P1.Height := Round(nHeight/2);
   P2.Height := Round(nHeight/2);
   P3.Height := Round(nHeight/2);
   P4.Height := Round(nHeight/2);
end;
Potrebbe essere un idea ...poi vedi tu :)
^_Goblin_^
-- 
Ibis et redibis non morieris in bello
http://goblinland.myminicity.com/

 Potrebbe essere un idea ...poi vedi tu :)
Goblin sei un mostro :-)
Funziona perfettamente, grazie :)
PS: Quello che non avevo visto ï¿œ che i lati opposti all' align, se 
messi in mezzo, a prescindere dalla dimensione del form saranno sempre 
a metï¿œ e quindi non li devo spostare :-)
-- 
Morde


Potresti fare un piccolo upgrade ...
Mettere i pannelli PF2, P3, P4 con align=alClient e settare solo
   PF1.Width := Round(nWidth/2);
   P1.Height := Round(nHeight/2);
   P2.Height := Round(nHeight/2);
^_Goblin_^


 Potresti fare un piccolo upgrade ...
Upgrade perfetto :)
thx
-- 
Morde

 voi e' possibile?
Non ho ben capito che tipo di disposizione desideri implementare, 
comunque sia potresti dare un'occhiata al *TGridPanel* che consente di 
configurare un layout strutturato in righe e colonne, come una tabella, 
le cui dimensioni possono essere espresse anche in valori percentuali - 
se non ricordo male - consentendo quindi di ottenere un layout che 
presumo sia simile a quello che cerchi.
Ovviamente, la disponibilitï¿œ di questo controllo dipende dalla versione 
di Delphi che utilizzi. ;)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 Delphi che utilizzi
Delphi 5,e il componente non ï¿œ presente. Ma non ï¿œ necessario, la 
soluzione di goblin ï¿œ perfetta :)
grazie
ciao
-- 
Morde
Newsgroup: it.comp.lang.delphi
Titolo: Problemino:

Dunque, il mio programmino viene eseguito allo startup di windows, solo che
usa i percorsi (necessita di files presenti nella sua stessa cartella), e il
problema č che partendo con l'avvio del computer la cartella corrente
diventa il desktop dell'utente e non la cartella dell'applciazione... c'č
una procdura generica per richiamare il path dell'eseguibile in esecuzione?
grazie, Poochie

Anche io ho un problemino: ho dovuto aprire il tuo post x capire il tuo
problema.
vedi oggetto TApplication.
A

questa funzione restituisce la cartella dell'eseguibile:
uses SysUtils
...
ExtractFilePath(Application.Exename)
spero sia utile ciao!
--
Max Etere
massimili...@programmando.org
http://www.programmando.org

 ExtractFilePath(Application.Exename)
O, meglio ancora, ExtractFilePath(ParamStr(0))
Cosě funziona anche nelle applicazioni Application-less :))
--
Jax
Journeying Artificial Xenomorph

^_^

 wrote in message
news:oF%Ea.63486$pR3.1...@news1.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: Gestione webcam usb in delhpi

Ciao a tutti,
esiste un modo semplice per gestire le webcam usb in delhi 7.
Grazie a tutti
Sabrina

1) Cosa vuol dire semplice?
2) Se ne è parlato in passato.
A.

Per semplice intendo che non debba scrivere centinaia di righe di codice 
per la gestione.
Ho provato a cercare sui vecchi messaggi del NG ma ho trovato poco o nulla.
Sabrina
Alberto Salvati ha scritto:


> Ho provato a cercare sui vecchi messaggi del NG ma ho trovato poco o nulla.
hai cercato negli altri posti?
A.

Si ma non ho trovato nulla di utile
Ho visto che qualcuno si è appoggiato alle API di Windows ma la vedo 
come ultima spiaggia.
Alberto Salvati ha scritto:


 usa videograb che è molto completo solo che è commerciale oppure ci sono anche componenti delphi open source su 
sourceforge.net
un esempio di videograb nel suo utilizzo lo puoi vedere in un mio
programmino a 
www.marijsoft.com/setup.exe
 è facile da utilizzare e
dire completo per fare tutto
Newsgroup: it.comp.lang.delphi
Titolo: cpp2delphi

Esiste un tools che mi permetta di convertire, almeno per una buona 
parte, un progetto cpp in un delphi?
 
Giorgio

 parte, un progetto cpp in un delphi?
 
A quale tipo di progetto CPP ti riferisci?
 
--
MARCO BREVEGLIERI (Software and Web Developer)
#Home: 
http://bit.ly/marcobreveglieri
 
#Blog: 
http://bit.ly/compilaquindiva
 

Il 03/10/2014 15:30, Marco Breveglieri ha scritto:

Ti posto un po' di codice, tanto per farsi un'idea.
Conosco il c++ ma essendo file di discrete dimensioni se c'e' un tool 
che mi "sgrossa" poi naturalmente ci lavoro su, non pretendo precisione.
 
Giorgio
 
#include "stdafx.h"
#include "videodriver.h"
#include <StrSafe.h>
LPSTR driverName = "mv video hook driver2";
 
#define MAP1 1030
#define UNMAP1 1031
#define CURSOREN 1060
#define CURSORDIS 1061
 
VIDEODRIVER::VIDEODRIVER()
{
	mypVideoMemory=NULL;
	mypchangebuf=NULL;
	myframebuffer=NULL;
	shared_buffer_size=0;
}
 
void
VIDEODRIVER::VIDEODRIVER_start(int x,int y,int w,int h,int depth)
{
	blocked=true;
	oldaantal=1;
	mypVideoMemory=NULL;
	OSVER=OSVersion();
	if (OSVER==OSWIN2000||OSVER==OSWIN2003||OSVER==OSWINXP)
	{
		if (Mirror_driver_attach_XP(x,y,w,h,depth))
		{
			if (GetDcMirror()!=NULL)
			{
			mypVideoMemory=VideoMemory_GetSharedMemory();
			mypchangebuf=(PCHANGES_BUF)mypVideoMemory;
			myframebuffer=mypVideoMemory+sizeof(CHANGES_BUF);
			}
			else
			{
				mypVideoMemory=NULL;
			}
		}
		else
		{
			mypVideoMemory=NULL;
		}
	}
	if (OSVER==OSVISTA)
	{
		if (Mirror_driver_Vista(1,x,y,w,h,depth))
		{
			if (GetDcMirror()!=NULL)
			{
			mypVideoMemory=VideoMemory_GetSharedMemory();
			mypchangebuf=(PCHANGES_BUF)mypVideoMemory;
			myframebuffer=mypVideoMemory+sizeof(CHANGES_BUF);
			//if (mypVideoMemory==NULL) MessageBox(NULL,"MVideo driver failed", 
NULL, MB_OK);
			}
			else
			{
	//			MessageBox(NULL,"Video driver failed", NULL, MB_OK);
////////////////////////////////////////////////////////////////////////////////
				if (Mirror_driver_attach_XP(x,y,w,h,depth))
					{
						if (GetDcMirror()!=NULL)
						{
						mypVideoMemory=VideoMemory_GetSharedMemory();
						mypchangebuf=(PCHANGES_BUF)mypVideoMemory;
						myframebuffer=mypVideoMemory+sizeof(CHANGES_BUF);
						}
						else
						{
							mypVideoMemory=NULL;
						}
					}
					else
					{
						mypVideoMemory=NULL;
					}
////////////////////////////////////////////////////////////////////////////////
				//mypVideoMemory=NULL;
			}
		}
		else
		{
			mypVideoMemory=NULL;
		}
	}
	blocked=false;
}
 
void
VIDEODRIVER::VIDEODRIVER_Stop()
{
	OSVER=OSVersion();
	if (OSVER==OSWIN2000||OSVER==OSWIN2003||OSVER==OSWINXP)
	{
		Mirror_driver_detach_XP();
		if (mypVideoMemory!=NULL) VideoMemory_ReleaseSharedMemory(mypVideoMemory);
	}
	if (OSVER==OSVISTA)
	{
		Mirror_driver_Vista(0,0,0,0,0,0);
		if (mypVideoMemory!=NULL) VideoMemory_ReleaseSharedMemory(mypVideoMemory);
	}
	mypVideoMemory=NULL;
	mypchangebuf=NULL;
	myframebuffer=NULL;
 
 
}
Newsgroup: it.comp.lang.delphi
Titolo: GestionaleOpen?

Qualcuno lo conosce e/o lo utilizza e/o ha avuto modo di smanettarci su? 
Cosa ne pensa?
 
-- 
Jax

 Cosa ne pensa?
 
Mi sono fermato dopo la prima riga della brochure:
 
"linguaggio di programmazione Object Oriented Delphi che facilita l'integrità logica del prodotto grazie all'utilizzo di specifiche classi gestionali;"

PS... e un'occhiata al codice sorgente mi ha fatto venire i brividi...
Newsgroup: it.comp.lang.delphi
Titolo: Alternative a OnCreate?

Ho un quesito da porvi: se aggancio una funzione all'evento OnCreate del
modulo principale del programma, questa viene eseguita prima che la finestra
compaia. Esiste un modo per eseguire una funzione appena la finestra e'
comparsa? Devo agganciarla a "OnShow", e usare un flag per fare in modo che
si attivi solo la prima volta?

Gabriele Boccone,

oppure puoi fare:
procedure TForm1.FormShow(Sender: TObject);
begin
  ShowMessage('pippo');
  Form1.OnShow := nil;
end; 
Ciao, Anto'.

 ha scritto nel messaggio
news:b00j4l$pf1$1...@newsreader.mailgate.org...

On Activate?
Alessandro

 On Activate?
Ha sempre bisogno di un flag, altrimenti tutte le volte che cambio il fuoco
la finestra si riattiva e la funzione riparte.

 fuoco la finestra si riattiva e la funzione riparte.
se come ultima istruzione della procedura metti
TuaForm.OnActivate := nil;
oppure
TuaForm.OnShow := nil;
la procedure viene eseguita solo una volta.
Ciao, Anto'.

 la procedure viene eseguita solo una volta.
Ho capito, e ti rngrazio per la risposta , ma mi sembra quasi piu' brutto
che usare il flag...
Pensavo che ci fosse un evento, come per le tabelle di database ci sono
"BeforePost" e "AfterPost"... Alla fine penso che usero' la tua soluzione...

"BeforePost" e "AfterPost"... Alla fine penso che usero' la tua soluzione...
Il fatto e' che anche se ci fosse l'evento "Before".."After..", 
se tu vuoi che venga gestito solo 1 volta sei costretto a ricorrere ad un flag.
Mettere a nil l'evento onshow e' una scorciatoia molto piu' comoda, anche
se alla fine il risultato che vogliamo ottenere e' sempre raggiunto :-) !!!
Ciao!!
Morde.
morde [at] programmer [.] net

la finestra si riattiva e la funzione riparte.
Non c'e` alternativa.  D'altronde, sotto Windows, non puoi stabilire
quando "parte" la maschera, in quanto questo stato e` puramente logico
e legato a cio` che il programmatore vuol fare.  Il metodo che seguo
io e` quello di avere un flag "FirstTime" da mettere a True
nell'OnCreate, nell'OnActivate si esegue un Update della maschera e si
procedere al controllo: FirstTime ? allora metti FirstTime a false ed
esegui la procedura di partenza, altrimenti non fai nulla ed esci
dall'OnActivate.

"Gabriele Boccone"

L'OnShow della finestra principale in genere viene eseguito una sola
volta (a meno di fare esplicitamente Hide e poi Show).
Saluti
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: Numero di files in directory

Ciao a tutti.
Sotto D7 vi risulta esista una funzione che ritorni il numero di files
presenti in una directory (al fine di parametrizzare una Progress Bar che mi
segnali poi l'elaborazione di ogni files) oppure devo ricorrere a FindFirst
due volte, la prima per ottenere il numero dei files e la seconda per
analizzarli?
Grazie per eventuali suggerimenti.
Valter

 analizzarli?
Non sono a conoscenza di una funzione simile, ma non è detto che tu 
debba scandire la cartella una seconda volta: ti basta memorizzare i 
nomi dei file o le informazioni fondamentali in una struttura da 
scandire successivamente per compiere le operazioni che desideri in un 
secondo momento.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 secondo momento.
In realtà un'operazione è immediatamente precedente all'altra.
Rilevo il numero dei file per poter assegnare alla proprietà Max il
parametro corretto così da tenere traccia dell'avanzamento dell'elaborazione
dei file. Quest'ultimi non necessitano di essere aperti con un ordine ben
preciso bensì è sufficiente come vengono pescati da FindFirst.
Credo che memorizzare i nomi dei file o quant'altro sia più impegnativo che
ricorrere 2 volte a FindFirst...ma se vedi qualche lacuna nel mio
ragionamento fammi sapere.
Grazie
Valter

 ragionamento fammi sapere.
Non penso che l'enumerazione di file sia particolarmente impegnativa, a 
meno che non ci siano migliaia di file.
Il problema è cosa ci devi fare con ciascun file, che tipo di 
elaborazione devi compiere.

Newsgroup: it.comp.lang.delphi
Titolo: Bookmark

Salve, ho un problema con l'uso dei bookmark con Delphi 5 e Interbase 6.
Nella mia applicazione ho una TQuery collegata a un TDataSource e
quest'ultimo a una TtsDBGrid,
Vorrei che dopo aver chiuso la query e aver aggiornato alcuni campi della
tabella a cui è collegata la query, quando viene riaperta il cursore si
riposizioni sulla stessa riga della griglia in cui si trovava prima di
chiudere la query. Sulla query è presente anche un filtro, però non viene
fatto sui campi che vengono aggiornati sulla tabella.
Ho provato a fare così:
var
  NumRecord: Integer;
  Book: Variant;
Book:=tsDBGrid.DataSource.Bookmark;
NumRecord:=tsDBGrid.DataSource.RecordCount;
Query.Close;
AggiornaTabella();
Query.Open;
if(tsDBGrid.DataSource.RecordCount=NumRecord) then
    tsDBGrid.DataSource.Bookmark:=Book;
Normalmente funziona, però alcune volte quando viene riassegnato il bookmark
da' il messaggio d'errore "Cound't find record".
Ho provato anche a usare GetBookmark e GotoBookmark, però il risultato è
stato peggiore, perché lo stesso errore lo da' più spesso.
Grazie in anticipo.
Alessandro

imho...
1) usare la recordcount su una query non è consigliabile
Quando apri una query, essa NON SA quanti record ha restituito.
Ergo, x calcolare la recordcount deve fare un fetchall, ovvero, smazzarsi
tutti i record per vedere quanti ne sono.
se sono 100, passi.
Ma se la tua query sforna all'utente 50000 records cosa succede?
Il tutto poi per sapere se il totoale dei records letto prima della
variazione è uguale a quello calcolato dopo la variazione?
Non sarebbe più semplice fare in modo che la funzione AggiornaTabella ti
ritorna un valore enumerato che indica se è avvenuto un insert, un update o
una delete?
type
  TipoOperazione = (ttoInsert, ttoUpdate, ttodelete)
function AggiornaTabella: TTipoOperazione
2) Invece del bookmark che ha alte probabilità di cambiare ad ogni chiusura
e riaperura della query, si può ricorrere ad una Locate, usando come valore
quello della PK del record oggetto della modifica:
CurrentPt := TuaQuery.FieldByName('QualcheCampo').AsQualcosa;
case AggiornaTabellaOf
  ttoInsert, ttoDelete: CanSetOldPosition := False;
  ttoEdit: CanSetToOldPosition := True;
end;
...
if CanSetToOldPosition then
  TuaQuery.Locate(......
Bye
A.

   TuaQuery.Locate(......
Avevo già pensato al locate, però ho paura che il tempo per fare un locate
sia molto maggiore rispetto a quello di un bookmark, se però non c'è modo di
risolvere il problema dei bookmark... allora non ho altra scelta che usare
il locate.
Comunque, grazie.
Alessandro

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

Se voglio ridurre il mio programma ad icona nella zona dell'orologio, quella
dove c'è anche la tromba, come devo fare?
Grazie per le risposte.

 quella dove c'è anche la tromba, come devo fare? Grazie per le risposte.
 
hehe :) veramente e' uno speaker! ;)
soluzione semplice, vai su 
www.torry.net
e cerca tray icon e' qlcosa del genere
tra l'altro mi sempra che nelle versioni 5 ci sia gia' un componente
incluso...
Ciao,
Alan Solo

 ha scritto nel messaggio
news:8vjtnb$4ps95$1...@ID-44131.news.dfncis.de...

Newsgroup: it.comp.lang.delphi
Titolo: D7 + Firebird + select con group by

scusate, sto eseguendo una semplice select con group by su firebird 1.5.2,
ma continua a restituirmi l'errore: 
Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Invalid expression in the select list (not contained in either an
aggregate function or the GROUP BY clause).
ecco la query : 
SELECT
  DRIGARTDATA,
  DRIGARTCOD,
  DRIGPREZZO,
  DRIGID,
  DRIGPREID,
  DRIGDOCID,
  DRIGDOCNR,
  DRIGDOCANNO,
  DRIGARTDESC1
FROM tabella
GROUP by
  DRIGARTDATA,
  DRIGARTCOD,
  DRIGPREZZO
Sbaglio, oppure e' tardi?
grazie
Ciao
--- posted by geoForum on 
http://www.delphiedintorni.it

ma continua a restituirmi l'errore: 
Innanzitutto sei Off-Topic: questo argomento non c'entra nulla con
Delphi, quindi la prossima volta rivolgiti ad un altro gruppo.  In
secondo luogo, come pensi di poter selezionare un certo numero di
campi e raggruppare per un numero diverso di essi ? ti sembra una cosa
logica ? Se tu fossi al posto del DB come ti comporteresti ? 

Prima di impazzire, sarebbe il caso di documentarsi.
In TUTTI i manuali sql è chiaramente spiegato che se usi group by devi
indicare nella clausola tutti i campi di tabella indicati nella select
AS
Newsgroup: it.comp.lang.delphi
Titolo: Data + Ora?

Qualcuno ha mai provato a introdurre in una sola variabile TDateTime
un valore di tipo TDate e un TTime? Io credevo che si potessero
sommare (se non sbaglio la data e' la parte intera e l'ora quella
decimale), ma da prove fatte non funzia...
Suggerimenti?
Ciao
--
Piero Bonanno
bop...@libero.it
pie...@tiscalinet.it
bpie...@hotmail.com
______________________________________________
"Madame, lei ha tra le gambe uno strumento
che puo' offrire piacere a migliaia di persone,
e tutto quello che sa fare e' grattarlo"
- Sir Thomas Beechan a una violoncellista

 Suggerimenti?
in effetti e' cosi'.. probabilmente hai sbagliato da qualche parte.. prova a
postare il codice.
e' scritto sull'help di delphi :)
Ciao !                                                        MSX

Suggerimenti?
Impossibile, io faccio sempre cosi' e funziona alla
perfezione.  
Non e' che stai lavorando coi TDateTimePicker, vero ?? >:)
-- 
Andrea Laforgia - walkietalkie(at)
libero.it

Non e' che stai lavorando coi TDateTimePicker, vero ?? >:)
Ca%%o, proprio con quelli...che pero' hanno le proprieta' Date e Time,
che fregatura c'e' sotto??


che fregatura c'e' sotto??
Eh eh eh ... era qui che ti volevo :)
Quando piazzi un TDateTimePicker su un form, ti appare, tra
le proprieta', la data e l'ora corrente.
Il problema e' che, anche se il suo Kind e' dtkDate,
conserva sempre il valore della proprieta' Time come
decimali.
Per cui, qualsiasi giorno scegli, conterra' tra i decimali
anche il valore del Time.
Secondo me questo si puo' ritenere un bug del componente,
perche', a rigor di logica, una volta che si e' stabilito
che il componente puo' essere o solo Date o solo Time
(aut..aut), il valore di DateTime deve escludere,
rispettivamente, i decimali o gli interi.
La soluzione che applico, generalmente, nel caso lo utilizzi
per selezionare un giorno, e' quello di usare Trunc() sul
valore della proprieta' DateTime e Frac() nel caso voglia
estrarre solo il tempo.
Te l'ho chiesto, perche' ci sono gia' passato e quasi
impazzivo, prima di capire il problema.



Effettivamente c'era da perderci la testa, oltretutto la form serve
solo per il test, la UI vera e propria e' fatta in ASP, su cui gia' ci
sto perdendo la capa...
Tante grazie a te e a MSX

Newsgroup: it.comp.lang.delphi
Titolo: Errore lettura da file

Qualcuno di voi mi sa spiegare perchè il seguente pezzo di codice mi da
errore sulla read dicendomi "Incompatible Types"
Grazie
var
  version:file of string[50];
  tempvar:string[50];
begin
      try
        AssignFile(version, 'updt.cfg');
        Reset(version);
        read(version, tempvar);
      finally
        closefile(version);
    end;
end; 

         closefile(version);
inoltre assignfile andrebbe messo fuori del blocco try.
Se fallisce, chiami la closefile di un handle non assegnato: AV!
-- 
Alberto Salvati
A *Neapolitan* delphi developer whow is studing c# & .Net

  tempvar:string[50];
potrebbero non essere delle stesso tipo perché sono dichiarazioni
separate, cerca "Type Identity" nell'help, e prova 
type
  Str50 = string[50];
var
  version: file of Str50;
  tempvar: str50;
Luigi D. Sandon - D&amp;D Support Team
--- posted by geoForum on 
http://www.delphiedintorni.it

Newsgroup: it.comp.lang.delphi
Titolo: ZeosDBO e SHOW CREATE TABLE troncato

Se c'è qualcuno che usa Zeos con MySQL, potrebbe farmi un esperimento?
in Mysql esiste il comando SHOW CREATE TABLE <tabella> che restituisce un
record con la struttura della tabella specificata, indici inclusi.
Ho notato che con la versione di Zeos che uso, la 5.4.1, questo record ha
una lunghezza limitata (non so a quanti caratteri), perciò mi tronca la
definizione.
Siccome è un bug che hanno già riscontrato altre persone, ma non so se
passando alla versione 6 viene risolto, prima di riscrivere l'applicazione
(la v6 è piuttosto diversa dalla 5), mi piacerebbe se qualcuno di voi
provasse questa cosa, per favore.
Grazie in anticipo
-- 
Jax
====
Quando tutto il resto fa fiasco, prova a fare come dice tua moglie.

 Se c'è qualcuno che usa Zeos con MySQL, potrebbe farmi un esperimento?
In un lampo di genio ho pensato: perché non ci provi tu stesso, pirla?
Infatti il problema nella 6.1.5 è stato risolto.
Grazie lo stesso.
-- 
Jax
====
Nessuno può mostrare troppo a lungo una faccia a sé stesso e un'altra
alla gente senza finire col non sapere più quale sia quella vera.
(Nathaniel Hawthorne)