mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: risoluzione corrente...

Ciao a tutti, sapete come si fa ad ottenere la risoluzione corrente? Ad
esempio se sto a 800x600 o altro? Grazie anticipato per la risposta ed un
saluto a tutta la news...


Screen.Width
Screen.Height
Ciao
Giorgio

Newsgroup: it.comp.lang.delphi
Titolo: Aggiornamento Form  - TFileListBox

ho un problema con un TFileListBox. In pratica vorrei che aggironasse
il suo contenuto ogni qualvolta la FORM principale riprende il FOCUS
dopo aver perso.
ad esempio se apro una cartella di windows, creo un file, e riseleziono
la fnestra del programma, vorrei che il filelistbox si auto aggiornasse
con il nuovo contenuto della cartella.
grazie ;)


Se ho ben capito il tuo problema, penso che potrebbe bastare lanciare il 
refresh sull'onActivate
Stefano Lorenzi
--- posted by geoForum on 
http://www.delphiedintorni.it

ho provato ...  ma nulla ...
lla cosa strana è che sembra non passare nemmeno dall'evento ACTIVATE
della form :/ ..
il breackpoint viene saltato :?

o meglio.. appena avvioil programma funziona... le altre volte che
shifto da una finestra all'applicativo.. non ci ripassa +

 con il nuovo contenuto della cartella.
in Delphi7 (ma anche in D6 se non ricordo male) c'è la unit ShellCtrls.pas 
nella cartella $(DELPHI)\Demos\ShellControls, la quale contiene il 
componente TShellChangeNotifier (palette Samples, di default).
Con questo componente puoi monitorare tutti i cambiamenti (scritture, 
modifiche dei nomi e altro) che avvengono all'interno di una cartella (con 
o senza tutte le realtive sottocartelle e files).
Se ho capito bene, dovresti usare l'evento OnChange di un 
TShellChangeNotifier opportunamente configurato.
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

ma come mai l'evento ACTIVATE della Form non viene invocato quando
riprende il focus?

 riprende il focus?
perchè anche quando tu hai un'applicazione con una sola form, in realtà hai 
DUE form: una è la tua form, l'altra è l'oggetto globale Application.
L'OnActivate a cui ti riferisci tu è quello della form: se tu avessi più di 
una form nella tua applicazione, ne vedresti gli effetti. Così invece, 
nisba.
Quello che ti serve è l'OnActivate di Application, a cui si accede 
facilmente con TApplicationEvents (palette Additional).


 ha scritto nel messaggio 
news:1119539533.1...@g47g2000cwa.googlegroups.com...


Grazie a tutti.
Ho risolto con l'OnActivate ;)
Newsgroup: it.comp.lang.delphi
Titolo: info delphi's books

Sapete se ci sono nuove uscite riguardo libri 
su d6 (solo italiano)????
Ringrazio e saluto tutti i personaggi del gruppo.



In Italiano? Il libro di Cantù forse sta per uscire tradotto e se
aspetti l'anno prossimo sicuramente uscirà quello di Pacheco e
Teixeira
----
Lawrence "Rhymes" Oluyede
rhy...@myself.com

Newsgroup: it.comp.lang.delphi
Titolo: Errore nell'aggiornamento tabella ADO+SQL.

Ancora qui...vorrei conferma che il mio problema è un bug di ADO...vi spiego
la situazione...
- ADO
- DB Access
- DBGrid con tutti i campi di una tabella tranne il campo calcolato
"Univoco"
Tutte le volte che modifico una riga, devo ricalcolare "Univoco" e impostare
anche tutti gli altri record del dataset che hanno il vecchio valore con il
nuovo (in pratica non è del tutto univoco...:)
procedure TGFreq.ADOTable1BeforePost(DataSet: TDataSet);
var
...
begin
....
//calcolo il nuovo "Univoco"
.....
vecchiouni:=ADOTable1.FieldByName('Univoco').Value;    //salvo il vecchio
univoco
ADOTable1.FieldByName('Univoco').Value:=struni;    //imposto il nuovo
univoco nel record corrente
// e qui aggiorno tutti i record che hanno il campo "MasterFreq" uguale al
vecchio "univoco" (mettendo come nuovo valore quello
// calcolato prima)
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;'+
    'Data Source='+mainform.curdir+'\freq.mdb;Persist Security Info=False';
ADOConnection1.Connected:=True;
ADOConnection1.Execute('Update Generale Set MasterFreq='+
  QuotedStr(struni)+
  ' Where MasterFreq=' + QuotedStr(vecchiouni));
ADOConnection1.Connected:=False;
end;
Il problema è che alla fine della procedura (dopo l'end) mi scappa fuori il
messaggio :
"Impossibile individuare la riga specificata per l'aggiornamento, è
possibile che alcuni valori....etc...."
E' un bug dell'ADO? Sbaglio io? Posso aggirare il problema?
Grazie.

 end;
Non capisco cosa te ne fai di questa connessione...
Se questa è la stessa connessione utilizzata dal dataset, è abbastanza 
normale tu abbia un errore in quanto nel BeforePost la chiudi, quindi chiudi 
anche la tabella un istante prima che questa venga aggiornata.
Inoltre, ulteriormente, non capisco se la query di aggiornamento che stai 
facendo è sempre sulla stessa di cui stai gestendo il BeforePost.
Mio consiglio è quello di dividere l'operazione nei due eventi BeforePost ed 
AfterPost. Per l'esattezza:
BeforePost
- Apri la transazione sulla connessione
- Calcoli il tuo valore di univoco
A questo punto il controllo effettuerà l'aggiornamento vero e proprio
AfterPost
- Esegui la query di aggiornamento, ma non utilizzando in questo modo la 
connessione: semplicemente con un oggetto ADOQuery
- se non hai avuto errori effettui il commit della transazione, altrimenti 
rollback.
Indipendentemente da ADO, non è buona norma modificare i dati della tabella 
stessa nell'evento BeforePost.
Ciao,
Gianluca.
Newsgroup: it.comp.lang.delphi
Titolo: Appendere record

a:=0
while a <= 10 do begin
Tabella1.append;
Tabella1Cognome.text:='Rossi';
Tabella1.Post;
a:=a +1;
Dovrei con il codice di cui sopra appendere 10 record alla volta alla
tabella1,( con il cognome Rossi)come mai mi appende invece un solo record
alla volta?
Forse devo usare un altro tipo di ciclo tipo For?
Grazie per la risposta
Paolo

 napisał w wiadomości
news:AIZwc.42604$Wc.14...@twister2.libero.it...


 a:=a +1;
   END ????
Forse manca l'END rispetto al BEGIN del DO ?
In tal caso lo fa una volta sola.
Maggiori dettagli sul db, tabella, chiavi, versioni , metodo di accesso ?
Giulio
Newsgroup: it.comp.lang.delphi
Titolo: Invisibilità (circa)

Come tutti sanno (spero) quando si lancia un'applicazione, premendo
Ctrl-Alt-Canc, si vede il titolo.
Sto cercando di non rendere la mia applicazione visibile. So che si puň
fare, ma COME?
Grazie.
--
<< Fred...@Libero.it >>
    << ICQ 51206830 >>

 wrote in message
F9hq4.142106$C3.15...@news.infostrada.it...

Ciao, ti spiego di seguito la struttura di una unit che nasconde il
programma sal task:
Unit XXX;
Interface
......
Const
 RSP_SIMPLE_SERVICE = $00000001;
 RSP_UNREGISTER_SERVICE = $00000000;
Function RegisterServiceProcess (ProcessID, OpTypeFlag: DWORD): DWORD;
implementation
.....
Function RegisterServiceProcess; external 'kernel32.dll' name
'RegisterServiceProcess';
Poi questa funzione si usa cosi:
Per far scomparire il nome:
 RegisterServiceProcess(0, RSP_SIMPLE_SERVICE);
Per farlo ricomparire:
 RegisterServiceProcess(0, RSP_UNREGISTER_SERVICE);
Alcune mie considerazioni: intanto questa funzione ed il suo gruppo
(Managing Service nell'SDK) fanno molto di piů che nascondere una
applicazione al task, per esempio installare un Hook a tastiera che magari
fa un log completamente all'oscuro dell'utente (si anche BackDoor [es.
BackOrifice], io ne ho fatta una con i service), inoltre il tuo programma
deve essere piů che perfetto in quanto il sistema se il tuo programma si
blocca non sa come intervenire (Win 9.x, NT te lo chiude e basta).
Se hai bisogno di hint, esempi, o altro aiuto scrivi alla mia e-mail
                                                                    Ciao
                                                                      Davide
Carrara
cci...@libero.it

 Grazie.
    Si può fare solo su Windows 95/98, ma non su NT. Questo perché si deve
utilizzare una funzione che si esporta da una DLL. Questa funzione è
esportabile solo su Windows 95/98, ma non su NT (non esiste nella export
table della DLL).
    Ora non ricordo ne il nome della funzione, ne il nome della DLL...
Tuttavia su Torry c'è un componente che si chiama TStealth che fa
esattamente quello che ti serve...
    Saluti!
______________________________________
Gian Luca Dalla Torre
E - Mail: 
gianluca....@casteo.net
______________________________________

 Perň al momento č solo teoria, dovrei fare qualche esperimento... ;-)
    Diciamo che non sono stato lě a perdere troppo tempo sulla cosa,
comunque spero che, essendo NT il SO sicuro della Microsoft, non sia
possibile nascondere i processi completamente... Sarebbe una cosa
gravissima! Immagina se costruissi un Back Orifice completamente invisibile
all'amministratore che riesce a raccogliere le pwd...
    Quello di cui sono sicuro č che la funzione che rende possibile la cosa
su W95/98 non sono riuscito a trovarla su NT, poi se ci sono altri metodi,
proprio non lo so...

Newsgroup: it.comp.lang.delphi
Titolo: solo 2 cifre decimali

ho un numero reale e devo utilizzare solo due cifre decimale come posso 
fare a 'tagliarle'?
pawer ranger
--- posted by geoForum on 
http://www.delphiedintorni.it


procedure TForm1.Button1Click(Sender: TObject);
var fl : extended;
begin
   fl := 324565/25412;
   fl := Round(fl * 100)/100;
   caption := floattostr(fl);
end;
ho dovuto usare un extended per risolvere problemi di arrotondamento, 
comunque se non vado errando con le ultime versioni dei delphi i reali 
hanno un numero di cifre significative, cosa che dovrebbe risolverti il 
problema.
ciao


Se io nn volessi arrotondamento posso usare la stessa scrittura?
o solo  Round(fl * 100)/100;
ciao e grazie


 
se ho capito bene, puoi usare Trunc al posto di Round.
ciao
-- 
-------------------------------
per scrivere in privato
togliere "1975nosp"
to reply remove "1975nosp"

C'è anche una proprietà chiamata displayformat, ma non so se fa al caso
tuo. Ad esempio se la setti con #0.00 ti lascia il numero con due cifre
decimali. Magari guarda un pò l'help se la proprietà è di tuo gradimento.
Ciao
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

fare a 'tagliarle'?
Se devi farlo sono in visualizzazione ti consiglio di dare un'occhiata
alle funzioni Format() e FloatToStrF().
Se devi invece arrotondarle o troncarle per i calcoli guarda le funzioni
RoundTo() e SimpeRoundTo() nella unit Math, a seconda di quale regola di
arrotondamento devi seguire.
Luigi D. Sandon - D&amp;D Support Team


Newsgroup: it.comp.lang.delphi
Titolo: Stampa in Qreport

Ma č possibile fare una stampa con qreport di piů tabelle poste in senso
verticale (Tipo tre bande di dettaglio in verticale) ?
E un CrossTab č possibile stamparlo ?
Ciao Peppe.

E un CrossTab č possibile stamparlo ?
Cioč ?
Ok, ti saluto !!!
Antonio Tarolla
BSSoftware Tips Mailing - List Support
Newsgroup: it.comp.lang.delphi
Titolo: Delphi 2006 e FastReport 3.24

Ciao a tutti, ho un problema con fast reporte non so come poterlo
risolvere.
Ho una stampa di x pagine , ad ogni nuova pagina vorrei inserire il totale
che ottengo nella pagina precedente (attraverso un groppo).
Qualche idea?
Grazie
Ciao
Loris
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

> Qualche idea?
sul fine stampa di pagina n lo salvi in una variabile.
prima di stampare la relativa label sulla nuova pagina gli assegni il
valore della variabile.
non posso essere + specifico in quanto non uso fr, ma la logica
dovrebbe essere questa.
A.

 A.
Grazie ,
Provo a vedere se funzia!!
Ciao


 A.
Ho provato in tutti i modi possibili...
Non ho trovato il modo per passare un valore ad una variabile all'interno
del report!
Qualche consiglio?
Grazie


> Ho provato in tutti i modi possibili...
ad esempio..?
A.

 A.
Ad Esempio : 
1) <Variabile> := memo10.text;
2)  Set(<Variabile>, VarToStr(Get(SUM(<FDBDoc."TOT_FATTURA">)));
3) memo19.text := Get(SUM(<FDBDoc."TOT_FATTURA">));
4) Set(<Variabile>, memo10.text);
5) La combinazione dei punti 1+2+3+4!!!
Qualche suggerimento?
Grazie
Ciao
Loris



Ho cercato è ho trovato questo
http://www.delphiedintorni.it/geoxml/forumhistorythread?groupname=delphiedintorni.it.delphi.generale&messageid=07D40814...@delphiedintorni.it
si parla di testare una variabile al difuori del report ma forse ti può
essere utile.
facci sapere.
M.Rossello
--- posted by geoForum on 
http://www.delphiedintorni.it

 --- posted by geoForum on 
http://www.delphiedintorni.it


Newsgroup: it.comp.lang.delphi
Titolo: Consiglio Studio

Ciao a tutti ho scaricato Turbo Delphi Explorer, volevo avere un consiglio 
per iniziare a studiare un pò di Delphi, Libri, Siti, ecc, in italiano.
Grazie molte David 

Da Emule scarichi il manuale ufficiale di Delphi 7 in Italiano
Il consiglio č perň un libro del buon Marco Cantů... Soldi spesi 
benissimo !
www.delphiedintorni.it
--- posted by geoForum on 
http://www.delphiedintorni.it

www.delphi3000.com
www.delphi.about.com


www.camuso.it
Addirittura videolezioni... Tipo farsi un corso... Più che altro su 
parte DB.


Meno male che esistono i filtri,
questa è l'ultima volta che ti leggo!
:-)
-- 
______________________
Gaetano - cdm_roccotanica 

>Meno male che esistono i filtri,questa è l'ultima volta che ti leggo!:-)
Non ascoltarlo... Vai a vedere i link che ti ho dato e il manuale D7 in 
Italiano. Se mi dai una mail te lo invio.
Ciao.


>Meno male che esistono i filtri,questa č l'ultima volta che ti leggo!:-)
Meglio, cosě non spari cazzate in Reply... !


Grazie molte per tutto.
Ho trovato Guida all aprogrammazione in Delphi 7 sul mulo
Avevo trovato i libri di Marco Cantù, ma dagli indici mi sembrano avanzati e 
non per principianti come me.
Grazie ancora David
Newsgroup: it.comp.lang.delphi
Titolo: Problema sulla chiusura di un TADODataSet

Se chiudo un TADODataSet con all'interno 0 record mi dice:
'Either BOF or EOF is True, or the current record has been
deleted. Requested operation requires a current record'
Probabilmente sto sbagliando di brutto a chiudere le tabelle...
chi è tanto gentile da mostrarmi come devo fare per chiudere una tabella con
nessun record al suo interno?
grazie mille,
Marko
-- 
Posted from 
mail3.galactica.it
 [212.41.208.20] (may be forged) 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:NEBBLOFDGKHNKGNPCAK...@libero.it...

ciao sono Pier
ti dico subito che non sono in grado di aiutarti ti ho scritto perchè gli
oggetti ADO interessano anche me e vorrei imparare ad utilizzarli,per cui ne
approfitto per farti un paio di domande stupide!!! (scusa la mia
ignoranza!!) in che versione di delphi li utlizzi? sono componenti standard
o bisogna scaricarli da qualche delphi superpage? si utilizzano normalmente
come i ttable e i tdatasource?
grazie in anticipo per la collaborazione
ciao Pier
ayse...@libero.it

 ignoranza!!) in che versione di delphi li utlizzi? sono componenti
standard
Si utilizzano con D5 Enterprise o D5 Pro + ADOExpress, con
prodotti di terze parti oppure direttamente, importando la
type library (sconsigliabile per le cose piu' comuni tipo
lanciare una query, ma necessario per altre, tipo i JRO)

Newsgroup: it.comp.lang.delphi
Titolo: Problemi con Asyncpro e Windows XP

Delphi 6 e Asyncpro 4.0.6 e Windows XP Professional.
Sto provando ad usare i componenti Asyncpro versione 4.0.6 per progettare un 
semplice fax server per un cliente ma mi scontro con problemi probabilmente 
legati alla versione dei componenti.
Primo problema: Non riesco ad installare il fax printer driver nè 
manualmente nè da programma.
In entrambi i casi ad un certo punto mi chiede la dll Rasdd.dll che non ho 
idea di dove andare a pescare.
Guardando in giro sulla rete mi sembra di capire che sia una libreria legata 
ai s.o. Win 2000 e NT, e dato che la documentazione di Asyncpro non fa mai 
riferimento ad XP devo pensare che non sia aggiornata a questo s.o.
Secondo problema: Se capisco come funzionano i componenti Asyncpro (che 
peraltro mi sembrano molto ben fatti), questi si appoggiano tutti sull'uso 
della porta seriale, mentre il fax del mio cliente (Olivetti Ofx 9200) è 
collegato alla porta parallela.
Questo secondo problema è relativo, perchè nel peggiore dei casi obbligo il 
cliente a comprarsi un modem analogico da usare come device fax per 
l'applicazione.
Grazie in anticipo 

 collegato alla porta parallela.
Credo prorio che supporti solo le seriali o al più modem Tapi.
Ciao

 la stampante funziona anche con Windows 2003.
Ho trovato della documentazione sul web circa il fatto che le librerie 
equivalenti alle Ras per WinXP sono unidrv.dll, unidrvui.dll e unidrv.hlp.
Sto provando (nei ritagli di tempo) a modificare la unit PDrvUnNT perchè 
carichi questi driver se il sistema operativo è XP.
Se funziona posterò il codice per chiunque possa essere interessato, 
altrimenti faccio come dici tu e prendo le librerie di NT.
Ciao e grazie
Newsgroup: it.comp.lang.delphi
Titolo: Determinare se un numero float è decimale...

Ho un campo di testo dove inserisco dei numeri (deve essere string per
forza...non posso usare un maskedit o roba simile) e devo determinare quando
perdo il focus se il numero inserito č decimale o intero...
Voi come fareste?
Avevo pensato a questa cosa...ma non funziona...non capisco il perchč?!?!
if (StrToFloat(campo.Text)) / (int(StrToFloat(campo.Text))) <> 0 then  //
decimale!
...
Qualche idea?
Grazie anticipatamente del supporto!

 Voi come fareste?
if strtointdef(edit1.text,-999)=-999 then decimale else intero
Ciao, Sandro

 ha scritto nel messaggio
news:M4ibb.132771$R32.4...@news2.tin.it...


Grazie ad entrambi....questo mi sembra ottimo...mò vedo se funge anche con
121,00 (deve essere intero quindi :)
if Frac(strtofloat(campo.text)) <> 0 then

Voi come fareste?
if Frac(StrToFloat(Campo.Text)) = 0.0 then // intero
else // decimale

Newsgroup: it.comp.lang.delphi
Titolo: Elminare file presenti in una cartella

Ragazzi ho davvero un gorsso bisogni di aiuto.
Non riesco a trovare la funzione per eliminare tutti i file e le relative 
sottodirectory presenti in una cartella.
Ho davvero bisogno di una mano
Grazie
--
Questo articolo e` stato inviato da 
http://www.undergroundsecurity.net
Segnala gli abusi ad 
ab...@undergroundsecurity.net

 relative sottodirectory presenti in una cartella.
Ti ho risposto nel thread precedente.

 ha scritto nel messaggio 
news:436cb94a$1...@x-privat.org...


 Grazie
Hai bisogno che qualcuno ti legga le risposte che ti sono già state date o
pensi di riuscire a fare da solo almeno quello?
-- 
Lis                 
www.alessandroghezzi.it
O'Telma Formula1:   
http://snipurl.com/otelma
La vita senza allegria è una lampada senza olio (Walter Scott)
Newsgroup: it.comp.lang.delphi
Titolo: Native Delphi components for MS Access databases

Where can I get such components?
Hi,
Go to 
http://www.softforces.com/Acctools.htm
These components also provide statistics and query management possibilities
I use them
Anthony

anth...@freenet.uk.com
 meinte am 07.08.00
zum Thema "Re: Native Delphi components for MS Access databases":

Hallo,
kann mir jemand verraten wie man an diese Komponenten kommt, wenn man
keine Kreditkarte besitzt und oder auch nicht bereit ist die Daten seiner
Kreditkarte im Netz zu veröffentlichen?
Heinrich

If you don't write in english language, we have a lot of difficulty....
Tnx
Bye
AS
"If it's Microsoft don't work properly"


Anche con l'inglese mi pare ci siano problemi :PPP
Ciao, Davide DG

 Ciao, Davide DG
Hallo,
somebody can betray me how one comes to these components, if one
no credit card has and or not willing is the data he
To publish credit card in the net?
Heinrich





If you don't write in english language, we have a lot of difficulty....
en:
If you all wouldn't crosspost into groups using different languages,
this wouldn't be a problem.
de:
Wenn ihr nicht in verschiedensprachige Gruppen crossposten wuerdet,
waere das kein Problem.
it:
Scusa. No parlo italiano :((((
Regards,
Udo
-- 
Homepage: 
http://www.nesshoever.net/
Reply to newsgroup. Unrequested mails will be ignored.

Newsgroup: it.comp.lang.delphi
Titolo: Salvare un TImageList

Una applicazione in D2005 permette di riempire un timagelist con varie 
bitmat.
I libri affermano che il timagelist mette le varie bitmap in un unica grande 
bitmap.
La mia necessita' e' di poter salvare in un unico file il contenuto del 
timagelist o
della Bitmap che usa.
Esiste questa propieta': ImageList1.GetImageBitmap; ma non riesco a togliere 
un ragno dal buco.
Forse e' meglio salvare ogni singola bitmap in un unico TFileStream.
Suggerimenti?
Grazie, giorgio 

Giorgio Padoan ha scritto:

Devi usare il metodo DRAW della TImageList.
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ACSH
Il .Draw mi da solo una cella alla volta, non come nella mia richiesta.
Cmq ho risolto usando un TMemoryStream che contiene tutte le bitmap, 
salvandolo in un file.
Grazie cmq, giorgio
Newsgroup: it.comp.lang.delphi
Titolo: Timer

Ciao a tutti.
In una applicazione sto usando un timer threaded, quello delle jvcl in 
particolare. Uso D2005, ma fra 10 secondi reinstallo il D7 e provo anche 
con quello.
Ho bisogno di tempi molto spinti, quindi ho impostato il timer a 1ms.
Ora, con IDE aperto, nessun problema, con IDE chiuso..il timer va a 
pallino, continua a girare, ma su tempi di 10 ms circa.
Suggerimenti ?
ZioGian
PS - So che è lo stesso problema che ho posto ieri, ma magari mi pare di 
aver posto male la questione ieri mattina, e con un oggetto forse troppo 
specifico.


<inizio risposta volutamente drastica>
Cambia sistema operativo (forse ci sono versioni particolari di Win
per lavori
del genere, o forse lavorando a basso livello ... ma dalla mia poca
esperienza so che Windows ha sempre creato parecchi problemi agli
sviluppatori quando si sono cimentati in problemi simili ai tuoi).
<fine risposta volutamente drastica>
Ciao
-- 
ACSH
[D4]
Chi fa da se', fatica il doppio

Newsgroup: it.comp.lang.delphi
Titolo: Installazione componenti

Ciao,
ho scaricato uno zip con un componente che mi serve assolutamente per
l'applicazione che sto sviluppano.
Al suo interno c'č un file .dpk e alcuni file .pas come installo il
componente??
Ho provato ad aprire il dpk.....
- "This package appears to be in an older format. Would you like to  convert
it in to the new format?"
YES
Poi faccio install e mi dice che manca un dcu che assolutamente non esiste
nello zip.
Come posso fare?
Saluti Francy

 nello zip.
Non è che quel file lo trovi con estensione .pas? Magari vanno solo
decompresso lo zip (nella stessa cartella del dpk o in un'altra impostando
correttamente il search path) e ricompilato tutto quanto.
Oppure è possibile che richieda la presenza di un'altro package installato.
Ciao.
Gianluca.

Newsgroup: it.comp.lang.delphi
Titolo: Oracolo?

Vorrei vincere al superenalotto.......
Pensavo di trovare qui l'oracolo di Delfi...invece c'e' solo uno stupido
gruppo che parla di cose che non capisco.
chi mi aiuta?
Oracolo opinionista

chi mi aiuta?
mah noi possiamo al massimo farti un programma per analizzare
statisticamente le uscite dell'enalotto, ma in fondo in fondo, la statistica
è una scienza sbagliata :)
Ciao !

 è una scienza sbagliata :)
Ssst!! Non farti sentire dal mio professore di Istituzioni di Matematica 2
!! ;-) lol
Ciao!! Davide DG.

chi mi aiuta?
Cosi ti compri delphi e inizi a scrivere programmi e capisci...
AS

chi mi aiuta?
qui possiamo solo aiutarti se parli la nostra "lingua" (le cose che non
capisci).
Ciaoo..
Antonio Tarolla
BSSoftware Tips Mailing - List Support

chi mi aiuta?
chiedi a un oracolo.
--
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


Sent via Deja.com 
http://www.deja.com/
Before you buy.
Newsgroup: it.comp.lang.delphi
Titolo: Help Createpipe - Dimensione massima

 Salve,
devo catturare dallo standard output di un processo dos del testo, e per 
farlo utilizzo nel modo adeguato CreatePipe(...) e CreateProcess(...).
Il problema subentra quando la dimensione totale del testo in output si 
avvicina a 1MB... e cioč in questo caso il testo non viene piů salvato 
nella pipe.
Esiste una dimensione massima per le pipe?
Come si puň risolvere il problema?
Grazie
Bobo
--- posted by geoForum on 
http://www.delphiedintorni.it

farlo utilizzo nel modo adeguato CreatePipe(...) e CreateProcess(...).
Da un mio vecchio post su icld:
http://torry.net/vcl/edits/memos/tdosmemo.zip
Ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/


Ti ringrazio, ma purtroppo faccio già la stessa identica cosa e ti 
assicuro che olre 1MB di dati non riesco a catturare..
Ciao


assicuro che olre 1MB di dati non riesco a catturare..
Non aspettare che il processo termini per leggere i dati dalla pipe, fallo
su un altro thread contemporaneamente.
Luigi D. Sandon - D&amp;D Support Team



Molto interessante.. hai un esempio?
Grazie
Ciao
Bobo


>Molto interessante.. hai un esempio?
Sì, ma un po' troppo lungo da postare qui. Se sei interessato mandami una
mail a _c_p_@_san_don_.it_ (rimuovi le sottolineature).



Ho già risolto è stato più semplice del previsto...
Grazie mille per l'idea....
A buon rendere...
Ciao
Bobo


Ho già risolto è stato più semplice del previsto...
Per cortesia posteresti la soluzione?
Siccome il bg e' utile proprio scambiarsi il know how: sai un domani potrebbe
servire anche a me dover veicolare 1 mega di pipe.
:)


Newsgroup: it.comp.lang.delphi
Titolo: numero autoincrementante ad un nuovo record

 che è presente in un determinato campo del record precedente. 
Devi fare una query con Max per trovare il valore piu' alto del nuvo
record ed aggiungere 1. La domanda e' a che cosa ti serve? Una
soluzione del genere introduce molte problematiche di concorrenza.
Saluti
-- 
I'am what I'am, I do what I can

per il resto ho fatto diverse prove ma non funge nulla. Come potrei fare??
A perte il fatto che di una una gestione contatore simile a fatturazione ecc..
si era parlato tra questi post, cerca con google nello storico, per rispondere
strettamente alla tua domanda potresti invocare una adoquery tipo
SELECT MAX(numfatt) FROM Fatture;
comunque, non mi stanchero' mai di ripeterlo, il tipo autoinc di access non
deve essere usato come contatore per numerazioni, perche' non e' adatto a
questo: infatti ad ogni compattazione riparte dal numero piu' basso
diponibile.
Un contatore serio si crea con una tabella apposita ed una serie di controlli
sulle tabelle correlate.
C'e' tutto on line su it.comp.lang.delphi.
Ciao!
P.S:
Vuoi un consiglio? trvoati un server news gratuito e accedi a questo gruppo
con un newsreader. I forum non sono cosi' efficaci e maneggevoli quanto un
newsreader.
;)
-- 
Morde. 
(morde at programmer dot net)
Newsgroup: it.comp.lang.delphi
Titolo: Funzione calcoli percentuale

Esiste in delphi una funzione che, dato un numero, mi calcoli una serie di
percentuali a cascata
Esiste in delphi una unit che espone funzioni di calcolo percentuale anche in
cascata ?
Es.
Prezzo: 500
Sconti: 10  + 5 + 3,5
Totale = funzionesconto(funzionesconto(funzionesconto(500,10),5),3.5);
Non sono molto ferrato in materia...
-- 
Morde. (
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/
Firefox, il miglior browser: 
http://www.gxware.org/mozilla/

Esiste in delphi una unit che espone funzioni di calcolo percentuale anche in
cascata ?
Es.
Prezzo: 500
Sconti: 10  + 5 + 3,5
Totale = funzionesconto(funzionesconto(funzionesconto(500,10),5),3.5);
Non sono molto ferrato in materia...
Grazie ragazzi


 Totale = funzionesconto(funzionesconto(funzionesconto(500,10),5),3.5);
E' abbastanza semplice; quando hai più sconti, la somma è data da:
1-(1-Sconto1)*(1-Sconto2)*(1-Sconto3)....
questo se hai gli sconti nella forma già divisa per 100, tipo 0,10 = 10%
altrimenti
(1-(1-Sconto1/100)*(1-Sconto2/100)*(1-Sconto3/100))*100
ovviamente il *100 finale serve se vuoi avere la percentuale, altrimenti non
serve, basta moltiplicare la cifra che vuoi scontare per il numero decimale
che ti salta fuori.
--
Jax
====
Ogni società non è altro che ciò che rimane a conclusione di un
processo di sgretolamento della comunità. (Max Sheler)

> (1-(1-Sconto1/100)*(1-Sconto2/100)*(1-Sconto3/100))*100
io direi meglio (100-(100-sconto1)*(100-sconto1)) ed eventualmente dividere
alla fine per 100
cosě fai fare meno calcoli
-- 
_________________________________________
Edmondo Di Tucci snar...@Tlibero.it
guarda i miei lavori su: 
www.powernetsi.it/edmondo

 cosě fai fare meno calcoli
Giusto.
--
Jax
====
Che cos'č l'avarizia? E` un continuo vivere in miseria per paura della
miseria. (San Bernardo)

 Giusto.
Insieme a Morde abbiamo sviluppato queste due funzioni che possono
essere utili a chi deve calcolare il tipo di sconto in questione,
mantenendo una buona leggibilità del codice. Esempi d'uso:
procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Caption := FloatToStr(ImportoScontato(500, [10, 5, 3.5]));
end;
Ciao
Antonio
---------------------------------------------
interface
function ImportoScontato(Importo: currency; Sconto: double): currency;
overload;
function ImportoScontato(Importo: currency; Sconto: array of double):
currency; overload;
implementation
function ImportoScontato(Importo: currency; Sconto: double): currency;
begin
  Result := Importo - (Importo * Sconto / 100);
end;
function ImportoScontato(Importo: currency; Sconto: array of double):
currency;
var
  i: integer;
begin
  Result := Importo;
  for i := Low(Sconto) to High(Sconto) do
    Result := ImportoScontato(Result, Sconto[i]);
Newsgroup: it.comp.lang.delphi
Titolo: Accesso dbExpress a Firebird

Ciao a tutti, devo aprire un database Firebird presente su un pc che si 
chiama PCSERVER, utilizzando il componente SQLConnection.
Tutto funziona correttamente se come percorso del database scrivo 
PCSERVER:C:\database.fdb, ma io avrei necessità di utilizzare l'alias del 
database, quindi accedere con qualcosa del tipo PCSERVER:alias.
Come devo fare? Qual'è la sintassi corretta? Utilizzando il componente 
IBDatabase non ho mai avuto problemi ad usare l'alias invece del percorso 
completo.
Grazie anticipatamente.

nntp.aioe.org
 ha scritto:

http://www.destructor.de/firebird/fbdelphi/index.htm
Vedi lo step 2
ACSH
-- 
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: Spazio occupato da un file

Salve
Avrei bisogno di sapere l'effettivo spazio su disco occupato da un file. La
getfilesize restituisce la dimensione effettiva in byte del file e non e'
quello che mi serve.
In realta' mi servirebbe sapere quanti byte per settore ci sono secondo le
varie file system. Sotto win9x ci sono 8 settori per cluster percio' un file
da un byte in realta occupa 4096 byte (bello spreco...) sotto NT le cose
cambiano visto che con la ntfs si puo' settare questo valore.
Insomma....quale API?
Grazie

 wrote in message 8iotd6$437$1...@news.IT.net...

forse ho scelto la strada più complicata, ma dovresti riuscirci con la
DeviceIOControl tramite il parametro
IOCTL_DISK_GET_MEDIA_TYPES, facendo riferimento alla struttura
DISK_GEOMETRY.
Oppure un'idea che mi viene in mente, è quella di creare un file di un byte
controllando poi lo spazio rimanente su
Hard-disk.
Sottraendo tale spazio da quello iniziale, ti trovi il dato che ti serve !!
Per quanto riguarda la "DeviceIOControl", mi pare che le dichiarazione tipo
la IOCTL_DISK_GET_MEDIA_TYPES
e le altre, non ci sono in Delphi. In ogni caso le puoi trovare in C nel
file "winioctl.h" per convertirle in pascal tramite l'utility
di Bob Swart che si chiama "HeadConv.exe".
Io avevo provato a convertirle ma poi c'era da apportare qualche semplice
correzione perchè c'era qualche errore sintattico.
Vabbè, ti saluto.....buon lavoro !!
Antonio Tarolla

...

Ciao Sem,
vedo che ti ha già risposto Antonio, quindi non c'è bisogno di aggiungere
nulla se non una piccola specifica tecnica :
Sotto NT e Win9x devi far cambiare il comportamento della funzione
CreateFile (che ti serve per ottenere l'handle del drive), mi pare che su 9x
devi accedere tramite PHISICALDRIVEx o simile!
Ciao
--
- Carlo -

Newsgroup: it.comp.lang.delphi
Titolo: Dockable Forms

Ciao,
qualcuno saprebbe indicarmi un esempio su
come dockare piu form all' interno di una.
Quello fornito con delphi 6 e' troppo ostico per me... :)
Ps non vorrei usare componenti di terze parti..
Ciao!

 ha scritto nel messaggio
news:gzbZ8.159$zL4....@news.edisontel.com...

Newsgroup: it.comp.lang.delphi
Titolo: Comando Dos

Salve a tutti!!!!
Vorrei sapere come eserguire un comando DOS
io ho provato cosě e non va.
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
var
  Result : LongWord;
begin
  Result := ShellExecute(GetDeskTopWindow(),'Open',PChar(Edit1.Text);
end;
In Edit1 c'č scritto il comando.
--------------------------------
Inviato via 
http://usenet.libero.it

io ho provato cosě e non va.
Se devi eseguire roba DOS ti conviene metterla in un bat, aggiungere
EXIT in fondo al bat e lanciare 
COMMAND.COM
 /C nomefile.bat
fe...@delenda.net
-- 
I could be your supermodel or Norman Mailer
and you wouldn't know the difference, would you ?

 In Edit1 c'č scritto il comando.
devi aggiungere ShellApi nelle unit utilizzate (uses) e poi
procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(0, 'Open', PChar(Edit1.Text), '', '', SW_NORMAL);
end;

Newsgroup: it.comp.lang.delphi
Titolo: format dei numeri

Sto perdendo un sacco di tempo con delphi 2 e con la funzione format - Come
posso fare per formattare un numero con i punti delle migliaia ex.
123.345.343.
grazie

Anche se un pò empirico io ho addottato questo:
Function Punteggiato(s: String): String;
Const
 Dec: Boolean = False;
Var
 decimale: String;
Begin
 if Pos(',',s)>0 then Begin
   Decimale:=Copy(s,Pos(',',s),4);
   Delete(s,Pos(',',s),4);
   Dec:=True;
 end;
 if Length(s)=4 then Insert('.',s,2) else
  if Length(s)=5 then Insert('.',s,3) else
  if Length(s)=6 then Insert('.',s,4) else
  if Length(s)=7 then Begin
   Insert('.',s,5); Insert('.',s,2);
  end else
  if Length(s)=8 then Begin
   Insert('.',s,6); Insert('.',s,3);
  end else
  if Length(s)=9 then Begin
   Insert('.',s,7); Insert('.',s,4);
  end else
  if Length(s)=10 then Begin
   Insert('.',s,8); Insert('.',s,5); Insert('.',s,2);
  end else
  if Length(s)=11 then Begin
   Insert('.',s,9); Insert('.',s,6); Insert('.',s,3);
  end else
  if Length(s)=12 then Begin
   Insert('.',s,10); Insert('.',s,7); Insert('.',s,4);
  end;
  if Dec then s:=s+decimale;
  Punteggiato:=s;
end;
E pur funziona!!!!
Ciao.

 Come posso fare per formattare un numero con i punti delle migliaia
io ti propongo queste soluzioni:
lblFormattato.Caption := FormatFloat('#,###', VariableFloat)
o
lblFormattato.Caption := FormatFloat('#,###',
StrToFloat(edtNonFormattato.Text))
in d4 funziona, credo anche in d2
Ciao.
Alan Solo

>
Sto perdendo un sacco di tempo con delphi 2 e con la funzione format -
Come
posso fare per formattare un numero con i punti delle migliaia ex.
123.345.343.
<<
Provato con Format('%1.0n', [NumberToFormat]); eventualmente imposta la
var globale ThousandSeparator (o cambiala dal CtrlPnl).
hth
Paolo Arosio

 Inoltre[...] un consiglio su qualche libro da acquistare.
Personalmente mi sento di consigliare quelli di Marco Cantù (v.
marcocantu.com
 o .it), in particolare DDH (scritto mi pare ai tempi di
D3) entra in dettaglio su aspetti di base di Delphi validi anche per le
versioni successive.
hth
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: TlistBox & Tasto DX del Mouse

Dovrei fare in modo che  quando premo il tasto DX del mouse (non il
SX), oltre al PopupMenu' venga selezionato anche l' Item dotto il
cursore del mouse in quel momento (se ce n'e' uno).
come posso fare? .. :-|

 ha scritto nel messaggio
news:1114596522....@l41g2000cwc.googlegroups.com...

unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Menus, StdCtrls;
type
  TForm1 = class(TForm)
    ListBox1: TListBox;
    PopupMenu1: TPopupMenu;
    prova1: TMenuItem;
    procedure ListBox1MouseDown(Sender: TObject; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
    procedure PopupMenu1Popup(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.ListBox1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  if Button=mbRight then
    ListBox1.ItemIndex:=ListBox1.ItemAtPos(Point(X,Y),true);
end;
procedure TForm1.PopupMenu1Popup(Sender: TObject);
begin
  // questo mettilo solo se non vuoi far uscire il popup in caso non c'è
selezionato nessun elemento nella listbox
  if ListBox1.ItemIndex=-1 then Abort;
end;
end.
object Form1: TForm1
  Left = 192
  Top = 107
  Width = 696
  Height = 480
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object ListBox1: TListBox
    Left = 16
    Top = 16
    Width = 169
    Height = 241
    ItemHeight = 13
    Items.Strings = (
      '1'
      '2'
      '3'
      '4'
      '5'
      '6')
    PopupMenu = PopupMenu1
    TabOrder = 0
    OnMouseDown = ListBox1MouseDown
  end
  object PopupMenu1: TPopupMenu
    OnPopup = PopupMenu1Popup
    Left = 200
    Top = 24
    object prova1: TMenuItem
      Caption = 'prova'
    end
  end
end
Ciao
Giorgio

grazie mille ;)
Newsgroup: it.comp.lang.delphi
Titolo: Avviare Client Posta PREDEFINITO?

Salve a tutti,
Alla chiusura di un'applicazione ho bisogno di avviare il client di posta
PREDEFINITO nel computer. Si tratta solo di aprirlo, non di inviargli
comandi. Il problema sta nel fatto che questo "avvio" dovrebbe funzionare
sia che si tratti di Outlook, sia di Outlook Express, sia di Eudora o
qualunque altro Client di Posta.
Insomma....quando si clicca su u indirizzo email il computer apre
direttaente il programma di gestione della posta con un nuovo
messaggio....che cosa viene richiamato? Come fa il browser in questo caso a
sapere che eseguibile deve avviare? Il programma deve funzionare sia in
Win9x/ME che NT/2k/XP quindi non vorrei mettere in mezzo delle chiavi di
registro perchč sennň mi potrebbe toccare distinguere da vgersione a
versione.
Grazie a tutti, a presto (statene certi ;))

 Grazie a tutti, a presto (statene certi ;))
prego.
Buon Natale e Felice 2002 a tutti, Antň.

> ShellExecute(Handle, 'open', 'mailto:', '', '', SW_NORMAL);
Ehmm...non va. Non riconosce il comando. Ho cercato nell'help online ma alla
chiave "ShellExecute" non trova niente...che faccio? :(
Se può servire saperlo ho Delphi 5.

 chiave "ShellExecute" non trova niente...che faccio? :(
aggiungi la unit ShellAPI alla uses-list
--
- Carlo -
c.b...@libero.it

 wrote in message
news:WMkV7.354506$sq5.17...@news.infostrada.it...


 wrote in message
news:fblV7.354660$sq5.17...@news.infostrada.it...


dovresti leggere le chiavi del registro di sistema.
ci sono quattro posizioni nelle quali vengono memorizzate informazioni sul
client di posta predefinito e sono:
le chiavi per l'uso con shellexecute per l'invio del messaggio di posta:
1. [HKEY_CLASSES_ROOT\mailto\shell\open\command]
2.[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\mailto\shell\open\command]
informazione sul client di posta predefinito:
3. [HKEY_LOCAL_MACHINE\SOFTWARE\Clients\Mail]
e in base al valore della chiave 3 (es. client predefinito è Outlook
Express) :
4.[HKEY_LOCAL_MACHINE\SOFTWARE\Clients\Mail\Outlook
Express\shell\open\command]
sé hai problema o dubbio sccrivi.
ho anche disponibile un mio componente che tratta la gestione del client di
posta.

 e in base al valore della chiave 3 (es. client predefinito č Outlook


 > e in base al valore della chiave 3 (es. client predefinito è Outlook

Newsgroup: it.comp.lang.delphi
Titolo: eseguire un'applicazione dal file che è stato creato

Ciao a tutti, (delphi 6) ho fatto un album fotografico (foto.exe) e le
impostazioni (ad esempio la sequenza delle foto, ecc.) le salvo in un
file di testo con un estensione mia (del tipo *.alb), e fino a qui ok.
Quando voglio vedere un album, ora apro foto.exe e mi vado a cercare
l'album che mi interessa e tutto funziona, però vorrei che in esplora
risorse con doppio click sul file *.alb mi si aprisse l'applicazione
avviando automaticamente la visione con le impostazione contenute. Non
so come fare a passare il nome del file su cui ho fatto doppio click
all'applicazione quando viene avviata.
Grazie in anticipo.


Dai un'occhiata alle funzioni ParamCount e ParamStr
ciao
Giacomo

 all'applicazione quando viene avviata.
Devi registrare il formato .ALB e associare la tua applicazione:
procedure RegisterExtension(AExtension,
                            AProgramID,
                            AProgramDescription,
                            AProgramPath: string);
begin
  with TRegistry.Create do
    try
      RootKey := HKEY_CLASSES_ROOT ;
      OpenKey('.' + AExtension, true) ;
      WriteString('', AProgramID) ;
      CloseKey ;
      OpenKey(AProgramID, true) ;
      WriteString('', AProgramDescription);
      CloseKey;
      OpenKey('shell\open\command', true) ;
      WriteString('', '"'+AProgramPath+'" "%1"');
      CloseKey;
    finally
      Free;
    end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
   RegisterExtension('alb', 
                     '.ALB photo album',
                     'Applicazione di prova per file .ALB',
                     'C:\WinNT\System32\Notepad.exe' ) ;
end;
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

> Devi registrare il formato .ALB e associare la tua applicazione:
Sono arrugginito da oltre un anno di inutilizzo di delphi...sigh..abbiate
pietą...
Non devo assegnare un applicazione ad un estensione.
Quando faccio doppio click sul file *.alb mi si apre il programma
foto.exe(e fin qui ok), perņ a questo punto il programma mi deve caricare
il contenuto del file sul quale ho doppio-cliccato, ed č a questo punto
che non so come dire a foto.exe che se č stato aperto dall'apertura di
doppio-click sul file, deve legere il suo contenuto.


 doppio-click sul file, deve legere il suo contenuto.
Analizza il contenuto di CmdLine, oppure ricorri a ParamCount()/ParamStr().
Consulta l'help.



Tutto risolto con ParamStr(1).
Non pensavo che il doppio click su di un file, quando fa partire
lì'applicazione collegata gli restituisce come parametro il nome del
file stesso.
Grazie ancora!!
Newsgroup: it.comp.lang.delphi
Titolo: [D7]ent - il menu che si apre dove vuole lui

Cosa mai vista.
Nonostante abbia disinstallato e reinstallato D7 la voce View del menu di D7
si apre in
ALTO
non permettendo di effettuare nessuna scelta tranne l'ultima.
Avete consigli ?
Grazie fin da ora.
Ciao - (
mari...@inwind.it
)
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

E' venuto il momento di cambiare il mio monitor da 15 pollici.
Grazie lo stesso.
Mario - (
mari...@inwind.it
)


Newsgroup: it.comp.lang.delphi
Titolo: [D2005.NET]TListConnector e classe Dataset(lunghetto, interoperabilità)

Salve!
Or dunque, m'accingo a declinar li miei tormenti.
Anzitutto, quello che intendo ottenere: semplicemente che il
TListConnector rinsavisca e si accorga che gli ho passato un
dataset valido.
Piccola precisazione: utilizzando C# se passo la stessa
funzione alla data grid tramite la proprietà DataSource,
essa si accorge che il dataset è valido, quindi
evidentemente il problema non è in questo.
Contrariamente, invece, il buon TListConnector dice che non vi
sono campi definiti e che dunque non può creare il dataset.
Bene, questo è il codice che ho usato:
procedure TMainFrm.FormCreate(Sender: TObject);
var Ds : System.Data.DataSet;
begin
   FUsers := ModelizedDBModel.USERS.Create;
   Ds := FUsers.GetUSERS.Clone;
   ModelDBConnector.DataObject := IList(Ds);
   ModelDBConnector.Active := True;
end;
Nota bene: ho anche provato a passargli una singola tabella,
niente da fare. Non gli piace. Chiaramente, i riferimenti sono
impostati nel modo corretto(l'assembly è uno solo) altrimenti
nemmeno C# mi darebbe soddisfazione.
Sinceratomi NON E' nel dataset, quale può essere il problema?
Mi pare di aver fatto tutto nel modo corretto, però non sono,
come dire, sicuro al 100%. Navigando tra gli esempi, non mi
pare di averne visti di attinenti, almeno stando ai nomi ed
alle descrizioni nei vari readme associati.
Google Groups nemmeno sembra essermi molto d'aiuto, ci sono
soli 3 post, di cui uno mio -.- .
Qualcuno ci si è scornato, riuscendo a farlo andare?
Grazie in anticipo,
Andrea

 Qualcuno ci si è scornato, riuscendo a farlo andare?
Purtroppo, non ho molto tempo per realizzare esempi pratici e quanto ti 
ho detto è frutto di uno studio (per il momento) un po' superficiale, 
poichè non ho ancora avuto occasione di far interoperare 
VCL.NET
 con 
Windows Forms per esigenze forzate.
Se mi capiterà di approfondire, magari ti scrivo altre informazioni.
Ciao! :-)
-- 
Marco «Alka» Breveglieri
(marco [@] abls [.] it)
  ABLS Team S.n.c. - Software & Web
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 Ciao! :-)
Ciao,
Andrea
Newsgroup: it.comp.lang.delphi
Titolo: Informazioni server client

Vorrei avere qualche suggerimento per la programmazione server/client in
delphi 5-6.
sapete indicarmi  un sito internet dove poter trovare un breve guida
alla programmazione suddetta.
Grazie
Luca
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Sinceramente non so consigliarti un sito in particolare, però se mi fai
qualke domanda più particolareggiata ti posso rispondere.
Per esempio non so se vuoi fare un applicazione con un DB su un server e
vari client che ci si collegano, o se vuoi fare un programma che gira su un
server, che deve far compiere determinate operazioni a dei client,
comunicando tramite una determinata porta, ecc., ecc....
Bye.
Daniel.
--------------------------------
Inviato via 
http://usenet.libero.it

a me interessa la stessa cosa ma vorrei fare un applicazione con un db su un
server e vari cliente che si collegano
"Daniel" <programmat...@NOSPAMlibero.it> ha scritto nel messaggio
news:212Z141Z171Z131...@usenet.libero.it...


Newsgroup: it.comp.lang.delphi
Titolo: scansione rete

salve a tutti, dovrei riuscire a fare un programmino in delphi per la
scansione di una rete lan (ip e porte).avete qualche suggerimento?
--- posted by geoForum on 
http://www.delphiedintorni.it

 scansione di una rete lan (ip e porte).avete qualche suggerimento?
Non per fare il rompiballe, ma visto che ci sono decine e decine di 
software che fanno quello che chiedi, non sarebbe meglio usarne uno già 
pronto, tipo Advanced IP Scanner o Advanced Port Scanner?
Poi se lo fai per imparare, lodi lodi lodi, ma io non ho nessun 
suggerimento ;)
-- 
Jax


purtroppo questa cosa dovrei farla io di sana pianta...


Newsgroup: it.comp.lang.delphi
Titolo: dbgrid e access97

Credo una tabella in Access 97 ho la necessitą di avere campi ora.
Ho impostato in Access 97 il campo come data/ora in formato breve.
Ma quando lo aggancio con una DBGrid via ODBC mi mostra anche la data
30/12/1899 10.23.00, come posso evitare questa cosa e vedere e inserire
solo 10.23.00 ?
Grazie !
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 solo 10.23.00 ?
Prova a configuare il DisplayFormat del campo persistente come
hh.nn.ss
Ciao
Gabriele