mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Problema con RightStr?!?

Ciao a tutti i partecipanti al NG,
uso Delphi 6 e sto facendo il mio primo programmino;
devo manipolare delle stringhe e ho un piccolo problema:
faccio:
Stringa := RightStr(Stringa,lunghezza);
impostando un break prima che l'istruzione mi venga eseguita e uno
dopo vedo che Stringa ha il valore che mi aspetto, tranne per il fatto
che mi viene segato via l'ultimo carattere della stringa.
Dove sbaglio?????
Grazie per l'attenzione 
Paolo

Io non conosco il delphi 6 (figurati, sono ancora alla versione 4!), 
però incuriosito dal comando ho cercato in Internet il codice di quella
funzione... e questo qui sotto dovrebbe esser lui!
  function RightStr(Const Str: String; Size: Word): String;
  begin
   if Size > Length(Str) then Size := Length(Str);
   RightStr := Copy(Str, Length(Str)-Size+1, Size)
  end;
...ora, facendo delle prove ho notato che tutto funziona correttamente!
Se posti la procedura che utilizzi posso darci un'occhiata!
Ciao, 
Dario
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.lang.delphi
Titolo: Dubbi su Tutil32

Cerco le Tutil32 della Borland per Delohi 4. Mi sapete indicare dove le
posso scaricare??? Sono alle prime armi con il Delphi e a quanto pare
dal sito della Borland non le sono riuscito a trovare. Se è possibile
indicatemi il link esatto.
Successivamente questo componente mi servirà in un mio programma come
faccio ad utilizzarlo??? Si deve installare o altro
Grazie NIc
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

3 post x la stessa cosa??
Bye
AS

mi sembri un po' ripetitivo...

 mi sembri un po' ripetitivo...
intanto non mi hai per nulla aiutato 
Potevi essere almeno gentile da rispondermi
Grazie


 AS
intanto non mi hai per nulla aiutato 
Potevi essere almeno gentile da rispondermi
Grazie
-- 


 Potevi essere almeno gentile da rispondermi
Ma scusa... 2 persone ti fanno notare la stessa cosa...
e te lo faccio notare anch'io, che hai postato 3 volte (e mi sembra non per 
errore!?) per lo stesso argomento... come minimo dovresti chiederti se hai 
sbagliato e, se ti senti, scusarti.
Ad ogni modo, mi e' bastato cercare "tutil32" su 
www.google.it
 e prendere 
il PRIMO risultato!!!
Le utility che stai cercando le puoi trovare su
http://www.borland.com/devsupport/bde/utilities.html
Ciao,
Davide DG.
-- 
All resistance is futile! Prepare to be disassembled !

 Grazie
Di niente.
AS

Io in genere quando ho tempo cerco di essere "gentile" con tutti e
aiutarli a risolvere i loro problemi, come potresti notare leggendo i 
messaggi del NG.
Mi sembra solo che tre post consecutivi non siano solo una richiesta 
di aiuto ma indice di maleducazione, in quanto non hai aspettato neanche
un po' per vedere se qualcuno ti rispondeva.
Comunque, ecco il tuo link:
http://www.borland.com/devsupport/bde/utilities.html
 
cosě sono stato "gentile" anche con te, anche se bastava fare una 
ricerca su qualsiasi motore.


 faccio ad utilizzarlo??? Si deve installare o altro
Non c'e' niente da installare.
Ti serve soltanto interfacciare la DLL fornita.
C'e' la unit pascal che inglobi nel tuo PAS e che ti offre i 
prototipi di funzione da usare.


intanto non mi hai per nulla aiutato 
Ricorda che su usenet le cose si chiedono con calma e per favore.
Ciao.
Newsgroup: it.comp.lang.delphi
Titolo: DbGrid e titoli su due righe

Non e' possibile, in una DBGrid, mettere i titoli delle colonne su
piu' righe ??
Grazie
Ciao
Stefano.


E' possibile scrivendo molto codice.
Se hai poco tempo, devi rivolgerti a componenti che estendono la dbgrid.
Dai un'occhio su 
torry.net
 oppure a questo componente (a pagamento)
http://freespace.virgin.net/giles.lindsay/GJL-Software/ExDBGrid.html
ciao
Morde
Newsgroup: it.comp.lang.delphi
Titolo: Jedi delphi 7 e windows 7 64bit ???

Ciao, la trinitï¿œ :
 
delphi
windows 7 64 bit
jedi component
 
Puï¿œ coesistere ?
Delphi 7 su windows 7 64bit installato e compila.
Installati alcuni componenti di terze parti per winxp e funzionano 
(almeno per il momento)
 
I jedi components no, ad un certo punto dell'installazione delle JCL mi 
da un errore del file dcc32.exe ("Ha smesso di funzionare")
 
Aiuto, Help, SOS, ...---...

 da un errore del file dcc32.exe ("Ha smesso di funzionare")
 
Bisogna vedere con quali opzioni viene richiamato il compilatore, e il problema potrebbe non avere minimamente a che fare con il sistema operativo in uso.
 
Apri i package da Delphi e fai il Rebuild/Install direttamente dall'IDE.
 
-- 
MARCO BREVEGLIERI
#Home: 
http://www.marco.breveglieri.name
 
#Blog: 
http://www.compilaquindiva.net
 


 
Ciao
hai pienamente ragione....
L'errore MIO è che windows 7 64 bit crea 2 cartelle programmi (x86)
durante l'installazione io linkavo quella sbagliata e durante 
l'installazione dei componenti jedi avevo un errore.
La cosa strana adesso è che in esecuzione da delphi, l'applicazione 
gira, mentra facendo partire l'exe mi ad l'errore
 
"applicazione 16 bit non supportata"
  impossibile avviare o eseguire il programma o le funzionalità .....
 
.....\temp\~RomDmp1\RomDump.com
 
 

 .....\temp\~RomDmp1\RomDump.com
 
Sei assolutamente certo che l'exe che lanci è LO STESSO GENERATO DALL'ULTIMA COMPILAZIONE, ANZI, BUILD, CHE HAI FATTO DA DELPHI?
A parte cio, qlc spiega ad un ignorante come me ke kaz è il romdump.COM??
Ancora, non per sapere i fatti tuoi, ma la tua app che fa?
 
A.

 A.
 
"Sono solo fatti miei." [cit.]
Scherzo, elaborazione CAD.
Saluti compilati e buildati.
 
 
 
 
 

 mostra come programmi x86.
 
format c:???
 
 
A.


Esagerato...
Comunque ha fatto tutto lui sto scostumato. Ha preso possesso di se 
stesso e fa quel cazzo che vuole.
Tra un po' mi formatta lui. Meglio se mi backuppo.
 
Giorgio
Newsgroup: it.comp.lang.delphi
Titolo: Sistema di show circolari

Devo implementare un sistema "circolare" di form, e cioe' un sistema dove ogni
form puo' richiamare (visualizzare) gli altri, con la regola che il chiamante
nasconde se' stesso e il chiamato diventa il form attivo.
Ad es.:
frmPADRE --> E' il principale
frmA, frmB, frmC sono i figli.
frmPadre viene visualizzato sullo sfondo, i tre form figli devono potersi
chiamare reciprocamente, nascondendosi (non chiudendosi) a loro volta dopo la
chiamata.
Ogni form che viene visualizzato, viene visualizzato in modale.
Come e' possibile ottenere un sistema simile?
-- 
Morde. 
morde[at]programmer[.]net

 Come e' possibile ottenere un sistema simile?
procedure TfrmPadre.MostraFigli;
var curSon: TFormFiglio;
begin
  CreaFigli();    // crea una istanza di tutti i figli se non presenti
  curSon := nil;
  while NextSon(curSon).ShowModal = mrOK do
    ;
end;
function TfrmPadre.NextSon(cur: TFormFiglio): TFormFiglio;
begin
  if cur = frmA then
    result := frmB
  else if cur = fmrB then
    result := frmC
  else
    result := frmA;
end;
Saluti
Paolo Arosio

 Come e' possibile ottenere un sistema simile?
procedure TfrmPadre.MostraFigli;
var curSon: TFormFiglio;
begin
  CreaFigli();    // crea una istanza di tutti i figli se non presenti
  curSon := frmA;
  while curSon.ShowModal = mrOK do
    curSon := NextSon(curSon);
end;
function TfrmPadre.NextSon(cur: TFormFiglio): TFormFiglio;
begin
  if cur = frmA then
    result := frmB
  else if cur = fmrB then
    result := frmC
  else if cur = frmC then
    result := frmA
  else raise EFiglioSbagliato.Create('Figlio sbagliato: cassonetto
differenziato');
end;
Saluti
Paolo Arosio


Grazie Paolo.


Newsgroup: it.comp.lang.delphi
Titolo: SPP - ECP - EPP

Esiste la possibilitò di determinare quale tipo di interfaccia parallela è
configurata  nel BIOS.
Ci servirebbe urgentemente x la tesina d'esame stato
Grazie
IPSIA MORETTO BRESCIA
azz...@ipsiamoretto.it

 ha scritto nel messaggio
news:9fpirm$q3p$1...@fe1.cs.interbusiness.it...
: Esiste la possibilitò di determinare quale tipo di interfaccia parallela è

:
:
:
prova a dare un'occhiata ai vari windows Drivers Development Kit (DDK9) su
msdn.microsoft.com
ciao
giuliano
Newsgroup: it.comp.lang.delphi
Titolo: Riparazione traccie audio

Salve a tutti! Mi hanno dato alcuni CD audio danneggiati, mi chiedo se
esistesse qualche tecnica per forzare il cd a darmi le tracce danneggiate,
per poterle recuperare ed eventualmente riparare.
HellHound - uccidi CERBERO per l'email


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

> Con Delphi??
beh, pensavo di creare un programmozzo che leggesse dei Cd non molto
danneggiati... ma forse ho azzardato un po troppo... ma a sto giro (e qui
divento OT) conosci qualche software che faccia questo?
HellHound

 qui divento OT) conosci qualche software che faccia questo?
In effetti siamo un po' OT...
Sinceramente, non credo sia possibile fare ciò che chiedi. Se non
sbaglio, i CD includono, a livello hardware, diversi meccanismi per la
correzione degli errori tramite la ridondanza delle informazioni scritte
sul supporto.
Se il supporto è danneggiato, ad esempio un CD-R per Windows, il lettore
dovrebbe essere già in grado di rilevare l'anomalia e restituire i dati
prelevandoli dai punti ridondanti sul supporto, in modo completamente
trasparente.
Pertanto, se ti vengono restituiti degli errori di lettura,
difficilmente credo che tu possa recuperarne i dati.
Nei software in circolazione, specialmente quelli per la scrittura su
CD, solitamente esistono delle funzioni che permettono di aggirare gli
errori...ma, solitamente, questi errori non corrispondono a dati
significativi ma sono solo espedienti per rendere più difficile il
processo di copia degli originali. :-|
Ciao!


Newsgroup: it.comp.lang.delphi
Titolo: ListBox senza mouse

E' possiblie selezionare un determinato elemento in un listbox evitando di
cliccarci sopra col mouse?
Per esempio:
If label1.caption := "OK" ... then .... seleziona elemento n° X.
Enzo

 If label1.caption := "OK" ... then .... seleziona elemento n° X.
ListBox1.ItemIndex := x;
--
Jax

 ListBox1.ItemIndex := x;
Sě, questo seleziona l'item, ma non lo "attiva".
Insomma, c'č bisogno di un ulteriore clic (o di un tasto di direzione), solo
che
ListBox1.Click
non funziona.
Non č possibile ottenere tutto (selezione e "attivazione") con un unico
comando?
Enzo

 cliccarci sopra col mouse?
Si, e Jax ti ha dato la risposta...
ListBox1.ItemIndex := x;


E possibile scrivere una applciazione con un unico comando?
ListBox1.ItemIndex := x;
e poi scateni l'evento OnClick
ListBox1Click(ListBox1);
--
Acqua
Newsgroup: it.comp.lang.delphi
Titolo: Esportazione in excel in lingua tedesca con Delphi5

Salve,
realizzo normalmente l'esportazione di dati in excel utilizzando i
componenti excelapplication, excelworkbook ecc. senza problemi su
diverse versioni di Office. Ma ora devo farla su un Office 2007 in
lingua tedesca e ho dei provlemi. In sostanza la mia applicazione apre
regolarmente Excel ma quando prova a scrivere dentro una cella mi da
un errore (excel) che suona più o meno così 'Ungulting Index'. I miei
amici tedesci dicono che significa 'Indice mancante' o non trovato.
Tenendo presente che la prova l'ho fatta su un paio di PC ottenendo lo
stesso risultato e che la stessa applicazione funziona regolarmente su
un Office 2007 in lingua italiana, potete confermarmi che il problema
è proprio della lingua? E se si, è risolvibile in qualche maniera?
Ringrazio anticipatamente e saluto.
Paolo


Ciao,
l'errore che ti da vuol dire esattamente che l'indice non è valido, se
posti due righe di codice di come esegui questo export forse ci è di
aiuto, in office 2007 in italiano funziona?
ciao
Stefano

 aiuto, in office 2007 in italiano funziona?
Si, con il 2007 in italiano funziona, provato su diversi pc senza
problemi.
Ecco un pò di codice:
 try
  ExcelApplication1.Connect;
 except
  on E: Exception do
  begin
   E.Message:='Excel non è disponibile!';
   Raise;
  end;
 end;
 ExcelApplication1.Visible[0]:=True;
 ExcelWorkbook1.ConnectTo(ExcelApplication1.Workbooks.Add(EmptyParam,
0));
 //Imposto un foglio di lavoro
 ExcelWorksheet1.ConnectTo(ExcelWorkbook1.Sheets['Foglio1'] as
_Worksheet);
 ExcelWorksheet1.Name:=SourceDati.Dataset.GetNamePath;
 //Imposto la prima riga di dati con i nomi delle colonne della
tabella
 i:=1;
 y:=1;
 Sourcedati.dataset.DisableControls;
 for j:=1 to SourceDati.Dataset.FieldCount-1 do
 begin
  if copy(SourceDati.Dataset.Fields[j].FieldName,1,2)<>'ID' then
begin  // l'if è solo per evitare di esportare certi campi
 
ExcelWorksheet1.Cells.Item[i,y]:=SourceDati.Dataset.Fields[j].GridDisplayName;
   inc(y);
  end;
 end;
 Inc(i);
ecc....
Già qui non ci arriva.
Saluti.

 _Worksheet);
in tedesco 'Foglio1' non esiste e credo che il problema sia questo in
quanto si chiama 'Tabelle 1' , 'Tabelle 2', ecc.
stesso discorso se per caso utilizzi delle funzioni per esempio
somma() si chiama summe(), altro problema potrebbe nascere se gli
passi una data, intendo scritta da codice per esempio 01/01/2008 la
formattazione deve rispettare le impostazioni della lingua nel caso
tedesco diventa 01.01.2008.
Ciao
Stefano

Credo proprio tu abbia ragione. Non c'avevo pensato per niente.
Grazie sei stato molto utile.
Saluti,
Paolo
Newsgroup: it.comp.lang.delphi
Titolo: Cambio colore iin una Listbox:come?

Vorrei aggiungere in una list box le directori in rosso e i nomi dei
file in nero.Listbox1.Font.Color:=clRed mi cambia il colore di tutta
la lista,cosě la listbox acquista il colore dell'ultima voce inserita.
C'č un modo x fare questo?Grazie


Open Delphi Manual (
http://groups.yahoo.com/group/delphi_open_manual/
)

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

ciao.
Vorrei inserire nel mio programma una splashform (ovvero una forma
contenente un'immagine e che mi dia messaggi tipo: caricamento modiuli
principali in conrso etc..) durante il caricamento iniziale.
-Sapete dirmi qualche sito in cui posso vedere degli esempi di splashform?
oppure potresse suggerirmi delle dritte sul come procedere per realizzare
una semplice splash form(cioč che comandi debbo mettere sul dpr)
grazie anticipatamente
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Vorrei inserire nel mio programma una splashform (ovvero una forma
io metto questo nel codice del progetto prima di    Application.Initialize;
   -> FSplash:=TFSplash.create(application);
   -> FSplash.show;
   -> Fsplash.Repaint;
   Application.Initialize;
Poi nella main form del programma , dopo aver inizializzato , aperto il db , 
fatto il caffe' insomma .. :-), faccio
Fsplash.Free;
Fsplash:=nil;
(ovviamente Fsplash è nelle uses della main form).
La form Fsplash te la fai come vuoi ...
Giulio 

 grazie anticipatamente
Prego
Gabriele
-- 
La differenza tra commuoversi e muoversi.
http://www.emergency.it/menu.php?A=004&SA=021&ln=It

grazie anticipatamente
	Ciao
	MassimoB
 
---------------------------
http://www.massimobeschi.it/

Newsgroup: it.comp.lang.delphi
Titolo: Help di Delphi5 std

Ragazzi...
sono proprio all'inizio!  non riesco nemmeno ad avere un aiuto decente
dall'help!
Ma per favore ascoltate un po' qui' che pasticcio mi succede...
Ho la seguente riga di codice per leggere da porta seriale:
 ReadFile(FHandle, FBuffer[FWriteBufferIndex], 1, Count,
@OverlappedCommEvent);
E' stata scritta e sempre usata con Delphi3, ora io la compilo con Delphi5
std ed ho un errore in compilazione su Count, definito integer:
[Error] Commun.pas(415): Types of actual and formal var parameters must be
identical
Ok allora guardo nell'help con F1 per vedere le info su ReadFile e trovo che
Count deve essere LPDWORD.
Bene, penso sia tutto chiaro e definisco Count come LPDWORD ma l'errore
continua a presentarsi.
Vado a vedere in windows.pas e trovo:
function ReadFile(hFile: THandle; var Buffer; nNumberOfBytesToRead: DWORD;
var lpNumberOfBytesRead: DWORD; lpOverlapped: POverlapped): BOOL; stdcall;
ma allora Count deve essere DWORD! Infatti se lo definisco cosi' il mio
compilatore e' contento.
E L'HELP COSA CAVOLO MI DICE ALLORA?
Mi sembra di essere diventato del tutto scemo...
Qualcuno puo' diradare questa nebbia?
grazie
maurizio

 E L'HELP COSA CAVOLO MI DICE ALLORA?
l'help delle api di windows ti fa vedere il prototipo stile C,
in generale le var LP* diventano var x: * in stile pascal
Newsgroup: it.comp.lang.delphi
Titolo: Intercettare i Tasti ALD+Canc

con Delphi4 , alla pressione (con il BDE) si attiva la richiesta per
cancellare
il Record corrente , ho provato ma riesco ad avere un codice per ALT ,
per CANC ma non per entrambi.
lo scopo e' impedire la cancellazione con questi Tasti.
potete aiutarmi ?
altra informazione vale la pena pasare da D4 a D7 , il supporto Quick report
standard e migliorato ?
(es con D4 e QReport 3.05 con WinXP ,posso stampare solo sulla periferica
 di default , anche se ne scelgouna diversa).
grazie in anticipo.

grazie in anticipo.
	Ciao
	MassimoB
 
---------------------------
http:\\
www.massimobeschi.it


anche delle parti di D4 ... ma nella mia testa era rimasto Alt+Canc
... capita , grazie delle indicazioni , anche Fuzzy e' interessante.
Maurizio

Newsgroup: it.comp.lang.delphi
Titolo: Password Delphi 6

Ho chiesto la registrazione un mese fa e ancora non mi hanno inviato la
chiave.
Qualcuno me la puo' postare?
Grazie
        Ho scaricato 160mb con un modem da 56k e non posso usare D6 Personal
Edition....mah!

Qualcuno me la puo' postare?
Serial Number is ?2fb-yjtfv-fs?3r
Authorization Key is s2p-p9z
-- 
Andrea Laforgia (
walkie...@libero.it
)
"Usenet is a strange place" [Dennis Ritchie]

 ha scritto nel messaggio
news:3c58f052...@news.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: [d7] - MySQL + delphi

ciao a tutti
sarebbe possibile lavorare in delphi con db MySQL in modo "semplice", più o
meno come l'accoppiata PHP+MySQL sui siti web?
In particolare mi interesserebbe sapere se esiste qualche componente
freeware per accedere direttamente al db MySQL e se magari è prevista una
versione "embedded" tipo firebird del MySQL, in sostanza per evitare di
installare MySQL server completo sul pc di destinazione.
grazie in anticipo per qualsiasi dritta!


ciao, io ho lavorato con ado + myodbc + mysql e mi sono trovato bene 
(solo un'annotazione: quando applichi un sort ad un adodataset che ha la 
proprietà recordcount = 0 myodbc restituisce un errore, ma è facilmente 
trappabile). Per il resto tutto ok e nessun problema.
Spero sia di aiuto. Per la versione embedded non saprei.
Ciao,
Alex.

grazie in anticipo per qualsiasi dritta!
	Ciao
	MassimoB
 
---------------------------
http:\\
www.massimobeschi.it



Io uso i componenti ZeosDBO, open source, ed è come usare il bde!
Per quanto riguarda una versione embedded, devi vedere le indicazioni sul
sito di mysql
Andrea

> Io uso i componenti ZeosDBO, open source, ed è come usare il bde!
Anch'io ti consiglio questi componenti. Sono semplici da usare ed 
affidabili. Le applicazioni create non necessitano di installazioni 
particolari.
http://www.zeoslib.net/
Ciao
Gianni

Non sono gratuiti (comunque costano poco) ma efficientissimi,
gestiscono anche l'embedded, funzionano con D7 e D8, accedono
velocemente e direttamente senza DLL o ODBC.
www.crlab.com
 
Mysql Data Access Components
ciao
Giovanni Caramia
Newsgroup: it.comp.lang.delphi
Titolo: ALPTable

Un amico mi ha dato un componente freware che permette di utilizzare i file
database, senza installare il BDE.
Il componente è "ALPTable", qualcuno lo ha mai utilizzato?, io ho provato e
sembra che funzioni, ma dov'è la fregatura? nel senso come fà ad aprire gli
archivi senza il BDE?
Grazie a tutti in anticipo

 Grazie a tutti in anticipo
supporta anche il paradox o solo i DBF ?
Inoltre quanto occupa ?
E poi in rete funziona o no ?
Si porta dietro librerie varie ?
E' veloce ecc ecc....
Va bene, per ora basta.
Non dico che sia impossibile, ce ne sono di componenti simili, poi bisogna
vedere come funzionano, magari hanno pecche varie.
Come fa ad aprire i database senza BDE ?
Bč....che ci vuole. In fin dei conti sono file come altri. Insomma hanno un
formato loro che ovviamente č documentato. Certo che fare una base dati
efficiente non č un giochetto !!
Ti saluto....ciao !!
Antonio Tarolla

Newsgroup: it.comp.lang.delphi
Titolo: Calcolo media in SQL

Ciao Ragazzi,
mi servirebbe calcolarmi la media totale di un certo numero di campi,
Attenzione! Non la somma delle medie!
Ad es.:
Campo1        Campo2        Campo3
5                     6                     6
6                     5                     4
7                     7                     5
Media Totale dei Campi = 6,2
Grazie.

 ha scritto nel messaggio
news:vrEA8.3111$5k4....@twister2.libero.it...

???????
mi spieghi come hai trovato il 6,2 ???
MEDIA
  Campo1 = 6
  Campo2 = 6
  Campo3 = 5
MediaTot = (campo1+campo2+campo3) / 3 = 5,666
oppure
media
  record1 = 5,66
  record2 = 5
  record3 = 6,33
mediatot = (r1+r2+r3)/3 = 5,663
forse sbaglio corregimi
Saluti NEA

 ha scritto nel messaggio
news:vrEA8.3111$5k4....@twister2.libero.it...

Ho provatoa fare la media matematica di tutti i valori e mi viene 5,67
(usando excel e la funzione Media).
Per ottenere quello che vuoi con una query SQL:
SELECT
    Avg(Campo1) AS Espr1,
    Avg(Campo2) AS Espr2,
    Avg(Campo3) AS Espr3,
    ([Espr1]+[Espr2]+[Espr3])/3 AS Espr4
FROM TABELLA1;
In modo da ottenere nei primi tre campi la media per colonna e poi la media
complessiva delle tre colonne.
Ciao
Gianluca
Newsgroup: it.comp.lang.delphi
Titolo: VCL Scheduler/Planner

Ciao...
qualcuno conosce una vcl che funge da planner per gestire le ore di 
lavoro e di vacanze per ogni singolo impiegato?
Qualcosa del tipo che possa specificare selezionare un range di date per 
poi poterle inserire in un db.
Ciao e grazie
Tiziano

 lavoro e di vacanze per ogni singolo impiegato?
Dai un'occhiata a questa nutrita schiera di componenti:
http://www.torry.net/pages.php?id=296
Se dirai che nessuno fa al caso tuo, non ci crederò... ;-)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 ha scritto nel messaggio
news:dmn9ng$qal$1...@area.cu.mi.it...


 wrote in message
news:dmn9ng$qal$
1...@area.cu.mi.it

ciao,
guarda qui: 
http://www.tmssoftware.com/
 
nei VCLcomponents TDBPlanner, ci sono un sacco di esempi tra cui ciň che
tu
chiedi.
Il componente č a pagamento ma puoi usare la versione demo che non ha i
sorgenti ed ha un banner che visualizza il copyright, ma per il resto
č funzionante al 100%.
Ciao
Micky
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 poi poterle inserire in un db.
Non ho visto, tra tutti quelli gia' elencati ( e sono tanti ;)) TurboPower
Visual PlanIt: 
http://sourceforge.net/projects/tpvplanit/
enjoy it!
-- 
Morde. 
ICLDweb: 
http://www2.samatel.com/icld/

 enjoy it!
ciao,
 io ho "tentato" di provarlo, a prima vista mi sembrava buono ma poi 
provandolo più approfonditamente sono saltati fuori troppi bugs, 
l'impressione che ho avuto è quella di un prodotto non finito, non ho
visto tentativi da parte di qualcuno di mettere mano al codice presente
su sourceforge ed ho desistito dall'usarlo.


 su sourceforge ed ho desistito dall'usarlo.
Grazie per il tuo feedback: io l'avevo scaricato, installato e provato (nel
senso che avevo compilato le demo e ci avevo giocato un po' sopra), poi mi
ero messo a scrivere il driver per interfacciarlo ad ADO, ma alla fine lo
sviluppo e' stato fermato perche' il cliente al quale era destinato aveva
cambiato idea.

Newsgroup: it.comp.lang.delphi
Titolo: onmousedown...

Ciao,
devo fare in modo che quando clicco su un bottone e il tasto del mouse
rimane premuto
si incrementi un contatore....una cosa stupidissima che pero' non riesco a
fare.....
ho provato a fare cosi' ma non funziona....
procedure TForm1.Button2MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
TrackBar1.Position:=TrackBar1.Position+5;
end;
Come devo fare?
thanks per ogni eventuale suggerimento...
Ciao
Simone


Non so se con OnMouseDown puoi fare quello che cerchi (ovvero fare eseguire
una procedura "inc (i)") più volte....
mi viene in mento di attivare un timer con on mousedown che ogni 50 ms (per
esempio) incrementi la tua variabile e poi nell'evento OnMouse lo fai
fermare !
Per capirci....
procedure TForm1.Timer1Timer(Sender: TObject);
begin
ProgressBar1.Position:= ProgressBar1.Position + 1;
end;
procedure TForm1.Button1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
Timer1.enabled:= true;
end;
procedure TForm1.Button1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
Timer1.enabled:= false;
end;




Perchè non lo fai gestendo l'evento OnHidle di TApplication ?
Negli eventi mouse setti un flag a true quando premi il tasto, nell'evento
mouseup lo setti a falso.
In Onhidle se il flag è true inc(i)
--
Ciao
Stefano Tampieri
ICQ 51832013


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

ciao a tutti la mia azienda mi ha chiesto di imparare delphi (provengo 
da C++ e java) per apportare delle manutenzioni evolutive ad un software 
già esistente. Sapete se si puo scaricare una versione di delfi ? 
purtroppo avrei bisogno una versione 6 ....anche non completa per 
prendere un po la mano con l'ambiente.
ciao
Pier Paolo

ehilah ha scritto:

Scarica e usa gratuitamente *Turbo Delphi*. ;-)
http://www.turboexplorer.com
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Ti consiglio anch'io la versione recentissima Delphi Turbo Explorer che
puoi scaricare qui:
http://www.turboexplorer.com/downloads
Qualora però volessi la versione 6 o 7 personal, puoi scaricarle da
qui:
http://www.borland.pl/downloads/delphi_7_personal/delphi7_personal.zip
http://www.borland.pl/downloads/delphi6personal/delphi6personal.exe
puoi ottenere i files di licenza qui:
http://www.borland.com/downloads/download_delphi.html
Ciao
Gianni


Grazie a tutti e speriamo non sia troppo difficile da imparare :)

Newsgroup: it.comp.lang.delphi
Titolo: Cercare un file

Ciao a tutti,
        ho la necessità nella mia applicazione di cercare un file
all'interno del sistema.
Diciamo che vorrei realizzare una funzione che dato in input un nome di file
mi restituisca
la diretory e il drive in cui si trova un file.
Qualcuno può indirizzarmi sulla strada giusta o magari ha qualcosa di già
fatto??
Saluti
    Giò

su torry ci sono un po di cosette che fanno qel che ti serve.
ne ho preso qualcuno un mesetto fa circa.
Bye
AS
--
Per rispondere non usare il reply ma scrivere al seguente indirizzo:
zzato(at)supereva;it
Please, don'r reply this message.
Use this address:
zzato(at)supereva;it

Ho risolto....
grazie lo stesso.
Se serve a qualcuno qui c'è tutto
http://delphi.about.com/library/weekly/aa051600a.htm
Giò

Newsgroup: it.comp.lang.delphi
Titolo: da C a Pascal ?!?

e' possibile in qulache modo leggere file *.c , *.cpp con Delphi?
c'e' qualche programma che converte i file scritti in c in pascal?

c'e' qualche programma che converte i file scritti in c in pascal?
mmmmm.......questo non lo so.
In teoria un tool simile potrebbe esistere visto che si tratta di sorgente e
non compilato, perņ non l' ho mai visto.
ti saluto.....ciao !!
Antonio Tarolla
BSSoftware Tips Mailing - List Support


no...intedenvo..ho un'algoritmo in C... e cercavo il modo, senza convertirlo
a mano  in Pascal (cosa che sto' gia' facendo) visto che e' abbastanza
lungo...di riuscire a farlo eseguire in Delphi...
C'e' qualchuno che mi possa aiutare...
Mi hanno detto che con il C++Builder, c'e' questa possibilita' xo' nel senso
inverso. Da Pascal --> C... la cosa non e' possibile con Delphi vero?

inverso. Da Pascal --> C... la cosa non e' possibile con Delphi vero?
Si' e' vero. Pero', se non sbaglio, Delphi puo' includere file obj,
quindi potresti compilare il codice C e includerlo 
{$I myfile.obj}
...e non so cos'altro dirti :-)
Ciao
--
Piero Bonanno
bop...@libero.it
pie...@tiscalinet.it
bop...@tin.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

 inverso. Da Pascal --> C... la cosa non e' possibile con Delphi vero?
No, non è possibile.
Però se riesci a racchiudere ciò che ti serve in una DLL sei a cavallo...
(visto che poi da Delphi la puoi tranquillamente richiamare)
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply

 {$I myfile.obj}
forse {$L myfile.obj} che lo linka al progetto (alemno in tp), con
l'include non fa l'inclusione del codice compilato, come credo voglia,
ma includeil sorgente


Hai ragione, $L e' la direttiva giusta.

Newsgroup: it.comp.lang.delphi
Titolo: browser in delphi

esiste in delphi un componente (magari indy9) che emuli un
browser?
In pratica dandogli in pasto del codice HTML me lo visualizza, senza fare 
altro?

 browser?
twebbrowser non ti va bene?
A.

> twebbrowser non ti va bene?
non riesco a trovarlo, trovo un cppWebBrowser,,
ma non so farlo funzionare

 non riesco a trovarlo, 
dove hai cercato? 
A.

 ma non so farlo funzionare
Dovrebbe trovarsi nella pagina "Internet" della ToolBox/Palette dei 
componenti.
Ciao,
   Marco.
-- 
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
]

micaela ha scritto:

In passato ho utilizzato con soddisfazione ThtmlViewer e ThtmlLite 
(
http://pbear.com/
), ora scopro che sono free ambo le versioni.

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

ciao... è un po' che non ci si vede,
Sto' cercando un VCL che m'era capitato fra le mani qualche tempo fà, Si
connetteva ad un DB mySQL su un server e poteva effettuare query (non
ricordo se poteva manipolarlo)....
Mi servirebbe poi un buon Client Mysql (che permetta anche di creare oltre
che gestire).
Ciao da plinskin.

 ha scritto:

non lo uso ma su 
www.mysql.com
 so che ci sono oggetti
vcl per collegarsi da delphi
ps: xche' usi MySQL? hmmmm, niente transazioni, e' solo un giocattolo...
scherzo dai (altrimenti gli my ess que ell-isti mi sbranano)
tra gli open source, *IO* preferisco IB ;)
Ciao,
Alan Solo

 Alan Solo
Be, in effetti faccio cose poco serie..
(per esempio IB non so' manco cos'è... ma se funziona su linux-apache lo
cerco).
bye

 cerco).
yes, su linux sicuro, su apache anche (penso)
www.borland.com/interbase
Ciao,
Alan Solo

 che gestire).
    Le ultime release di MySql per Windows vengono fornite con MySqlAdmin,
un'interfaccia grafica che non permette il DML ma soltanto il DDL, in più
per Windows esistono i driver MyODBC per connetterti con BDE (e quindi con
Delphi) a MySql e usare i soliti componenti standard... Io ho provato e
funziona tutto egregiamente!
    Trovi tutto su 
http://www.mysql.com
    Saluti!
--
_________________________________
Gian Luca Dalla Torre
E - Mail: 
gianluca....@casteo.net
_________________________________

IB funziona sia su linux che su winzozz.
Esistono modili di tutti i tipi, client di tutti i tipi.
L'unico problema che ho riscontrato è: la mancanza di un modulo DBI per Perl
che funzioni su Winzozz.... non riesco a compilarlo decentemente.
Per il resto, è PERFETTO.
Newsgroup: it.comp.lang.delphi
Titolo: Webcam ed OCR

Ciao a tutti,
   sto iniziando uno studiolo che coinvolge webcam ed ocr.
 
Da una webcam devo fare una fotografia dalla quale devo recupere del 
testo; Qest'ultimo non e' del tutto "limpido".
 
Qualche dritta su come iniziare ??
 
Grazie
 
Ciao
Daniele

Dovrebbe esistere un set di API di windows che fa al caso tuo , esposte (credo) da "AVICAP32.DLL", ma non so quanto è vecchia sta cosa...magari adesso c'è altro.
 
Il trattamento delle immagini è complicato a prescindere da ciò che devi fare.
Io cercherei un componente delphi che fa OCR e buonanotte, ma dubito lo troverai agratis data la complessità...
 
A.

Ciao Alberto,

Come hai anticipato la questione non e' semplice !!
Ho trovato poco in giro e, a dire il vero, ho trovato un esempio con 
librerie completamente gratuite (Tessereact) con cui ho fatto un test su 
di una forografia dove il testo da recuperare si trova su una confezione.
Da li e' iniziata una lunga serie di problematiche senza fine, per 
esempio come fare a riconoscere un testo orizzontale da uno verticale 
nella stessa fotografia, oppure le date nei formati piu' disperati come 
gg-mm-aa; aa/mm; mm aa ed altri ....
Per recuperare i testi "normali" come il produttore, il nome del 
prodotto, gli ingredienti il risultato e' soddisfacente .... ma per i 
dettagli e' piu' (molto, molto di piu') complicato per quello di cui sopra.
 
Forse, come dicono i programmatori del gestionale, e' quasi impossibile 
(ed e' per questo che mi ha ingrippato !!!).
 
Come sempre, grazie per l'attenzione
 
Ciao
Daniele
Newsgroup: it.comp.lang.delphi
Titolo: informazione

Ciao a tutti;
mi piacerebbe sapere, solo a livello informativo, che tipo di DB utilizzate
per i vostri programmi in Delphi.
Ciao
Paolo

 per i vostri programmi in Delphi.
Interbase 6, Informix 7.2.
Ciao,
-=SIMO=-



 per i vostri programmi in Delphi.
Paradox + qualche base dati proprietara (file di record con accesso diretto
da codice)
Ciao, Sandro

per i vostri programmi in Delphi.
Principalmente Oracle, per piccoli progetti Access (è comodo perchè è
un singolo file, funziona bene con ado e gestisce automaticamente le
relazioni).
Saluti,
Marco
--------------------------------------------------------------------------------
 t,m,e,e,t,@,h,o,t,m,a,i,l,.,c,o,m,
 Togliete le virgole per rispondere in email.
--------------------------------------------------------------------------------

| mi piacerebbe sapere, solo a livello informativo, che tipo di DB
utilizzate
| per i vostri programmi in Delphi.
InterBase (6)

per i vostri programmi in Delphi.
Interbase.

per i vostri programmi in Delphi.
Interbase, Paradox, ho provato Access ma lo userei solo se vincolato
da qualche requisito.
Da quando Interbase e' diventato free, suggerirei di evitare del tutto
i motori desktop e usare IB+FibPlus, e dopodiche' vivere felici :-)
Ciao
--
Piero Bonanno
bop...@libero.it
pie...@tiscalinet.it
bop...@tin.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
Newsgroup: it.comp.lang.delphi
Titolo: Menu Item on RunTime

AVE!!
Semplice quesito: gli item del mio menu devono essere creati on RunTime e
devono avere come CAPTION delle stringhe salvate in un file di testo, e a
ognuno di essi deve essere assegnata una procedura sull'evento ONCLICK. In
più il
parametro che deve essere passato alla procedura associata all'evento
ONCLICK cambia in dipendenza della stringa caricata nella CAPTION. Tutto ciò
è possibile??
Come sempre ho la domanda di riserva :)
Come si personalizza il popup menu che compare cliccando col tasto destro
sulla caption-bar di una form??
Ad esempio il Winzip aggiunge a tale menu la voce "Alway on top". Come?
Grazie ragazzi e naturalmente buon lavoro (e divertimento)!!!
CIAO!!!!!!
de...@inwind.it

č possibile??
Certo ! In delphi il problema non č "se č possibile" ma "come si fa" :))
Guarda questo esempio preso direttamente da un mio programma:
Procedure TForm1.UpdateMenu;
var i:integer;
begin
// prima lo cancelliamo
while popupmenu1.Items[1].Count>1 do
form1.popupmenu1.Items[1].Delete(1);
// ora aggiungiamo i messagggi
for i:=1 to 1000 do
if msg[i].usato then
  form2.additem(msg[i].testo,i);
SaveMSG;
end;
// la proceduura che aggiunge gli elementi
procedure TForm2.Additem(Text:Tstrings; numero:integer);
var item:tmenuitem;
begin
item:=TMenuItem.Create(application);
item.Caption:=text[0];
item.ImageIndex:=1;
item.OnClick:=form1.popupmenu1.Items[1].items[0].OnClick;
item.tag:=numero;
form1.popupmenu1.Items[1].Add(item);
end;

 Ad esempio il Winzip aggiunge a tale menu la voce "Alway on top". Come?
C'era un componentino che faceva tutto lui: TSysMenu o qualcosa del
genere...
In sostanza si trattava di subclassare la form e gestire il WM_SYSMENU...
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: Risoluzione video. Help!!

Ciao a tutti.
Avrei bisogno di un piccolo aiuto.
Potreste dirmi come è possibile dimensionare una finestra tramite la
risoluzione video in delphi 5?
Grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 risoluzione video in delphi 5?
se n'è già parlato in post precedenti: usa la variabile globale Screen, 
controlla che la form abbia AutoSize e AutoScroll = False, usa caratteri true 
type, se necessario usa il metodo ScaleBy della form.
(Ho dimenticato qualcosa?)
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

 (Ho dimenticato qualcosa?)
Immaginavo che la discussione fosse stata già affrontata ma non l'ho
trovata.
Cmq grazie sei stato gentilissimo.
Ciao!

Newsgroup: it.comp.lang.delphi
Titolo: Accidenti doppio accidenti e triplo accidenti : unavailable database

Ciao a tutti
Ma possibile che non riesca a rompere questo scoglio con i db? le provo 
tutte ma per un motivo o l'altro non riesco mai a creare un programma con un 
qualsiasi database.
Prima mi chiedeva la dll "gds32.dll"
che ho trovato nella cartella di EasyPhp , poi dopo averla messa nella 
cartella dell'exe indovinate un po'?: unavailable database.
Invece di postarvi quello che ho fatto vi do il link della guida in pdf che 
e` piuttosto breve: 
http://snipurl.com/pkdd
 altrimenti non lo saprei descrivere bene cmq il problema appare appena 
tento di selezionare la proprieta TableName in SqlTable1.
Ho trovato anche un vecchio post a riguardo 
http://snipurl.com/pkdc
 ma non 
ne ho cavato un granche.
grazie a tutti
erik 

e` piuttosto breve: 
http://snipurl.com/pkdd
La guida mi sembra fatta bene , e questo non chiarisce il motivo del
fallimento .
iniziamo con le ipotesi visto che non dici niente di significativo se non
l'errore.
hai firebird installato?
hai un database firebird da cui estrarre i dati?
quando selezioni la connessione ( facendo doppio click su SQLconnection1)
c'e un pulsante per il test , quale è il risultato?
ciao Mario
--- posted by geoForum on 
http://www.delphiedintorni.it

 ciao Mario
ciao erik

> hai un database firebird da cui estrarre i dati?
Lo dovrei avere?
i dati che vuoi vedere, o inserire da dove pensi di prenderli?
Scusa parlo di firebird in quanto uso questo, il quale usa gli stessi
drivers di interbase.
Concetti generali , devi avere un 'Motore' DB (Interbase, Firebird,
MySql...) installato con il quale interaggisci per creare il database
fisico. Quindi per prima cosa devi installare ( se non lo è già )
Interbase , il quale non fa parte di Win XP ma di Delphi ( è un'opzione di
installazione di Delphi ma dalla 6? in poi, non sono sicuro), Firebird lo
scarichi dal sito www.firebirdsql.org.Poi con un tool come IBExpert crei
la struttura ( le tabelle ..) del database , a questo punto hai il
file.fdb a cui connetterti. 
detto quwsto  mi rendo conto che se non leggi altra documentazione non
potrai andare avanti.

Newsgroup: it.comp.lang.delphi
Titolo: Ancora Problemi con HP1100 e QR

Scusate se di disturbo ancora, ma continuo ad avere problemi con QR e
HP1100.
Uso Delphi3 Pro con QR di dotazione. Ma ho provato anche con Delphi 5
Enterprise di un mio amico. Il problema sussiste solo con quella stampante.
Sistema operativo della macchina su cui ho montato il programma Win98. Ho
provato anche a casa con una stampante Canon LBP-660 e funziona benissimo.
Il problema e' questo:
Quando stampo piu' pagine, QR stampa tutto in un'unica pagina. Una pagina
sopra l'altra.
Ovvero, se nell'ultima pagina che dovrebbe stampare ci sono solo poche
righe, si vede la pagina sottostante coperta dalle righe dell'ultima.
Vi prego aiutatemi. E' sicuramente una cavolata, ma mi sta' prendendo troppo
tempo.
Grazie.
Ciao Alan

Retifico la stampante e' una HP 1000w.
Scusate. Ma non dovrebbe cambiare di molto.
Grazie

 HP1100.
Ciao, ti assicuro che non sei il solo ad avere questi problemi o simili con
quella stampante; io mi metto per primo in mezzo a questi :))
Avevo un programma che stampava etichette e in centinaia di computer con
stampantio differenti mi funzionava perfettamente, con la stampante in
questione, a caso, una sì, una no, due sì, una no, ecc.
Per me è bastato aggiornare i driver con quelli uscito a fine agosto 2000,
un po' tardino visto che la stampante è entrata in produzione ben prima...
Forse potrebbe bastare anche a te?
Ciao, David

io parlavo della laserjet 1100
Newsgroup: it.comp.lang.delphi
Titolo: [!] "Symbol was eliminated by the linker"

come cavolo si permette il linker di mangiarsi una variabile? senza 
nemmeno spiegarmi perchč? bah...

nemmeno spiegarmi perchč? bah...
Il linker non sa neanche che sono le variabili.
Il tuo simbolo e' probabilmente qualche informazione di debug.
--
Andrea Laforgia (ICQ 87230455)
http://www.geocities.com/AndreaLaforgia
"ci sono tre tipi di persone nel mondo : quelli che
 sono bravi in matematica e quelli che non lo sono."

Il tuo simbolo e' probabilmente qualche informazione di debug.
no, è una variabile
durante il debug mi viene valutata come "Symbol was eliminated by the 
linker", e settata permanentemente a 0

 nemmeno spiegarmi perchè? bah...
Questo e' uno dei pregi del delphi, anche se in alcune cicostanze puo'
sembrare fastidioso, quando lui vede che una variabili oppure del codice e'
inutile, come gli esempi che ti posto dopo:
begin
  caption := 'ciao';
  caption := 'ciaociao';
end;
la prima linea e' palesemente inutile, perche' e annullata dalla seconda
procedure TForm1.Button1Click(Sender: TObject);
Var a : Integer;
begin
 a := 1323;
 a := a + 1;
 caption :=IntToStr(a);
 left := 10;
 caption := caption+'00';
end;
Dopo l'assegnamento alla caption la variabile viene ad essere inutile e
delphi in modo inteligente libera la memoria.
Comunque per elimianre questo problema puoi dalla proprietà del progetto
togliere la spunta dalla voce "optimization" presente nella sezione
"compiler".
ciao
--
*-*-*-*-*-*-*-*-*-*-
Per rispondere in privato togliere 1975 dall'indirizzo di posta
*-*-*-*-*-*-*-*-*-*-

linker", e settata permanentemente a 0
Appunto.
Ripeto che a tempo di debug, non si sa cosa siano le variabili, se non
come informazioni di debug. Se il linker e' stato settato per non
conservare le informazioni di debug quando produce l'exe, allora non
vedi le informazioni relative a quella variabile.


Newsgroup: it.comp.lang.delphi
Titolo: Calcolo di una espressione in QuickReport

Ciao,
sto realizzando un report si stampa con quickreport,
trattasi di un elenco di record. Ciascun record contiene un campo di
tipo "importo" e un campo booleano "Pagato/Non Pagato".
Ho bisogno di presentare in fondo al report una somma degli importi
effettivamente "Pagati" e a questo scopo vorrei utilizzare un
componente TQRExpr, ecco l'espressione che ho specificato:
SUM( IF(QueryImporti.Pagato,QueryImporti.Importo,0) )
Il problema è che non funziona, mi sapete dire dove sbaglio?
Naturalmente potrei gestire la cosa da codice ma se riesco a farlo in
questo modo mi risparmio qualche riga...
grazie per l'attenzione,
Buon Lavoro
ilvcclx_!!!!

 Il problema è che non funziona, mi sapete dire dove sbaglio?
Che significa "non funziona"?
Bye
AS

...


> ilvcclx_!!!
??
Bye
AS
Newsgroup: it.comp.lang.delphi
Titolo: Sempre problemi con un CGI

Ciao,
ho provato i CGI sul mio server. Il supporto è inesistente. Secondo me però
io non ho sbagliato a compilarli, il problema dipende da loro. Ho inserito
il listato, qualcuno sa dirmi se funziona? In realtà l'unico problema è che
genera una eccezione quando apre il file che tiene il conteggio, infatti
l'immagine di output si ottine, solo che scrive 200 il valore che la
variabile NumCont riceve se viene generata l'eccezione. L'unica info del
supporto è stata:"i file che possono essere modificati devono stare nella
cartella _public". Infatti.....
program CGI2;
{$APPTYPE CONSOLE}
uses SysUtils,
  Windows,
  Classes,
  Graphics,
  JPEG;
var
  HandleStr : THandleStream;
  MemStream : TMemoryStream;
  Immagine  : TBitmap;
  ImmagineJPG: TJPEGImage;
  Conteggio:String[10];
  ContFile:TextFile;
  NumCont:integer;
  cont:word;
  Eccezione:boolean;
Begin
  NumCont:=0;
  cont:=0;
  Eccezione:=true;
  while (cont<10) and (Eccezione) do
  begin
  Eccezione:=false;
  Inc(cont);
  try
     AssignFile(ContFile, '..\_public\cont.dat');  // Questo percorso
dovrebbe essere valido!
     Reset(ContFile);
     Readln(ContFile, Conteggio);
     NumCont := StrToInt(Conteggio)+1;
     Rewrite(ContFile);
     Write(ContFile, IntToStr(NumCont));
     CloseFile(ContFile);
  except
  sleep(75);
  Eccezione:=True;
  NumCont:=200;
  end;
  end;
  Immagine := TBitmap.Create;
  Immagine.Width :=110;
  Immagine.Height:=20;
  Immagine.Canvas.Brush.Color:= clBlue;
  Immagine.Canvas.FillRect(Rect(0,0,110,20));
  Immagine.Canvas.Font.Color:= clBlack;
  Immagine.Canvas.TextRect(Rect(0,0,110,20),0,0, IntToStr(NumCont)+' ok');
  ImmagineJPG := TJPEGImage.Create;
  ImmagineJPG.Assign(Immagine);
  ImmagineJPG.CompressionQuality:=100;
  HandleStr := THandleStream.Create(GetStdHandle(STD_OUTPUT_HANDLE));
  MemStream := TMemoryStream.Create;
  ImmagineJPG.SaveToStream(MemStream);
  writeln('Content-type: image/jpeg');
  writeln('Content-length: '+IntToStr(MemStream.size));
  writeln;
  Flush(Output);
  MemStream.SaveToStream(HandleStr);
  HandleStr.Free;
  MemStream.Free;
  Immagine.Free;
  ImmagineJPG.Free;
end.

    Potresti essere un po' piů preciso sul tipo di eccezione che ti viene
sollevata quando apri il file? Magari č un problema di permessi sul server
Web...
    Saluti!
______________________________________
Gian Luca Dalla Torre
E - Mail: 
gianluca....@casteo.net
______________________________________

 wrote in message
Z4u75.7663$2s6.1...@news.infostrada.it...


 gebera una eccezione. Non so se dipende dall'apertura o dalla lettura.
    No, non intendevo quella del server, ma quella di Delphi...
Probabilmente ti darà un tipo di I/O Error, hai provato a vedere se dipende
dai permessi alle cartelle...


 wrote in message
HF785.18465$2s6.2...@news.infostrada.it...


 ce l'avrei...
    Non la otterrai se non scuci soldi...

Newsgroup: it.comp.lang.delphi
Titolo: Sub componente e uses

ho scrittto un componente del tipo :
================
unit unit_MyInstrument;
interface
uses
   .... unit_MyDisplay, unit_MyPort;
TMyInstrument  = class(TMyDisplay)
    private
      FMyPort : TMyPort
    protected
    public
      constructor Create (AOwner : TComponent);override;
      destructor Destroy ;override;
    published
       property MyPort : TMyport read FMyPort write FMyPort;
    end;
================
quando trascino il componente su una form
nella lista delle uses vengono aggiunte
uses
.....  unit_MyInstrument, unit_MyDisplay;
non viene aggiunta  unit_MyPort e questo č il mio probelma
nella unit_MyPort ho definito dei tipi subrange che uso in questo
modo
AnInstrument.APort.APortType := <un valore del subrange>
Come fare per risolvere il problema !??!
La direttiva {I filename} mi puň aiutare ?!?!
Altri suggerimenti ?!?!
Ringrazio fin da ora per i vostri preziosi interventi
Cordialmente,
Stefano Campri

> Come fare per risolvere il problema !??!
approfondendo la ricerca su google ho
visto che devo scrivere un expert
proverò a cercare qualche codice di esempio
se qualcuno ne avesse già sottomano e volesse postarlo
sarebbe cosa gradita
Cordialmente,
Stefano