mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Programma con database condiviso in rete

Ciao a tutti.
Devo fare un programma che funzioni con un database condiviso tra 2 computer
in rete collegati tra loro.
Il database deve essere per forza o PARADOX o ACCESS interfacciato con ADO.
Come faccio a condividere il database?
A me non serve che entrambi possano scrivere sul database
contemporaneamente, ma possono almeno consultare il database simultaneamente
anche se senza scriverci.

 Come faccio a condividere il database?
Usando il bde imposti nell' alias del tuo database il percorso degli archivi
in rete.

>Come faccio a condividere il database?
1) Metti i file del database in una cartella condivisa in rete, visibile
ad tutte le macchine.
2) Installi MDAC o il BDE (a seconda se stai usando database Access o
Paradox) sulle macchine. MDAC probabilmente è già installato, ma è meglio
controllare di avere la stessa versione su tutte le macchine,
possibilmente recente, se non ci sono problemi di compatibilità con altre
applicazioni.
3) Se stai usando Paradox, devi impostare correttamente alcune proprietà
della TSession corrente, sia che usi quella implicita sia che usi un
componente TSession esplicitamente, in particolare NetFileDir e
PrivateDir. La prima controlla lo sharing delle tabelle e deve essere la
stessa per tutte le applicazioni che accedono al database, la seconda
indica la directory per i file temporanei e deve essere locale alla
macchina. Se non lo fai, aspettati problemi.
Fatto questo puoi sia leggere che scrivere. Non essendo comunque database
client/server, le prestazioni sono quelle che sono, e peggiorano
rapidamente all'aumentare delle dimensioni del DB e del numero di client.
Luigi D. Sandon - D&amp;D Support Team
--- posted by geoForum on 
http://www.delphiedintorni.it

 ha scritto nel messaggio
news:mn69d.21101$eb....@tornado.fastwebnet.it...


alla macchina.
Durante il funzionamento il BDE puň creare tabelle temporanee, che elimina
quando non servono piů. Queste tabelle devono essere in una cartella
privata dell'applicazione, se la cartella viene usata contemporaneamente
da piů applicazioni magari su macchine diverse si va incontro a problemi.
Ad esempio se lanci l'applicazione da una cartella condivisa e imposti
PrivateDir alla cartella dell'applicazione. In questo caso tutti gli
utenti usano la stessa cartella e il BDE non capisce piů nulla.
PS: quota solo l'indispensabile, non tutto il messaggio :)


Ok ricevuto proverņ.


Per paradox e BDE ti consiglio di vedere
http://www.bdesupport.com/
Giulio 

Grazie Giulio.
;)
Newsgroup: it.comp.lang.delphi
Titolo: istanziare un nuovo componente

Giusto per imparare, ho creato un componente seguendo alla lettera un libro 
un po'
datato ma non mi pare che sull'argomento sia cambiato poi tanto (giusto per
la precisione, Usare Delphi 3 di Ladommada-Madaffari, ed. Jackson).
Si tratta di una variante dell' OpenPictureDialog con qualche caratteristica
particolare.
Il componente e' dichiarato cosi' nella relativa unit
type
  TOpenPictDlg = class(TOpenDialog)
  private
    FImage: TImage;
    FPanel,
      FPictPanel: TPanel;
    FPictSizeLab,
      FFileSizeLab: TLabel;
      FFileSize : Integer;
    FPicture: TPicture;
    function Execute: boolean; override;
    function GetPicture: TPicture;
    function GetOptions: TOpenOptions;
    procedure SetOptions(Value: TOpenOptions);
  protected
    procedure DoShow; override;
    procedure DoSelectionChange; override;
  public
    constructor create(AOwner: TComponent);
    property Picture : TPicture read GetPicture;
    property FileSize : integer read FFilesize;
  published
  property Options read GetOptions write SetOptions;
  end;
Seguono naturalmente costruttore, procedure, ecc.
Fino alla fase di scrittura del codice ed anche di test prima di installarlo
nella palette, quindi in pratica istanziando il componente direttamente a
runtime, tutto funziona perfettamente.
Una volta compilato ed installato il componente nella palette, con la 
relativa unit
OPictDlg.pas, ho pero' verificato un comportamento che, almeno per le mie
(scarse) conoscenze, appare strano:
Pongo il componente sulla form, e naturalmente nella relativa dichiarazione
vedo:
TForm1 = class(TForm)
    ...
    OpenPictDlg1: TOpenPictDlg;
    ...
Ritengo quindi che all'avvio dell'applicazione il componente venga
direttamente creato.
Ed invece se provo ad utilizzarlo ricevo un access violation che sono
riuscito a risolvere soltanto inserendo una creazione esplicita:
OpenPictDlg1 := TOpenPictDlg.create(Self);
Qualcuno cortesemente puo' spiegarmi perche' cio' accade, non dovrebbe la
creazione del componente avvenire senza alcun intervento all'avvio
dell'applicazione?
Chiedo scusa per la lunghezza del msg, e se in alcuni (molti) punti il mio
linguaggio non e' proprio... tecnico.
Grazie a tutti.
-- 
F&R

     constructor create(AOwner: TComponent);
cosě a occhio, manca la clausola override 
  constructor Create(AOwner: TComponent); override;
e poi nell'implementazione del costruttore dovrebbe essere richiamato il 
costruttore ereditato:
constructor TOpenPictDlg.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
(...)
end;
-- 
Mauro Falzari
"Un unico giorno abbraccia la vita della rosa,
in un istante essa unisce gioventů e vecchiaia".
  (Decimo Magno Ausonio, sec. IV)

  constructor Create(AOwner: TComponent); override;
Mi sa che ci hai proprio azzeccato, complimenti!
-- 
F&R
Newsgroup: it.comp.lang.delphi
Titolo: variabile dove c'e' il path del programma.

Salve a tutti,
supponendo di avere un programma eseguito in:
c:\prova.exe
qual e' la variabile dove il path completo e' contenuto?

 qual e' la variabile dove il path completo e' contenuto?
Fai una ricerca con Google, perché questa domanda è davvero forse la più 
frequente mai esistita. :-)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 frequente mai esistita. :-)
ho aperto firefox, ho digitato in google "delphi path completo" e 
premuto "mi sento fortunato".
Sorpresa..... :)
-- 
Morde

Morde ha scritto:

Chiedo scusa!

 ha scritto nel messaggio 
news:UQGAl.88304$Zp.8...@newsfe21.iad...


mark ha scritto:

anche:
 
	path:=ExtractFilePath(ParamStr(0));
Dan
Newsgroup: it.comp.lang.delphi
Titolo: Ancora TRegistry

Salve ragazzi,
Ho un problemino da sottoporvi, forse con la
vostra esperienza riuscirete ad aiutare un 'programmatore'
novello
Sto creando un applicazione che possa scrivere sul
Registry le impostazioni di DBGrid,Colore,Font ecc.
Arrivo al dunque:  Non riesco a scrivere, e quindi poi a leggere,
la prorietà FontDialog.Font.Style del componente FontDialog.
per le altre '
FontDialog.Font.Name
', 'FontDialog.Font.Color' e
'FontDialog.Font.Size' la cosa si è risolta con l'utilizzo di WriteString e
ReadString
oppure WriteInteger e ReadInteger, ma la proprietà Style  è un pò
biricchina.
volevo scrivere qualcosa di questo tipo:
Registro.Write....('StyleFont',DBGrid.Font.Style);
Datemi una mano please. Grazie

Datemi una mano please. Grazie
la proprietà Style è un set (insieme), perchè uno stile puo' essere
bold oppure bold e sottolineto oppure niente ecc...
e quindi per poterla "salvare" fosre ti conviene fare una cosa del
tipo:
if fsBold in DBGrid.Font.Style
 then Registro.Write....('StyleFont_Bold','1')
 else Registro.Write....('StyleFont_Bold','0')
e avanti così... non vedo altri metodi ...
ps: valuta anche la possibilità di usare un semplice ini (TIniFile)
anzichè il registro (ci pensa già windows anche troppo bene a
sporcarlo e incasinarlo! ;)
Ciao,
Alan Solo

 Registro.Write....('StyleFont',DBGrid.Font.Style);
Usa queste e salva/carica gli stili con WriteInteger/ReadInteger:
function FontStylesToInteger(F : TFontStyles) : Integer;
var
  i : integer;
  X : TFontStyle;
begin
  Result := 0;
  i := 1;
  for X := Low(TFontStyle) to High(TFontStyle) do
  begin
    if X in F then
      Result := Result or i;
    i := i shl 1;
  end;
end;
function IntegerToFontStyles(I : Integer) : TFontStyles;
var
  j : integer;
  X : TFontStyle;
begin
  Result := [];
  j := 1;
  for X := Low(TFontStyle) to High(TFontStyle) do
  begin
    if (I and j) <> 0 then
      Include(Result, X);
    j := j shl 1;
  end;
end;
-- 
Roberto Lupi
http://www.lupi.ws/

end;
[...]
ottimo! non ci avevo pensato!
Ciao,
Alan Solo

sporcarlo e incasinarlo! ;)
no. Bisogna imparare a usare il registro, troppo comodo sennò. Ti posso 
portare *almeno* 10 esempi di programmi che ci fanno il favore di non 
sporcare il registro, e come unico risultato non funzionano. Ti posso 
elencare una decina di scenari in cui il registro è meglio. Una decina 
di scenari in cui i file ini creano problemi. Procedo?

 ha scritto nel messaggio
news:Xns90C4D4070BFE...@127.0.0.1...

Il "si" non toccherebbe a me darlo, xò sono curioso...:)))
Newsgroup: it.comp.lang.delphi
Titolo: [OT] NG per la discussione ed il progetto di sistemi operativi

Salve,
Volevo sapere secondo voi qual'è il gruppo migliore per
discutere l'argomento in oggetto!
Grazie in anticipo,
Andrea

 discutere l'argomento in oggetto!
imho
alt.os.development
--
- Carlo -
"Imparare senza riflettere o riflettere senza imparare non vi porta alla
buona comprensione" Confucio

discutere l'argomento in oggetto!
Se non ti scandalizza usare mirc vienici a trovare su
#
Ita...@irc.azzurra.org
 ( 6667-6669 ) anche se molto attacati al
nostro ItaliOs { 
www.italios.it
 } parliamo anche di Os Dev in generale
oltre di Linux e dintroni dal nostro gurppo e nato un altro OS {
DreamOS } cmq sul sito del OS trovi molto materiale { in italiano e
non } per OS Dev
ps:
abbiamo anche una Newsletteer ma è un po' smorta
Il Razziatore,
The Only Good Windows is an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
ICQ     : 67552596
-----------------------------------------------
Founder of MediaPlayer Project
http://mpp.iwebland.com

Newsgroup: it.comp.lang.delphi
Titolo: Lookup doppio su anagrafica

Soliti problemi con i controlli data-aware e ADO...
Stavolta si tratta di un'applicazione con 2 tabelle (piu' altre non
significative): una e' una tabella "spedizioni", l'altra e' la tabella
"anagrafica".
Ogni spedizione ha un mittente e un destinatario, e per visualizzare i nomi
di entrambi sul form principale, uso 2 campi lookup, diretti verso 2
ADOTable, (con lo stesso Tablename, ma separate.)
Ora, se modifico l'ID di uno dei 2 campi, mi scompare dalla finestra il nome
dell'altro... suppongo ci sia la solita ragnatela di relazioni incrociate...
Esiste un modo per rimediare a questo problema? Grazie.

On Mon, 18 Aug 2003 17:31:10 +0200, bigmouth wrote:
non č che per caso chiudi il dataset e non lo riapri? 
eventualmente usa 2 dataset che puntano alla stessa tabella. uno lo utilizzi
per il lookup del mittente, l'altro per il lookup del destinatario.
Forse il comportamento da te riscontrato avviene dopo il post, potresti
provare a dargli un requery o un refresh della tabella e vedere cosa
succede.
ciao fabrizio

 vedere cosa succede.
E' quello che ho fatto...
Si, effettivamente se entrambi puntano alla stessa tabella, ogni volta che
inserisco un elemento o lo cambio, devo fare un refresh "forzato" (chiudere
e riaprire) di entrambi... ieri usavo il refresh "semplice" e non funzionava
(problemi di ADO?)

 (problemi di ADO?)
Usi i dataset forniti con delphi? se si ti consiglio di scaricarti il
TBetterAdoDataset che č implementato molto meglio dei componenti nativi di
delphi. lo trovi qui 
http://web.orbitel.bg/vassil/
Si il problema del refresh č di ado, difatti usando il requery dovrebbe
funzionare, dipende dalle impostazioni di connessione. Purtroppo al momento
non me le ricordo come andavano messe. 
Perchč non provi ad usare eventualmente 2 dataset diversi, richiamandoti
solo i campi che ti servono? in questo modo di sicuro eviti il problema
suddetto. 
ciao Fabrizio
Newsgroup: it.comp.lang.delphi
Titolo: Exe automodificanti

Salve ! Volevo sapere se è possibile che un prog possa modificare l'exe o
anche cancellarsi.
Pensavo ad un file che, una volta lanciato, faccia i suoi comodi e poi si
autocancelli, oppure ad un prog che si autoaggiorna (ad esmpio scaricandosi
la nuova versione da internet). Devo pero' poter avere un solo exe.
Sapete come fare ?
Ciao e grazie !                        {MSX}

anche cancellarsi.
Dipende sotto quale sistema operativo.
Sotto NT, ad esempio, non ti e' permesso cancellare programmi in
esecuzione.
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
---------------------------------------------
#exclude <windows.h>

 anche cancellarsi.


Potresti integrare nell'EXE un altro programma.
Quando lanci il tuo EXE quest'ultimo automaticamente estrae il piccolo EXE
sotto una directory non sospetta (WIn, SYSTEM, TEMP, ecc.) e al riavvio di
WINDOWS (o lo lanci quando chiudi il primo PRG) cancella il tutto.
Ciao RENZO
--
Posted from [213.205.2.73] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Esiste una chiave del registry che ti permette di eseguire un compito una
volta, all'accensione del sistema e poi lo stesso S.O. provvede a rimuovere
la chiave.
In pratica il tuo programma parte, inserisce la chiave per farli svolgere il
compito che vuoi e alla riaccensione del sisstyema viene eseguito tale
compito.
Cerca la Chiave RunOnce (si trova in posizioni diverse nell'architettura
Win9x / WinNT / Win2000)
Il Biondo

Newsgroup: it.comp.lang.delphi
Titolo: Oggetto TPrinter

Qualcuno mi potrebbe postare del codice di esempio per la gestione
dell'oggetto TPrinter. Dovrei creare dei report e senza ricorrere a tool
esterni li vorrei creare utilizzando l'oggetto TPrinter(per ambiente
windows/linux). Da quanto ho potuto
vedere, l'help del Delphi 6.0 non è molto d'aiuto.
Qualcuno mi saprebbe dire dove trovare degli esempi.
Mi interesserebbe sapere se una volta creato da codice il canvas(da quanto
ho potuto capire è l'immagine che verrà stampata) sia possibile far veder
all'utente tale immagine(e quindi l'anteprima).
Grazie mille!

 all'utente tale immagine(e quindi l'anteprima).
TImage ha il canvas che supporta assign se non vado errato.
Bye
A.
Newsgroup: it.comp.lang.delphi
Titolo: scrittura file...ancora!!!

Salve...
Creo un file con:
Var
F : File of LongInt;
Y : LongInt;
assignfile(F,'prova.txt');
rewrite(f);
y := 12345;
write(f,y);
closefile(f);
e fin qui funziona...
ora vorrei riaprire il file e riscriverci dentro alla fine...insomma in
append:
assignfile(F,'prova.txt');
append(f);
y := 12345;
write(f,y);
closefile(f);
sembra funzionare...pero oltre ai 4 byte che dovrebbe scrivere ne scrive
altri 124 che non centrano nulla...
Ah...e un'altra domanda se volessi leggere un file utilizzando il blockread
pero volendo essere libero di leggere quanti byte mi pare e dove mi pare
come faccio?
Mi spiego, apro il file faccio un seek e leggo 5 byte poi faccio un'altro
seek e leggo solo 2 byte...non si puo' fare cosi direttamente?
Grazie.......ancora!!

 seek e leggo solo 2 byte...non si puo' fare cosi direttamente?
Prova a vedere la classe TFileStream. Puoi farci tutto cio' che ti pare con
i files.
--
(*****      MBSoftware       *****)
http://web.tiscalinet.it/mbsoftware

 seek e leggo solo 2 byte...non si puo' fare cosi direttamente?
Sì, lo puoi fare... anch'io però ti indirizzo su TFileStream che ti
semplifica _estremamente_ la vita...
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: Immagine in una TStringGrid

Non sono mai riuscito a mettere un'immagine in una TStringGrid... ora ne
avrei bisogno, ma sto impazzendo =(
Qualcuno č cosě gentile da darmi una mano?
Grazie!
Mark il Gatto
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Chi cerca trova... e condivido la "grande scoperta"...
Mark il Gatto
Mark l'Intabellato
procedure TFormMain.Button1Click(Sender: TObject);
var
  Bitmap: TBitmap;
begin
  Bitmap:=TBitmap.Create;
  Bitmap.LoadFromFile('c:\cod.bmp');
  GridServer.Canvas.StretchDraw(GridServer.CellRect(1,1),Bitmap);
  Bitmap.Free;
end;


 end;


Mark il Gatto
	Ciao
	MassimoB
 
---------------------------
http://www.massimobeschi.it/

 
http://www.massimobeschi.it/


Newsgroup: it.comp.lang.delphi
Titolo: DBEdit e valori Float

Ciao a tutti!
Ho un DB Access su cui si trovano dei valori numerici, con due
decimali, del tipo X.XX. Non riesco a mantenere questo formato quando
il numero viene visualizzato in un DBEdit. Il DBEdit visualizza il
numero senza gli zeri più a destra nei decimali. Ad esempio, il numero
7,50 viene visualizzato come 7,5.
Come posso fare?
Grazie mille!

Devi formattare il campo.
Potresti fare in questo modo:
Nell'evento OnChange del DBEdit fai una cosa di questo tipo:
var
  x: double;
begin
  x := StrToFloat(DBEdit1.text);
  DBEdit1.Text := FormatFloat('0.00', x)
end;
In questo modo vai a formattare il valore dell DBEdit.
Non so se è la procedura migliore ma dovrebbe funzionare.
Ciao
Stefano M.

Grazie mille per il consiglio! Non so se sia la strada migliore, ma
intanto funziona... :-)
Newsgroup: it.comp.lang.delphi
Titolo: ASP con Delphi ?

Ciao,
avrei la necessità di fare interfacciare un database ad alcune pagine
web.
Ricordo che l'argomento era stato trattato tempo fa, ma non trovo più
i post.
L'ideale sarebbe usare un server Web su piattaforma NT, non
necessariamente IIS, e applicazioni di interfacciamento scritte in
delphi, anche perché non so nulla dell'ASP del'IIS.
Qualcuno mi può indirizzare verso le strade migliori ?
Grazie
Ciao
Qam

Qualcuno mi può indirizzare verso le strade migliori ?
Non vanno bene i CGI?
Ciao
--
- Carlo -
BSSoftware Tips Mailing-List Support


Mah, probabilmente si, ma dovrei capire come funziona sta roba, sti
CGI in che linguaggio vanno scritti ? Ricordo qualcosa in PERL per
server Web sotto Unix, ma in ambiente WinNt in che cosa si scrivono ?
E l'accesso a files di database tipo Paradox o Dbase riesco a farlo o
devo installare un database serio ?
Anzi, per non tediare il NG eccessivamente, sai dirmi dove cercare
documentazione su questo ?
Grazie
Ciao
Qam

devo installare un database serio ?
Tramite ODBC ci puoi accedere.
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
-----------------------------------------------------
"There is nothing better for understanding a kangaroo
 than seeing it jump." [D.Grune, C.J.H. Jacobs]
-----------------------------------------------------


Mah, probabilmente si, ma dovrei capire come funziona sta roba, sti
CGI in che linguaggio vanno scritti ? Ricordo qualcosa in PERL per
server Web sotto Unix, ma in ambiente WinNt in che cosa si scrivono ?
E l'accesso a files di database tipo Paradox o Dbase riesco a farlo o
devo installare un database serio ?
Anzi, per non tediare il NG eccessivamente, sai dirmi dove cercare


e svantaggi!
Questo e' un altro discorso.
Se si discute la fattibilita', non c'e' motivo per escludere alcun
"linguaggio", se si discute l'ottimizzazione, allora si puo'
considerare un "ambiente" specifico.
CGI e' uno standard che, come tutti gli standard, si poggia sulle
diverse implementazioni.


Si possono scrivere in qualsiasi linguaggio, di script o meno.
Piano a dire che il linguaggio è indifferente....si possono scrivere in
diversi linguaggi, questo è vero, ma ogni linguaggio offre i propri vantaggi
e svantaggi!
Ad esempio i CGI Delphi possono risultare molto semplici da implementare
(sopratutto per merito del WebModule che ci permette di aggiungere
componenti...) ma assumono valore solo su sistemi M$! CGI validi si possono
scrivere anche in C, ma quelli a mio avviso più validi sono scritti in Perl,
poichè i CGI perl non sono compilati ma interpretati da un eseguibile.
Inoltre esiste anche un porting per Windows, quindi un CGI Perl può essere
utilizzato su piattaforme diverse solo con qualche piccola revisione!
Per quel che riguarda la documentazione c'è davvero poco sulla rete (almeno
quello che ho trovato io...) ho letto qualcosa su D3 di Henderson


da non perdere anche:
http://www.acadians.com/delpisap.htm
http://inner-smile.com/delphit.htm
 --> pagina sui link raggruppati per
argomento --> sviluppo internet
Buona ricerca
Newsgroup: it.comp.lang.delphi
Titolo: Scrivere una riga in Excel

Salve.
Vorrei scrivere la seguente stringa  My_String := ' A ; B ; C' in file Excel
esistente
(My_FileExcel.XLS), in modo che il carattere ";" sia interpretato come
separatore di elementi.
Voglio, insomma, che 'A' appaia nella cella A1, 'B' in B1 e 'C' in C1
Ho provato utilizzando quaste linee
-----------------------------------------------------------------------
ExcelApplication1.Connect;
ExcelApplication1.Visible[0] := true;
ExcelApplication1.Workbooks.Open('My_FileExcel.XLS',0,false,6,'','',false,xl
Windows ,';',true,false,1,false,0);
ExcelApplication1.Range['A1','C1'].Value := My_String;
-----------------------------------------------------------------------
ma l'intera stringa 'A ; B ; C' viene ripetuta identica in A1, B1, C1!
Come fare?
Grazie..
           BedBaol
--
------------------------------------------------
Maestro - cos'e' che gira: la terra intorno
al sole o il sole intorno alla terra?
Bambino - non so... non c'ho fatto mai caso.
------------------------------------------------

quello che hia scritto vuol dire:
"scrivi myString nelle caselle comprese tra a1 e c1"
a meno che non esista qualche formato che excel interpreti nel modo da te
desiderato, credo ti tocchi andare cella x cella.
Bye
A

 separatore di elementi.
Non credo che excel lo possa fare: potresti farlo tu in delphi con un ciclo.
Prima trasformi la tua stringa in una StringList con questa funzione
procedure StringToList(s: String; slList: TStringList; fSeparator: String);
var
 fResult: Integer;
begin
 fResult := Pos(fSeparator, s);
 while fResult > 0 do
 begin
  slList.Add(Copy(s, 1, fResult - 1));
  Delete(s, 1, fResult + Length(fSeparator) - 1);
  fResult := Pos(fSeparator, s);
 end;
 if (s = '') then begin
  if (slList.Count > 0) then
   slList.Add(s);
 end
 else slList.Add(s);
end;
chiamandola con StringToList(sMyString, slList, ';');
(ovviamente slList dovrai crearla prima)
in questo modo avrai una lista contenente i valori 'A', 'B', 'C'...
e poi fai un ciclo su slList:
for i := 0 to slList.Count - 1 do
begin
    sCell := Chr(65 + i) + '1';
// in questo modo avrai 'A1' per il primo valore,
// 'B1' per il secondo e cosě via
    ExcelApplication1.Range[sCell].Value := My_String;
// non so se si possa fare [scell], ma credo di sě.
end;
--
Jax
Journeying Artificial Xenomorph

 separatore di elementi.
Hai provato a sostituire il punto  e virgola con un tab
s := StringRepalce(s,';',#9,[]);
e a passare il valore di S sulla cella A1 ?
dovrebbe funzionare....

 ha scritto nel messaggio
news:bo60m8$186p9u$1...@ID-88183.news.uni-berlin.de...

Sě, ho provato ma non funziona.
Delphi passa una stringa che inizia e termina con il doppio apice e che
Excel inserisce in una sola cella, come al solito.
Cmq, Grazie.
                BedBaol


Grazie.
Controllo se funziona.
             BedBaol

 ha scritto nel messaggio
news:bo5tm3$2f1v$1...@newsreader1.mclink.it...

Provo ad insisterci ancora un po'... ho problemi di velocità andando cella
per cella.
Grazie.
        BedBaol
Newsgroup: it.comp.lang.delphi
Titolo: Impedire l'eliminazione dei file

Un mio amico mi ha chiesto se posso fargli un programma che impedisca
l'eliminazione dei file importanti da parte di qualche "birbante"
eventualmente dovrebbe anche evitare l'apertura e/o modifica insomma avete
capito.
Il problema è che io non so proprio da dove cominciare mi potreste dare
qualche consiglio?
Xoen
xo...@libero.it
ICQ     :  146381266

 capito.
l'unico modo che conosco per evitare la cancellazione fisica di un file è
quella di tenere un riferimento aperto al file stesso.
Crea un applicazione che apre quel file in modalita shared (sia read che
write) cosicchè anche altre applicazioni possano utilizzarlo e nessuna lo
possa (secondo tecniche comuni) cancellare.
Poi ricorda che sotto Win32 qualsiasi protezione è bypassabile!
--
- Carlo -
c.b...@libero.it

Se hai NT o 2000 basta impostare gli attributi di sicurezza sui file,
se hai 95/98/Me non si puo' fare e basta!
Ciao
Mirko

Poi ricorda che sotto Win32 qualsiasi protezione è bypassabile!
Si purtroppo lo so . . .
Xoen
xo...@libero.it
ICQ     :  146381266

 evitarlo.
aprilo in modalità esclusiva di lettura - scrittura, cosicchè finchè la tua
applicazione campa nessuno può agire sul file.


>
l'eliminazione dei file importanti da parte di qualche "birbante"
<<
Per "birbante" intendi una persona o un'applicazione?
Se devi solo proteggere dei dati esistono molto programmi di crypting, o cmq 
in NT puoi usare i privilegi associati al crypting del file system.
Poi, estendendo quello che dice Carlo, ricorda che *qualsiasi* protezione è 
bypassabile, alla lunga è solo una questione di tempo!
Ciao!
Davide DG.
-- 
All resistance is futile! Prepare to be disassembled !

 bypassabile, alla lunga è solo una questione di tempo!
Condivido.

Newsgroup: it.comp.lang.delphi
Titolo: ODBC -> internet

come faccio a creare una connessione odbc che mi punti a un database
.mdb su un sito web  ?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 .mdb su un sito web  ?
cosi funge se usi ASP/vbscript
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" &
server.MapPath(".") & "\database.mdb"
in delphi non so
ciao
roberto

Lui ti ha chiesto come creare una connessione ODBC e tu gli hai indicato
come crearne una OLEDB... non č che sia proprio cosě onesto.
Comunque, via ODBC non so se si puň, ma via OLEDB come gli hai indicato tu
(utilizzando magari i componenti ADO) non ci dovrebbero essere problemi.
Saluti
        Marco Bortolani
 
in...@marcobortolani.it


 (utilizzando magari i componenti ADO) non ci dovrebbero essere problemi.
ma forse la domanda non č molto chiara in quanto non dice cosa usa oppure
no, so che ci sono dei componenti delphi per la produzione di pagine web
dinamiche, ma non li ho mai visti, in quanto io uso asp/vbscript
direttamente nelle mie pagine web.
che io sappia le soluzioni (nel caso di asp) sono due.
chiedere al proprio provider di attivare un DSN che punti al db
oppure fare come gli ho indicato.
e come ho messo nel mio post precedente, ho detto: "in delphi non so"
piů onesto di cosi....
;)
ciao
roberto

 roberto


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

 Intraweb penso che valga la pena approfondirli.
ti ringrazio del consiglio! :)
purtroppo i ho D6 e cmq ormai ho abbandonato la tecnologia asp per 
asp.net
.
in particolare trovo che visual 
studio.net
 sia molto produttivo.
sembra il delphi delle pagine web.
ciao
roberto

Newsgroup: it.comp.lang.delphi
Titolo: Versione Sistema Operativo

Ciao a tutti,
 
avrei la necessità di sapere la lingua del sistema operativo,
 
come posso fare?
 
Grazie
 
Loris
 
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 

GetLocaleInfo?

 GetLocaleInfo?

Newsgroup: it.comp.lang.delphi
Titolo: programmi e sottoprogrammi

Il mio intento e' quello di costruire un programma che possa
richiamare dei sottoprogrammi, pero' cio' che voglio e' che le
finesterlle relative a questi ultimi non compaiano nella barra delle
applicazioni. Questo perche' l'utente non deve poter tornare sul
programma chiamante se non e' uscito da quello chiamato.
Come si puo' fare ?
Ho rimediato, per il momento, facendo una cosa che reputo abbastanza
azzardata : ho creato due normali applicazioni.
Una delle due dovrebbe chiamare l'altra.
A quella chiamata ho sostituito "library" a "program" ottenendo una
DLL.
Quando carico la DLL rendo invisibile la form del programma eseguibile
chiamante:
  Form1.Visible := false ;
  Handle := LoadLibrary( 'andrea.dll' ) ;
  FreeLibrary( Handle ) ;
  Form1.Visible := true ;
E' saggio fare cosi', o faccio meglio a sparire dalla circolazione ?
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
"There is nothing better for understanding a kangaroo than seeing it jump."
[D.Grune, C.J.H. Jacobs]

 programma chiamante se non e' uscito da quello chiamato.
[1: non basta aprire delle finestre modali ?]
[2: non ho ben chiaro ciň che ti serve]
Aspetta... intendi tipo gli applicativi del Norton Commander per Dos (lo
conosci?)
In quel caso io farei cosě :
Carichi il sottoprogramma e fai sparire la finestra dell'applicazione
(trovi l'handle della finestra, fai un getparent, e nascondi lhandle
risultante)
L'applicazione chiamante a questo punto dovrebbe rimanere in attesa, giusto?
Mi vengono in mente (anche se non so se sono appropriate) la
waitforsingleobject
e/o semplicemente disabilitare l'applicazione "madre" fino a che non riceve
input da
quella figlia.
Dimmi se ho completamente cannato quello che chiedevi... :)
Ciao! Davide DG

[2: non ho ben chiaro ciň che ti serve]
Urgh ! :)
A me serve poter creare due eseguibili distinti.
Uno e' l'applicazione madre e l'altro l'applicazione figlia.
L'uno lancia l'altro.
Quando il primo e' in esecuzione, la sua finestrella, compare nella
barra delle applicazioni.
Quando il secondo viene lanciato, alla barra delle applicazioni si
aggiunge la finestrella di quest'ultimo.
Io non voglio che questo accada, cioe' che premendo sulla finestrella
dell'applicazione madre, l'utente passi ad essa, o premendo ALT+TAB o
da Task Manager.
Per ora l'unica cosa che sono riuscito a fare e' nascondere la
finestra dell'applicazione madre mettendo un bel
"frmFormPrincipale.Visibile = false" prima dell'esecuzione dell'altra
applicazione e "frmFormPrincipale.Visibile = true" dopo l'esecuzione.

Newsgroup: it.comp.lang.delphi
Titolo: Tmediaplayer

Salve NG,
Lavoro in ambiente Delphi5 Professional...
Avrei un problema stupido (credo) su un tmediaplayer...
Supponiamo ke il mio mediaplayer stia mandando in play una canzone e che io
con questo comando metta in Tot:Integer il numero dei secondi...
Tot:=(MediaPlayer1.TrackLength[ListBox1.ItemIndex] Div 1000);
In una TrackBar: TTrackBar con una formuletta faccio muovere la barra in
proporzione al tempo trascorso della canzone.
Ora vorrei fare il contrario e muovendo col mouse il cursore sulla barra
vorrei far "saltare" la canzone alla parte indicata... cioè se io sposto il
cursore a metà la canzone salta a metà... proprio come un lettore
multimediale normale...
Che proprietà devo settare per dire "Salta al frame x o al secondo x"?
Grazie a ki risponde
Ciao
--
----------------------------------------
Carlo Camarda
chiamac...@tiscalinet.it
]@#[ Anna I Love You ]#@[

Non è difficile se vuoi ti mando il codice cmq devi guadare in che
formato il tempo...
bastano 1 procedurara di poche righe...
Il Razziatore,
The Only Good Windows in an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596

 ha scritto nel messaggio
news:3ccb1235....@razziatore.d2g.com...


Newsgroup: it.comp.lang.delphi
Titolo: Blinkare una label

Salve,
(scusate se la domanda è troppo terra-terra)
come si può ottenere l'effetto lampeggiante (a intermittenza) di una label?
Ho provato a utilizzare un timer con
label1.visible:= false;
ma poi non so come "riaccendere" la label.
Enzo

 ma poi non so come "riaccendere" la label.
label1.visible := not label1.visible;
-- 
I'am what I'am, I do what I can

Fai prima a mettere su un componente già fatto. Su torry ce ne sono 
parecchie, e ci sono anche dei led rotondi e quadrati.
--
La mia mail è aperta a tutti.
Inviato da 
www.mynewsgate.net
Newsgroup: it.comp.lang.delphi
Titolo: Colore bottoni e navigatore

Ciao a tutti vorrei cambiare il colore di alcuni bottoni (classici button
che trovi nella palette standard) e dei pulsanti del navigatore (quello
nella palette datacontrols) qualcuno di voi lo ha mai fatto? io ho cercato
nelle varie proprietą ma non ho trovato nulla....
Grazie 1000


Di questo argomento se ne č gia parlato approfonditamente
www.google.com
 / ricerca avanzata su gruppi...
filtra per 
newsgroup = it.comp.lang.delphi
Subject = TButton 
Data:2003-05-16 05:35:19 PST 
Acqua
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

ho provato a cercarlo ma non lo trovo...... potresti indicarmi la rispota
oppure un link per dare un'occhiata...
Grazi ciao

 oppure un link per dare un'occhiata...
http://www.google.it/groups?hl=it&lr=&ie=UTF-8&threadm=_Srxa.9551%24Ny5.259358%40twister2.libero.it&rnum=1&prev=/groups%3Fq%3D%2522questo%2Blo%2Bdice%2BMarco%2522%26hl%3Dit%26lr%3D%26ie%3DUTF-8%26selm%3D_Srxa.9551%2524Ny5.259358%2540twister2.libero.it%26rnum%3D1
Se non erro avevo visto qui da qualche parte un modo per "abbreviare"
riferimenti di questo tipo ....
Non lo trovo!


 nelle varie proprietà ma non ho trovato nulla....
Se ti necessita proprio.... (vedi discussione alla quale ti ho
reindirizzato)
TButton non ha modo di cambiare il proprio colore, Dovresti crearti un
nuovo componente facendolo derivare direttamente da TWinControl e
gestire tu il disegno del componente stesso e in più dovresti riportare
tutto ciò che è proprio del TButton.
Alternativa? 
www.torry.net
. Ne trovi a bizzeffe di soluzioni per
pulsanti.



oppure
http://groups.google.it/groups?&as_umsgid=qthigvorvk9ftp17u...@4ax.com
ciao Ale!
-- 
Morde. 
(morde at programmer dot net)

wuindi mi confermi che anche il navigatore non può cambiare colore? Su Torry
ne esisitono diversi (naigatori) ai quali è possibile cambiare colore?
grazie 1000

 
http://groups.google.it/groups?&as_umsgid=qthigvorvk9ftp17u...@4ax.com
Thanks Morde....
 aahh .... se non ci fossi tu! ;))))
bye


 cambiare colore?
Navigatori? .... Questo non lo so! Prova a cercare...

Newsgroup: it.comp.lang.delphi
Titolo: sdf

abx

sdf

ghj
---
Questo servizio e' realizzato con Wappi della Virtex
Connetti ad internet il tuo telefonino: 
http://www.wappi.com/
--
Posted from [194.243.91.36] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

non č meglio usare it.test per ste cose ?
--
Gna...@Wappi.com
ICQ# 76488613
http://gnaffy.tripod.com/

ahem.... "qft" ?????
Davide DG

 non č meglio usare it.test per ste cose ?
... eh!? e io che cacchio centro???
la mia (come gli altri) era una battuta,
certo, se il tuo senso dell'ironia č sottozero......
quello che hai detto tu forse č meglio 
dirlo a "Clara", non pensi???
Ciao (amici come prima, ok :-) )
Alan


Newsgroup: it.comp.lang.delphi
Titolo: Campi ereditati da Join ed edit sulle dbgrid

Salve gente!
Ho una query del tipo:
select 
Aziende.RagioneSociale,
recapiti.*
from recapiti
join Aziende on recapiti.codiceazienda = aziende.CodiceAzienda
nella griglia mostro come prima colonna il campo RagioneSociale.
Ora, se voglio fare l'edit diretto sulla colonna non potro'
vedere la ragione sociale aggiornata sulla nuova riga finchč non
eseguo nuovamente la query.
Secondo voi esiste un trucco per evitare cio?
Se i records sono abbastanza e/o se l'utente fa parecchi 
inserimenti rischio di mandare in saturazione tutto.
Grazie x ogni indicazione
AS
-- 
Posted from 
ammi.mclink.it
 [195.110.128.1] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

AS
No, che io sappia. Una soluzione č quella di aggiungere un campo di
lookup.
Massimo.
-- 
"Ciao Rex, che cavolo di situazione eh? Due dentro, due fuori, puo' succedere di tutto!"

un campo dilookup
Lo so, ma significa un bel rallentamento, sopratutto se i dataset
sono "tosti"...
Speravo ci fosse qualche "trucco alternativo"... :((
Tnx


 Secondo voi esiste un trucco per evitare cio?
Io uso il BDE con le cached updates e Interbase, se lo fai anche
tu puoi ottenere l'effetto da te voluto.
Praticamente aggangiando un TUpdateSql a TQuery, quest'ultima
ti diventa editabile il che ti permette di modificare i dati a video,
mentre le istruzione associate al TUpdateSql ti permette di aggiornare
i dati reali. Più semplice di quanto sembri.
L'unico problema è se pensi di abbandonare il BDE.
Mirko

L'unico problema è se pensi di abbandonare il BDE.
...cosa che faresti bene a fare...
Newsgroup: it.comp.lang.delphi
Titolo: Problema Query

Ho associato la seguente procedura per cancellare dei record da un database:
procedure TForm2.SpeedButton1Click(Sender: TObject);
begin
  Query1.Close;
  Query1.SQL.Clear;
  Query1.SQL.Add ('DELETE FROM Alunni.db');
  Query1.SQL.Add ('WHERE Classe = '+ QuotedStr(Edit1.Text));
  Query1.Open;
end;
Quando clicco sul pulsante i record vengono effettivamente eliminati ma mi 
appare un messaggio di errore:
Error creating cursor handle.
Non ho la piů pallida idea del perchč avvenga.
Qualcuno mi puň aiutare?
Grazie 


Ciao,
l'errore è dovuto al fatto che tenti di aprire (.open) la query che invece
non ritorna nessun record, dovresti utilizzare il metodo ExecSQL.
Ciao da Enrico Giudici
ico...@tiscali.it
--- posted by geoForum on 
http://www.delphiedintorni.it

Io aggiungerei anche una try/except
try
 .....
 .....
except
   on e: exception do
       showMessage(e.message)
end
Ciao
Stefano Lorenzi


io prima del comando query.execsql metto in fase di debug
query.sql.savetofile('errore.txt')
perchè i messaggi si perdono i file no.


Non so se č corretto, perň č una mia usanza, se ad esempio la tabella su 
cui sto cercando di fare una select non esiste, mi restituisce "table not 
found", se la query non č connessa ad una connectionstring, mi 
restituisce l'errore.



Ciao,
a me risulta che salvi la query e non l'errore generato.
Ciao da Enrico Giudici
ico...@tiscali.it
--- posted by geoForum on 
http://www.delphiedintorni.it

Cosa ne dite del mio modo di gestire le eccezioni con le query (l'ho 
scritto sopra), è molto "brutto" gestirle in quel modo???
Ciao e grazie
Stefano Lorenzi


.. vero, però la stessa query eseguita con dei tool esterni può
essere meglio analizzata, soprattutto quando vengono completate con
dati immessi da utenti, ciao

 scritto sopra), è molto "brutto" gestirle in quel modo???
Non è una questione di "bellezza": semplicemente, intercetti 
un'eccezione e, invece di far apparire il messaggio predefinito fornito 
da Delphi, visualizzi tu stesso un messaggio del tutto analogo.
In sostanza, a cosa ti serve gestire l'errore in quel caso? :-)
Tra l'altro, se hai delle istruzioni che seguono l'esecuzione della 
query e dipendono da essa, "assorbendo" l'eccezione provochi di fatto la 
prosecuzione della routine senza che vi siano le condizioni necessarie 
per poterlo fare.
Questo, chiaramente, è solo il mio punto di vista personale, ci 
mancherebbe. :-)

Newsgroup: it.comp.lang.delphi
Titolo: Unit D5 / D2007

Ciao a tutti,
ho un esigenza un po' particolare, devo utilizzare una medesima unit sia da
Delphi 5 che da Delphi 2007 (ovviamente si parla di Win32).
Il mio problema č che nella mia unit, un datamodule per l'esattezza, ho
alcuni compontenti che usano eventi non piů identici tra un'ambiente e
l'altro.
Intendo identici nei parametri, faccio un esempio.
Il clientdataset prevede l'evento "onReconcileError", su D5 il primo
parametro č un TClientDataSet mentre su D2007 č un TCustomClientDataSet!
Ho provato ad usare le specifiche di compilazione ma l'ide protesta !
Sembra quasi che le direttive in alcuni casi non vengano usate, parlo
sempre mentre lavoro con l'ide e non in compilazione.
Di seguito la direttiva usata  
    {$IFDEF VER130}
    procedure cdsTableReconcileError(DataSet: TClientDataSet;
      E: EReconcileError; UpdateKind: TUpdateKind;
      var Action: TReconcileAction);
    {$ELSE}
    procedure cdsTableReconcileError(DataSet: TCustomClientDataSet;
      E: EReconcileError; UpdateKind: TUpdateKind;
      var Action: TReconcileAction);
Qualche idea?
Grazie

ma il dfm te lo legge senza problemi?
A.

 A.
Il DFM non presenta nessuna differenza, le cose scritte da D5 per salvare
la unit e quelle scritte da D2007 sono a livello di DFM identiche, ed
essendo il DFM un file di testo alla fine non ci sono problemi.
Questo ovviamente perchè nel mio datamodule NON uso proprietà che invece
sono presenti solo in uno dei due ambienti !
L'evento citato però non posso fare a meno di usarlo, e purtroppo a livello
di PAS le chiamate non sono uguali !
Come dicevo speravo di risolvere con le direttive di compilazione.
Ciao

assegna l'evento a  runtime.
Usi un metodo scritto ad hoc che usi come tipo x il primo parametro
quello di livello compatibile con entrambi
A.

 quello di livello compatibile con entrambi
Qui forse non ho capito bene cosa intendi, in ogni caso la soluzione di
assegnare a runtime la proprietà è più che buona!
Grazie mille
M.Alfredo

 assegnare a runtime la proprietà è più che buona!
dovrebbe bastare il secondo, in quanto il TClientdataset eredita da
TCustomClientdataset.
Pax vobiscum
A.

 
Il problema è che in D5 non esiste il TCustomClientDataSet, TClientDataSet
deriva direttamente da TDataSet...
Ciao

 deriva direttamente da TDataSet...
Azz....che figura 'e merda.... Sorry...io uso d7 che ha
TCustomClientDataset.... :-(((
Allora si, ti tocca avere i 2 metodi e le direttive.
Pax vobiscum
A.
Newsgroup: it.comp.lang.delphi
Titolo: Problema impostando il titolo del programma

Se nel file dpr scrivo come segue:
var Title: String;
begin
  Title := 'Ciao';
  Application.Initialize;
  Application.Title := Title;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.
Non posso più mandare in esecuzione il programma e quindi
non posso eseguire il debug. Come mai?
Grazie

"Dr.Phobos" <drphobos@_yahoo_com_> wrote in message
news:gJQgb.6150$
uv4....@news.edisontel.com

Bug di Delphi!
Era stato segnalato e poi fixato nella versione 4.
A quanto pare è risuscitato!
Ma la cosa che mi stupisce è che se assegni direttamente una stringa
tutto funziona!
Acqua
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 non posso eseguire il debug. Come mai?
Soluzione?
Assegna il nuovo titolo a Application all'esterno del .dpr, magari
nell'OnCreate della MainForm.


 Bug di Delphi!
Sarà anche un bug, però, scusa, ci vuole un certo senso masochistico a
chiamare una variabile Title.
Almeno almeno, sTitle.
--
Jax
Journeying Artificial Xenomorph

 Almeno almeno, sTitle.
Il bug non stà nel nome della variabile!!! Chiamala anche sTitle se
vuoi! Hai provato con questo nome? Ti funziona? Penso proprio
di no!

 di no!
Non volevo essere offensivo!

 Non volevo essere offensivo!
Tranqui.
Certo che questo bug č spettacolare! :)


Newsgroup: it.comp.lang.delphi
Titolo: CreateClassMoniker e activeX.dcu

Ragazzi, ma CreateClassMoniker che fine ha fatto? Dovrebbe essere in
ActiveX, ma non c'č!
Dove l'hanno messa? Io ho Delphi 7 Personal.
Grazie, Giubbe
P.S.
Nel SDK (COM) di Windows ho trovato quanto segue:
CreateClassMoniker
Creates a class moniker that refers to the given class.
WINOLEAPI CreateClassMoniker(
REFCLSID rclsid, //Class this moniker binds to
IMoniker **ppmk //Address of output variable that receives the 
// IMoniker interface pointer
); 
Parameters 
rclsid :
   [in] Reference to the CLSID of the object type to which this
moniker binds. 
ppmk :
[out] Address of IMoniker* pointer variable that receives the
interface pointer to the new class moniker. On successful return, the
function has called IUnknown::AddRef on the moniker and the caller is
responsible for calling IUnknown::Release. When an error occurs, the
value of the moniker pointer is NULL. 
Return Values 
S_OK 
The moniker has been created successfully. 
E_INVALIDARG 
One or more arguments are invalid. 
Remarks 
The class moniker will supports binding to a fresh instance of the
class identified by the CLSID in rclsid. 
Requirements 
  Windows NT/2000/XP: Requires Windows NT 3.1 or later.
  Windows 95/98: Requires Windows 95 or later.
Posted from X-Privat Free NNTP server - 
www.x-privat.org

 ActiveX, ma non c'č!
cercando la stringa 'Moniker' con Find in Files (Delphi6) ho trovato 389 
risultati, perň niente CreateClassMoniker. Forse č obsoleta. 
Ho trovato qualcosa qui: 
http://makeashorterlink.com/?J27745856
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)


http://makeashorterlink.com/?J27745856
Grazie, vň a vedere.
Bye

Newsgroup: it.comp.lang.delphi
Titolo: le date in access

Qualcuno saprebbe dirmi l'esatta sintassi ACCESS di una query del tipo:
select * from fatture where data > '01/01/2000'
Rispondetemi anche al mio email, please.

 wrote in message 8e748k$oa0$1...@nslave1.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: Delphi o Visual Basic

Ciao carissimi,
vorrei sapere perché il Delphi è considerato un ottimo linguaggio/ambiente
di programmazione, mentre VB è denigrato spesso e volentieri. Cosa si può
fare in Delphi che non si faccia in VB?
Vorrei degli esempi che mi facessero capire nella pratica, cosa mi offre in
più Delphi?
Al di là delle disquisizioni teoriche sulla natura OO del linguaggio, cosa
posso sviluppare in maniera più produttiva in Delphi che in VB? Qualcuno che
abbia provato entrambi ad un certo livello?
E ora che 
VB.NET
 è a oggetti, cosa dovrebbe avere di migliore Delphi?
Grazie a chiunque risponderà.
~~~~
Un bacio... Laura.
~~~~

 ~~~~

piů Delphi?
Ho trovato questo link con interviste, se mastichi un po' di inglese
non avrai difficolta': sono tutte persone che hanno avuto esperienze
con altri linguaggi e molti sono dei professionisti della
programmazione.
http://www.delphicollection.com/Public/WhyDelphi/WhyDelphi.shtml
Qui ci sono brevi interventi di esperti.
http://www.shagrouni.com/english/software/vbnot.html
Per dare una certa "sostanza" alla mia risposta ti riporto alcuni
estratti:
The Case for Delphi
(Alan C. Moore, Ph.D.) 
It amazes me to have to write hundreds of lines of VB code to do
something that could be done [with] drag and drop in Delphi. 
Stand up and be counted
(Marco Cantů)
I learned that a major Formula 1 car-racing team uses Delphi for
collecting and monitoring data about vehicles during races. I also
learned that NASA uses Delphi.
Ciao
Morde

 ~~~~
( questo me lo prendo volentieri! ;)
Newsgroup: it.comp.lang.delphi
Titolo: Rendere un mio componente trasparente

Obiettivo: avere un form con un'immagine di sfondo; a questo form vengono
aggiunti dei bottoni creati da me in cui il testo deve essere sempre
visibile ma lo sfondo può essere trasparente o no.
Problema: come lo faccio? :-)
Per il primo problema ho messo sulla form un TImage in cui carico l'immagine
(JPEG) da una risorsa.
Il bottone invece è un componente derivato da TComponent in cui ci sono 2
TLabel e un TImage.
Quello che vorrei è che, quando il bottone è settato per non visualizzare
l'immagine lo sfondo diventi trasparente in modo che il testo sembri
disegnato direttamente sull'immagine della form. Al momento invece lo sfondo
è del colore dello sfondo della form, ignorando quindi l'immagine.
Spero di essermi spiegato in maniera decente, eventualmente chiedetemi
spiegazioni e le parti di codice che ritenete necessarie (postare tutto mi
sembra eccessivo) e che ho omesso da quello che segue:
constructor TImageLabel.Create (AOwner: TComponent);
begin
  inherited Create(AOwner);
  FImage := TImage.Create(self);
  FImage.Picture := FPicture;
  FImage.Parent := Self;
  FImage.Visible := true;
  FImage.OnClick := OnClickInternal;
  FLabelShade := TLabel.Create(Self);
  FLabelShade.Parent := Self;
  FLabelShade.Transparent := true;
  FLabelShade.OnClick := OnClickInternal;
  FLabel := TLabel.Create(Self);
  FLabel.Parent := Self;
  FLabel.Transparent := true;
  FLabel.OnClick := OnClickInternal;
end;
-- 
Lis
ICQ@Home #7317603sette     ICQ@Work #16285702tre
Mercatino: 
http://snurl.com/sito_lis

Problema: come lo faccio? :-)
Se lo vuoi gia' pronto
http://homepages.borland.com/efg2lab/Graphics/TransparentButton.htm
ottimo perche' e' spiegato come fare a realizzarlo.
poi, se cerchi su gg (=gougle groups) per "delphi transparent button" ce n'e
quanti ne vuoi...
Ciao
-- 
Morde. 
(
mo...@despammed.com
)

 
http://homepages.borland.com/efg2lab/Graphics/TransparentButton.htm
Azz...mi dispiace davvero ma devo ammettere che stavolta mi sono
completamente dimenticato di provare a cercare con un qualsiasi motore di
ricerca...grazie 1000
