mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Free component per interfaccia

Saleve ragazzi sapete dirmi dove posso trovare se ci sono componenti
per creare interfacce grafiche carine (bottoni, skin,...), per creare
applicazioni senza utilizzare le classiche componeti delphi. Free o no,
nn importa.
Grazie a tutti
Francesco

 nn importa.
Anche io cercai a suo tempo componenti simili e la scelta ricadde su
prodotti commerciali per lo skinning della tua applicazione.
Leggi questo thread: 
http://tinyurl.com/otp9p
ciao
-- 
Morde. 
ICLDweb: 
http://www2.samatel.com/icld/

Newsgroup: it.comp.lang.delphi
Titolo: Ricostruzione indici Paradox a runtime

Ciao.
il mio problema è questo:
Quando capita che un indice Primario si corrompe (non si riesce neanche ad
aprire la tabella), come si può ricostruirlo a runtime?
Grazie anticipatamente per l'aiuto.

 aprire la tabella), come si può ricostruirlo a runtime?
Non e' possibile. Devi usare un'utility esterna, come Paradox Rebuilder.
Ciao, Sandro



Mi permetto di obbiettare... a seconda del problema ci sono un paio di
soluzioni.
Se si tratta solo di ricostruire gli indici puoi scaricarti
TableScanner (lo trovi su DSP o Torry mi pare) che è un prg che ti
genera il codice (una unit con una procedura esportata che puoi
inserire nel tuo prg e richiamare come ti pare) per creare a runtime
le tabelle e, se queste sono già create, cancellare e ricreare gli
indici.
Se invece il problema è sulla tabella è possibile ricostruirla anche a
runtime: sul sito borland, da qualche parte nelle pagine di download
mi pare relative al bde c'è una libreria (TUtil32.dll); assieme alla
libreria ti danno un programmino da lanciare manualmente esternamente
al programma per ricostruire gli archivi ma anche una unit pascal da
aggiungere al tuo prg e farlo da codice a runtime.
by Phelipe de Sterlich
*-------------------------------*
|     by Phelipe de Sterlich    |
*-------------------------------*
|ELCO Sistemi Gestione del Tempo|
*-------------------------------*
| 
el...@mbox.cyberforli.it
       |
*-------------------------------*




 indici.
Grazie per l'aiuto.
Solo una cosa, programmo solo da un paio di mesi in Delphi4, DSP sta per
Delphi Super Page? Se è così, ne ho sentito parlare ma non so come
arrivarci, mi mandi il link?
Grazie di nuovo.
Ciao.

 wrote in message
HWQx4.701$O3....@news.infostrada.it...

'nzallanut a te, ca nisciuno nasce 'mparat.

Newsgroup: it.comp.lang.delphi
Titolo: stringgrid onclick si scatena anche su mousewheelup/down

Salve,
vi siete mai accorti che in D2007 (dove ho potuto verificarlo) 
implementando l'evento onClick di una stringgrid questo si scatena anche 
quando si scatena l'evento onmousewheelup/down ? come si può evitarlo ? 
bisogna forse catturare il mouse hook o vi è un metodo più veloce ?
Dani

 Dani
Ho optato con dei semafori (varibili globali booleane) per filtrare 
l'esecuzione del codice.
Newsgroup: it.comp.lang.delphi
Titolo: BitBlt

Qualcuno di voi conosce un metodo per "hookare" la funzione BitBlt di
windows?
Mi spiego: ogni volta che nel sistema viene invocata la BitBlt, vorrei che
passasse da una mia routine che eseguira' certe funzioni e poi rimandi alla
routine BitBlt originaria..
Microsoft dice che si puo' fare....... MA NON DICE COME !!!!!!!
In tutte le funzioni di "hook" non c'e' nulla che fa al caso..........

> Microsoft dice che si puo' fare....... MA NON DICE COME !!!!!!!
No, te lo dice, ma  a pagamento....
A.


MA PORC.....SOZZ.........PUTT......@#@#@@[[]][#@
Sta' microsoft maledetta........
PS: per caso? conosci qualcuno che ha pagato? e magari vuole recuperare 2
soldini?

hai provato a cercare su msdn?
A.


Si...... ma non ho trovato nulla al riguardo......... ho guardato anche in
SDK e DDK.....
Ma come cavolo deve fare un povero cristo ????

Newsgroup: it.comp.lang.delphi
Titolo: Crittografare una stringa

Ciao a tutti e
scusatemi in anticipo se magari il problema era già stato affrontato.
Ho la necessità di trovare un algoritmo per cifrare una stringa, ma
che sia REVERSIBILE e discretamente robusto. In più, la stringa
cifrata deve essere composta sempre di caratteri ASCII stampabili. La
stringa cifrata può essere anche nettamente più lunga dell'originale.
Mi serve per cifrare la password di connessione ad un database per
poterla mettere in un file di configurazione o in una chiave del
registry.
All'avvio del programma io leggerò la suddetta pwd cifrata e la
passerò al DB nella stringa di connessione.
Grazie a tutti.
Francesco G.

 ha scritto nel messaggio
news:d6339b35.01090...@posting.google.com...

Prova questo non è un granchè ma fa il suo dovere
Altrimenti usa PGP ;-P
cripting = True ==> Cripta
cripting = False ==> Decripta
function TForm1.Cript (Stringa : String; cripting : boolean): String;
Var
  i,k : integer;
begin
   if Cripting then
   begin
      for i := 1 to Length(Stringa) do
      begin
         result := result + IntToHex((Ord(Stringa[i]) xor i),2);
      end;
   end
   else
   begin
      for i := 1 to Length(Stringa) div 2 do
      begin
         result := result + Chr(StrToInt('$' + Copy((Stringa),k,2)) xor i);
         k := k + 2;
      end;
   end;
end;
--
Massimo
mago_merlino(at)
bigfoot.com

passerò al DB nella stringa di connessione.
Perché reversibile? generalmente un algoritmo reversibile é meno
sicuro... di solito si usano algoritmi noti (es. DES) e irreversibili
e poi si controlla il codice generato.
Se fai una ricerca su google ne trovi a pacchi, oppure sui soliti siti
(
www.torry.net
 ad esempio) ci sono componenti già fatti.
Phelipe
    by Phelipe de Sterlich
===============================
ELCO Sistemi Gestione del Tempo
e-mail: 
fi...@elcosistemi.it
http://www.elcosistemi.it
===============================
Public PGP Key available
===============================
Newsgroup: it.comp.lang.delphi
Titolo: TcpClient/Server

Qualcuno mi sá indicare un buon TcpClient/Server free magari un componente
che avete provato e vi é risultato ben fatto..
( su torry ho giá cercato "tcp" quindi che non si trovi lí e che non sia ne
piette ne synapse).
Principalmente l'utilizzo che ne devo fare é quello tipo Dcc di mIRC inviare
files anche di grandi dimenzioni con
la possibilitá di Visualizzare i dati inviati/ricevuti.
Una domanda .. se dovete inviare un file ad un server
facendo sí che il tutto sia automatico cioé :
che il server riceva il nome,size e il file stesso come fate?
L'unico metodo che ho trovato "utilizzabile" é quello di un
demo di Marco Cantú che utilzza dei "tipi"
alla ricezione
es
procedure SocketClientRead....
begin
s:Socket.Reiceve.Text;
case ClisStatus of
csIdle:begin
if  s='!NOME' then CliStatus:=csNome
else if s='!SIZE' then CliStatus:=csSize;
end;
csNome:begin
ecc
Grazie a tutti
erik

indy?
internetpro di turbopower?
A

...
Io mi sono trovato benissimo con ICS (Internet Component Suite) di F. Piette
(è free), lo trovi su:
http://www.overbyte.be/frame_index.html
-- 
    Antonino Salvatore CUTRI'  ===---------
- - - - - - - - - - - --------======####======-------- - - - - - - - -
 ------=== e-mail:   
a...@asclabs.com
    Web site: 
http://www.asclabs.com
 ===------
                     --==###==--
Newsgroup: it.comp.lang.delphi
Titolo: Passare parametri a prog avviato

Ciao,
mi trovo di fronte a dover aprire più documenti con lo stesso programma, ma
non aprendolo più volte. Grazie ai mutex "disabilito" l'apertura di nuovi
programmi, con paramstr(1) gestisco i parametri passati all'avvio, ma se
provo a caricare un altro documento non succede nulla (immagino perche nel
main vengono bloccate nuove aperture).
Non ho molte idee e cmq non so come realizzarle (tipo intercettare dal prog
attivo l'evento che carica il documento stesso).
Mi rimetto a voi :)
Grazie e ciao

Scusa, non ho ben capito.
hai associato una estensione al tuo programma?
Oppure con un programma esterno vuoi dire ad un tuo programma di fare
qualcosa (in qs caso aprire dei documenti)?

 intercettare dal prog attivo l'evento che carica il documento stesso).
Devi implementare un sistema "client/server" di qualche tipo per
notificare la richiesta di apertura del file. Es DDE od anche qualche
tipo di memory sharing tramite DLL.
Saluti.
-- 
I'am what I'am, I do what I can


Ho associato l'estensione al mio prog e quando "doppioclicco" sul file il
mio prog si avvia in automatico.
Ho anche implementato un sistema di gestione di più documenti
contemporaneamente, ovvero posso aprire più documenti alla volta con una
singola sessione di programma.
Se però "doppioclicco" su un altro file registrato per la mia applicazione,
non accade nulla. Io invece vorrei che "doppicliccando" su un file
registrato, con il mio prog già in esecuzione, venga aperto in modo analogo
che lo apra da dentro il programma stesso (o come se aprissi un documento a
programma "chiuso").
Per fare un esempio più pratico (mi sa che è meglio :p) prendi 2 o più file
pdf. doppioclicchi sul 1° file e ti parte acrobat. Doppioclicchi sul 2° file
e questo verrà visualizzato sempre nella stessa sessione aperta in
precedenza (scelgo i documenti da visualizzare in primo piano dal menu a
tendina).
Byez :)

 tipo di memory sharing tramite DLL.
ummm... non ho ben capito, cmq ho spiegato meglio in reply a David Marcucci.
:)
byez

I/O wrote:

La mia proposta e' corretta. All'atto del mutex devi avvertire la prima
istanza di aprire il file richiesto. Questo lo puoi implementare con un
sistema c/s tipo DDE, o shared memory od altro.


 implementare con un sistema c/s tipo DDE, o shared memory od altro.
E' proprio questo che non ho capito :p
O meglio, non so proprio come fare...
Byez

Sono qui di passaggio, se puoi aspettare lunedě ti rispondo.
Prova intanto a guardarti l'API registerwindowmessage.
Ciao

 Ciao
Ok, grazie!
Se riesco a combinare qualche cosa nel frattempo posterò le novità :)
Buon week end


 scusate se mi intrometto, mi spiegate per piacere come si effettua questa
operazione? cioe' mi servirebbe sapere come associare un'estenzione ad un
mio programma, e come configrare questo per l'apertuta dei file con il
doppioclick, grazie
--
Ciao
Gianfranco Marchese
e-mail dgruma@NOPUBBLICITA'
tin.it
 (Da togliere NOPUBBLICITA' se vuoi
rispondermi in privato)
sito internet personale: 
http://www.turbo-pascal.cjb.net
  Tutto sul Turbo
Pascal  1.5
Newsgroup: it.comp.lang.delphi
Titolo: Nome host

Come posso sapere come si chiama il nome della rete e metterlo in un Edit.
          Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/



Function HostName: String;
Type
  TaPInAddr = Array[0..10] Of PInAddr;
  PaPInAddr = ^TaPInAddr;
Var
  Buffer: Array[0..63] Of Char;
  I: Integer;
  GInitData: TWSAData;
Begin
  WSAStartup($101, GInitData);
  i := GetHostName(Buffer, SizeOf(Buffer));
  If i < 0 Then
    Result := ''
  Else
    Result := strpas(buffer);
End;

Newsgroup: it.comp.lang.delphi
Titolo: delphi oracle ado

ciao a tutti, mi collego ad un db oracle tramite ado avendo il client 
oracle istallato sul mio pc. Mi chiedevo: ma è possibile collegarsi, 
sempre tramite ado, senza client oracle a questo db? se nn si può mi 
potete suggerire altre soluzioni?? 
grazie tante
ciao
--- posted by geoForum on 
http://www.delphiedintorni.it

 potete suggerire altre soluzioni??
uhm.. se facessi a meno di collegarti?
A.

A.
potrei....e se tu facessi a meno di collegarti al forum?


 e se tu facessi a meno di collegarti al forum?
quale forum?
A.


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

 scusami ho frainteso...che intendi???
eheheh
tempo addietro ho chiesto come inviare un'ingente quantità di dati via TCP e 
Alberto mi ha risposto :
*abbrevia*
l'equivoco ci stava tutto!
Io percepisco un velato tono ironico, in realtà mi sta suggerendo di *usare* 
Abbrevia
:-)
ciao
V 

Usa i componenti Odac di CoreLab
Ti colleghi indicando semplicemente indirizzo TCP/IP e numero porta del
listener di Oracle senza alcun client oracle installato e senza ADO.
Garantiscono anche prestazioni migliori.

Newsgroup: it.comp.lang.delphi
Titolo: [VCL] User Control 2.20RC1 new

Uscita la nuova versione di User Control, bisogna registrarsi al forum di 
supporto per scaricarla. Completamente freeware.
http://www.usercontrol.net
 

 
http://www.usercontrol.net
A che serve questo componente?
Giorgio 

A che serve questo componente?
gestisce l'accesso tramite user e password al programma o a parti di
programma. un gestione degli eventi (log) ecc..
ho scritto una piccola guida se a qualcuno interessa..
M. Rossello
--- posted by geoForum on 
http://www.delphiedintorni.it

> ho scritto una piccola guida se a qualcuno interessa..
Dove si può scaricare? E' sul loro sito? Bye 

>Dove si può scaricare? E' sul loro sito? Bye 
No.Sul vecchio sito c'è la traduzione dei messaggi
che puoi ancora raggiungere da qui
http://usercontrol.sourceforge.net/modules.php?name=Downloads&cid=3
comunque ti posso inviale tutto , dimmi solo dove.

Newsgroup: it.comp.lang.delphi
Titolo: Problemi con servizio Delphi

Ciao a tutti,
 
Ho scritto un servizio usando Delphi 2010 che in polling, ogni 30 secondi, interroga una macchina su RS485 ed immagazzina alcuni dati su DB MSSQL Server.
 
Questo servizio gira da 3 anni su una macchina windows 7 pro senza problemi.
 
Da un mesetto improvvisamente ha cominciato a dare problemi eseguendo solo parte dei task previsti durante quella fase di polling soggetta al timer.
Ogni 30 sec vengono richiamate una serie di routine per piccole funzioni.
Dal log che faccio salvare su disco vedo che esegue i primi 3 task e poi sembra uscire dall'evento OnTimer al momento di eseguire una routine che accede al DB.
Alcune cose strane:
1) dentro la routine di accesso al DB tutto il codice è all'interno di una try excpet per cui mi aspetterei di catturare eventuali problemi di accesso salvando l'errore sul log, cosa che non avviene.
2) mi aspetterei in ogni caso di uscire, senza completamento dalla routine ma di proseguire il codice dell'OnTimer con i successivi task ma non succede.
3) lo stesso codice, salvo la gestione del servizio in quanto tale, esegue con successo ed in modo stabile se lancio l'applicazione server che esegue la stessa cosa (una applicazione con interfaccia che ho usato come "muletto" per testare il corretto funzionamento degli algoritmi e che ho nel tempo mantenuta allineata con le modifiche)
 
Nessuno ha mai incontrato problemi o anomalie simili nel codice implementato come servizio?
 
Sembrerebbe un problema al contorno causato da qualcosa nel SO che si è alterato. Per certo MS SQL sta lavorando male perchè dal log ho notato strani rallentamenti nell'eseguire le query e penso che quindi non sia un caso che l'anomalia nel comportamento sia in concomitanza di una routine che deve accedere al DB. Solo non capisco come mai non riesco a gestire l'eventuale errore e come mai l'applicazione server non ne risente
 
Grazie
 
Luca

Ti dico la prima cosa che mi viene in mente: non è che l'esecuzione dura 
più di 30 secondi e gli eventi ontimer si accavallano ?

-- 
Mai mettersi a discutere con un idiota:
- prima ti porta al suo livello e poi ti batte con l'esperienza;
- chi ascolta potrebbe non capire la differenza.
 

 Dal log che faccio salvare su disco vedo che esegue i primi 3 task e poi sembra uscire dall'evento OnTimer al momento di eseguire una routine che accede al DB.[...]
 
Una domanda per approfondire: se hai realizzato un servizio, inteso come /Windows Service/, come mai hai bisogno di un evento /OnTimer/ e quindi - suppongo - di un *TTimer*?
 
Sarebbe sufficiente implementare nel corpo del servizio un ciclo che esegue le operazioni descritte, senza affidarsi al "tick" di un Timer convenzionale.
 
Ciao,
  Marco.
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
#Home: 
http://bit.ly/marcobreveglieri
 
#Blog: 
http://bit.ly/compilaquindiva
Newsgroup: it.comp.lang.delphi
Titolo: icona sulla barra dei componenti

Sto scrivendo il mio primo componente custom, non riesco a capire come si
faccia ad impostare l'icona con la quale apparira' sulla barra dei
componenti di delphi.
Grazie, ciao a tutti.
Emilio.

 
Ciao, 
con l'Image Editor (nel menu Tools dell'IDE) crei un DCR (component
resource) e gli dai lo stesso nome del file pas che definisce il
componente. Dovrebbe funzionare :)
Bye. Davide DG.
-- 
All resistance is futile! Prepare to be disassembled !
 Usate sempre font a larghezza fissa per guardare
 estratti di codice nei miei post.

 componente.
Il nome DEVE essere in maiuscolo. Almeno, se ricordo bene.
Es. 'TMIOCOMPONENTE'
Ciao.
Mimmo.

 componente. Dovrebbe funzionare :)
Devi anche aggiungere una bitmap per ciascun componente che andrai a
definire, il cui nome deve essere lo stesso della classe a cui apparterrà.
Es.
il modulo Pippo.pas definisce i componenti TAlfa e TBeta, che vengono
inclusi nella RegisterComponents.
Devi avere un Pippo.dcr che contiene 2 bitmap, una chiamata TAlfa ed una
TBeta.
Io utilizzo bitmap di 16x16 pixels, forse puoi farle anche leggermente più
grandi (non ne sono sicuro)
Ciao.

 ha scritto nel messaggio
news:a5tlun$rj2$1...@newsreader.mailgate.org...

Newsgroup: it.comp.lang.delphi
Titolo: icone form

ciao
Si possono cambiare le icone della form(chiudi,minimizza ecc) come?
Puó dare problemi a seconda del SO?
grazie
erik

 Puó dare problemi a seconda del SO?
Osservazione pallosa ma doverosa: prima di tutto chiediti se è realmente
*necessario* farlo.
A tal proposito ti indico i due link illuminanti proposti da Zortek qualche
giorno fa:
http://digilander.libero.it/chiediloapippo/Engineering/iarchitect/shame.htm
http://digilander.libero.it/chiediloapippo/Engineering/iarchitect/mfame.htm
--
Jax
====
La giornata più perduta è quella in cui non si è riso.

giorno fa:
Li ho visitati, devo dire che e' un bel lavoro di catalogazione, l'unica pecca
e' che e' un po' datato, le interfacce prese in esame sono quasi sempre di
programmi a 16 bit.
Cmq questo non ne pregiudica la validita', e alcuni suggerimenti sono davvero
efficaci. (non ho trovato, pero', qualcosa che mi dica quale sia il font
migliore da usare in maschere piene di tedit)
Ciao!
-- 
Morde. 
(
mo...@despammed.com
)

 sia il font migliore da usare in maschere piene di tedit)
:)
Te lo dico io, Tahoma!
Al limite Arial Narrow, se sono veramente tante.
--
Jax
====
Sii il primo ad avere fede nel tuo ideale, se desideri che gli altri
credano in esso. Se non rispetti tu stesso il tuo ideale, gli altri non
lo rispetteranno.


http://digilander.libero.it/chiediloapippo/Engineering/iarchitect/mfame.htm
gli avevo giá dato un'occhio quando Zortek li aveva postati
ma non essendo un  programmatore,programmo solo per piacere, non sono
estremamente interessato.
(accetto comunque l'osservazione)
ciao
erik

 ma magari divertente e mi fá capre pure qualcosa.
Allora, se č per diletto la soluzione piů semplice č "simulare" il
comportamento dei tastini di sistema mediante degli speedbutton o qualsiasi
altro oggetto ti aggrada, assegnando ai vari OnClick i metodi Close,
Application.Minimize, Application.Maximize e simili.
Se poi vuoi proprio modificare il look dei pulsanti di sistema, passo la
palla a qualcun altro :)
--
Jax
====
Le avventure amorose cominciano nello champagne e finiscono nella
camomilla.
Newsgroup: it.comp.lang.delphi
Titolo: Creazione e Distruzione di Oggetti

Ciao,
una domanda.
Sto facendo un report di risultati, ho inserito delle shape quadrate dentro
le quali dovrei mettere una 'X' per indicare l'opzione selezionata.
Per farlo ho creato Runtime, dove e quando necessario delle label
all'interno del report. Fin qui' tutto bene almeno credo.Ora pero' dovrei
dopo l'uscita dal report distruggere le label appena create.
Come fare???
Credo che la strada giusta sia nello scorrere i components della mia form
contenente il report.
Succede pero' questo :
1) La form non aumenta il numero di oggetti in essa contenuti ma il report
passa da 0 components a n dove n e' il numero di label che ho creato. Questo
non l'ho capito molto ma forse nella fase di creazione creo le label nel
report, poco male comunque.
2) Vado per cancellare gli oggetti trovati : components[n].free. Pero' mi da
un errore sull'oggetto 0 e cmq anche se non da nessun messaggio non
distrugge le label mie.
Nell'help dice che dopo o prima dellla free devo mettere a nil il reference
dell'oggetto... come?? E' forse questo che non fa funzionare il tutto.
Cmq il problema e' questo devo creare delle label in un report, ma dopo la
stampa devo pulirlo togliendo le label aggiunte. Come si puo' fare???
Grazie
Ciao

Io ho fatto cosi:
ti invio il contenuto del files .pas
dove creo dei pannelli e poi li distruggo, la creazione č semplice, la
distruzione avviene ricercando tutti i componenti e se sono dei pannelli e
il nome corrisponde li distrugge. Sepro ti sia di aiuto.
*****
unit Unit3;
interface
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, Buttons,extctrls;
type
  TForm3 = class(TForm)
    BitBtn1: TBitBtn;
    Button1: TButton;
    Button3: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
   TabPan: TCustomPanel;  (* nome del pannello da creare*)
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form3: TForm3;
  nome:string;
  h:longint;
implementation
{$R *.DFM}
procedure TForm3.Button1Click(Sender: TObject);
begin
    TabPan:=TPanel.Create(Self);  (* creazione pannello *)
     TabPan.Left:=20+h;
     TabPan.Top:=20;
     TabPan.width:=60;
     TabPan.Height:=60;
     h:=h+70;
     nome:= 'p1'+inttostr(ComponentCount);
     TabPan.Name:=nome;
     TabPan.Parent:=form3; (* gli dice dove posizionarlo *)
end;
procedure TForm3.Button3Click(Sender: TObject);
var
  source: TComponent;
  i:longint;
begin
  for I := ComponentCount  downto 0 do  (* Distruzione dei pannelli *)
  begin
   nome:='p1' + IntToStr(i);
   source:= TPanel(FindComponent(nome));
    if ( Source is Tpanel) then source.Free;
    h:=0;
  end;
end;
procedure TForm3.FormCreate(Sender: TObject);
begin
  h:=0;
end;
end.
****
Ovviamente se crei delle label basta sostituire i componenti da creare e il
gioco č fatto
Rat <xxxtecn...@iol.itxxx> wrote in message
3i505.148455$VM3.1...@news.infostrada.it...

Newsgroup: it.comp.lang.delphi
Titolo: Bookmarks

Ragazzi, una domanda sull' IDE di D7
sapete se i bookmarks si possono rinominare?
Grazie
Valter

 sapete se i bookmarks si possono rinominare?
Puoi invece creare un record del tipo
type
TBook_mark = record
    Nome: String;
    Puntatore: TBookmark;
    end;
e assegnare il nome come meglio credi. Giorgio 

 Puoi invece creare un record del tipo
[...]
Mi sono espresso male!
Intendevo i bookmarks per saltare in fase di editing da una parte del codice 
all'altra...Toogle bookmarks e Goto bookmarks...
con bookmarks 0..9 se ne hai tanti è difficile ricordarsi uno per uno a cosa 
puntano...ho cercato dapertutto (forse male) ma non ho trovato il modo di 
rinominarli...
se ad esempio, invece dei bookmarks utilizzo ToDo posso assegnare un 
identificatore comprensibile e saltare velocemente al punto di codice 
desiderato
mi immaginavo fosse possibile anche con i bookmarks
V

 codice all'altra...Toogle bookmarks e Goto bookmarks...
a proposito, con CTRL+ALT+B puoi vedere tutta la lista dei breakpoints!
Non c'entra niente, lo so.
Comunque a quanto pare i breakpoints vengono salvati, ma i bookmarks no.
-- 
Mauro Falzari
"Chi vince gli altri è forte.
Chi vince se stesso è potente".
  (Lao Tse)

 Comunque a quanto pare i breakpoints vengono salvati, ma i bookmarks no.
l'unico modo che ho trovato č quello di utilizzare la ToDo list, posso cosě 
assegnare un'etichetta ad ogni sezione del codice ed utilizzarla come 
bookmarks...meno rapida di quest'ultima perň, non č presente sotto il click 
dx (o meglio compare solo l'assegnazione, manca il goto)
ma puň andare...
Grazie
Valter

Newsgroup: it.comp.lang.delphi
Titolo: Quale archivi posso utilizzare....

Scusate avrei bisogno di un aiuto
ho intenzione di realizzare un programmino che utilizza piu di una
tabella e vorrei sapere quale tipo di archivio dovrei utilizzare;
tenete conto che verra distribuito ai clienti e non vorrei distribuire
BDE adminitrator visto che e' licenziato a me.
grazie per l'attenzione prestatami

 ha scritto nel messaggio
news:25lq6t4juth3ig2vl...@4ax.com...


 wrote in message
news:25lq6t4juth3ig2vl...@4ax.com...

Risposta provocatoria:
XML
Ciao
Ruggero
Newsgroup: it.comp.lang.delphi
Titolo: Traduzione operazione da Visual Basic a Delphi

Come tradurreste questa operazione da visual basic?
tt[5]:=tolower(strcode[strlen((char *strcode)-1]);
considerando che:
tt : array [1..30] of char;
strcode : string;
Stò convertendo un sorgente da visualbasic...ma questa operazione proprio
non saprei come tradurla....
Grazie tante

rettifica...
tt[5]:=tolower(strcode[strlen((char *)strcode-1])

 tt[5]:=tolower(strcode[strlen((char *)strcode-1])
Se tt: Array[1..30] of char vorrebbe essere un semplice vettore, allora 
puoi fare cosě:
Dim StrCode As String
Dim TT(1 To 30) As Byte
     TT(5) = LCase(Mid$(StrCode, Len(StrCode), 1))
Anche perchč mi sa che quel
tt[5]:=tolower(strcode[strlen((char *)strcode-1])
significa che vuoi rendere minuscolo l'ultimo carattere della tua 
stringa in strcode ponendolo in tt[5];
Se invece tt[] č un vettore di char perchč devi usarlo come strnga, puoi 
fare cosě:
Dim StrCode As String
Dim TT as String * 30
     Mid(TT, 5, 1) = LCase(Mid$(StrCode, Len(StrCode), 1))
Se hai problemi dimmelo.
Ciaooooooooooooo

 ha scritto nel messaggio
news:17b0b.103801$cl3.3...@news2.tin.it...

Suggerimento: mai fare una traduzione letterale... perchè difficilmente
passando da un linguaggio a un altro... trovi una corrispondenza biunivoca.
E' preferibile una traduzione concettuale quindi. Quanto vale per i
linguaggi vivi (italiano, inglese etc) si applica anche per i linguaggi
artificiali (delphi, php etc).
Di conseguenza, la domanda:
       come faccio a tradurre etc etc...
io la porrei in questi termini:
       a cosa serve questa istruzione? cosa fa? che funzione svolge?
e partendo da questa, cercherei dando risposta (che sicuramente è nota) la
soluzione nell'altro linguaggio.
Cooper.

 fare così:


Grazie!
Davvero molte grazie!
Newsgroup: it.comp.lang.delphi
Titolo: fare un cerchio su un canvas

come si scrive una funzione di un cerchio?
dati due punti e il raggio
mi vengono fuori equazioni schifide, non voglio credere che siano 
quelle, magari esiste qualcosa di meglio.
grazie.
-- 
-------------------------------
per scrivere in privato
togliere "1975nosp"
to reply remove "1975nosp"

 come si scrive una funzione di un cerchio?
Con il raggio non saprei, però esiste il metodo Ellipse del TCanvas.
A meno di rinc...menti serali, penso che tu possa tranquillamente
trasformare il raggio nelle 4 coordinate richieste.
-- 
Jax
====
E' più facile amare gli altri che se stessi. Degli altri si conosce il
meglio. (Gesualdo Bufalino)

 
forse un passo avanti l'ho trovato (spero)
ho due punti di coordinate
p1 (a,b)
p2 (c,d)
il raggio della circonferenza (r).
le incognite sono il centro della circonferenza (X,Y)
teoricamentre dovrei fare il sistema
  (x-a)^2 + (y-b)^2 = r^2;
  (x-c)^2 + (y-d)^2 = r^2;
risolvere una ed ottenere un incognita
al momento sono arrivato (spero di poter continuare domani, purtroppo lo 
faccio solo la sera ed ho poco tempo in questo periodo)
  a^2 - c^2 - 2x(a-c) + b^2 - d^2 - 2y(b-d) = 0
  x = (a^2 - c^2 + b^2 - d^2 - 2y(b-d)) / 2(a-c)
  dovrei mettere questo alla prima e sperare che sia giusto.
  otteuta la y inserire il tutto e vedere cosa esce.
ciao.


 il problema e' che non conosco il centro del cerchio.
Spiegati meglio, magari ti si può dare una mano.
Che dati hai in mano?
-- 
Jax
====
La libertà non è una cosa che si possa dare; la libertà, uno se la
prende e ciascuno è libero quanto vuole esserlo. (James Mark Baldwin)

 
il problema e' che non conosco il centro del cerchio.
grazie comunque,
ciao.

Newsgroup: it.comp.lang.delphi
Titolo: midas.dll

Usando il ClientDataSet l'eseguibile richiede il midas.dll.
Ho già risolto copiando la libreria in windows\system e registrandola
con regsvr32.
La mi domanda è:
Non è possibile dire al compilatore di includerla nell'eseguibile per
evitare che la cerchi nel sistema ? In questo modo funzionerebbe
indipendentemente se il pc ospite ce l'ha oppure no.
Si può fare ?
Se sì, come ?
Inviato da 
www.mynewsgate.net

 Usando il ClientDataSet l'eseguibile richiede il midas.dll.
Se metti la MidasLib tra le uses no...
Occhio che la distribuzione di Midas.dll è soggetta a licenza e costa non
pochi quattrini: prima di sottoporre qualunque dei toi clienti all'acquisto
di una licenza per postazione ci penserei un po'...
Saluti
	Marco Bortolani
	info @ 
marcobortolani.it

Che alternative esistono nel campo del freeware ?
Inviato da 
www.mynewsgate.net

 Se sì, come ?
Che versione di Delphi usi? In ogni caso, leggi qui:
http://bdn.borland.com/article/0,1410,29297,00.html
Per il tipo tipo di licenza necessaria, leggi il file DEPLOY.TXT
fornito con Delphi.
Ciao.
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Inviato da 
www.mynewsgate.net
Se includi la MidasLib nel tuo eseguibile non dovresti avere problemi di
licenza e quindi non hai bisogno di ricorrere a qualcos'altro: mi rifaccio
anch'io all'articolo dell'ottimo Cary Jensen segnalato da ACSH:
 
http://bdn.borland.com/article/0,1410,29297,00.html
Comunque se ne è già parlato anche in passato: magari prova a guardare nei
vecchi post.

Newsgroup: it.comp.lang.delphi
Titolo: Invertire due colori

Ciao, volevo sapere se questa č la maniera piů
efficace per invertire due valori (colori).
Si puo' fare in altro modo? Magari con XOR?
Ciao
   Miyomo
if Colore = iColB then   //Inverte il colore
             colore := iColA
           else
             colore := iColB;

 Si puo' fare in altro modo? Magari con XOR?
La domanda sorge spontanea: ma hai già provato con XOR? ;)
--
Jax
====
Nel diciannovesimo secolo il problema era che Dio è morto; nel
ventesimo secolo il problema è che l'uomo è morto. (Erich Fromm)

> La domanda sorge spontanea: ma hai già provato con XOR? ;)
So che serve a quello, ma non conosco la sintassi.
Ho provato cosi ma il risultato è sempre lo stesso
colore :=  (coloreA xor coloreB);
grazie
miyomo

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

Buongiorno a tutti,
Qualcuno conosce qualke componente per la lettura dei dati tramite OCR in
Delphi ???
Grazie
Gianclaudio

Lead Tools.
non conosco il sito ufficiale, ma dovrebbe gestire immagini e lettura
ottica.
Riccio
Newsgroup: it.comp.lang.delphi
Titolo: Quale VCL visuale mi consigliate per emulare un joy ?

Salve amici.
Mi servirebbe un componente visuale che simoli il famoso "joy" dei 
videoregistratori et simila (quelle rotelle "infinite" che si girano a 
destra e sinistra); possibilmente con eventi del mouse dx e sx (con velocità 
di rotazione auto-incrementale).
Idee? Qualcuno ne conosce uno buono?
Grazie dei consigli.

 di rotazione auto-incrementale).
Penso che si identifichino con termini tipo "jog & shuttle wheel".
Prova a vedere in questa categoria sul sempreverde "Torry Delphi's 
Pages": 
http://www.torry.net/pages.php?id=182
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Grazie! Ho trovato dei componenti eccezionali...ma purtroppo sono molto 
costosi....un pò troppo! PEr adesso mi accontento di quel "coso" che è nelle 
JVCL :(
Grazie della "traduzione".

Newsgroup: it.comp.lang.delphi
Titolo: Ancora su ListView

Caro NG ho due quesiti da porvi che per quanti sforzi faccia non riesco a
risolverli:
1. Come si fa quando la una ListView si riempie a fare in modo che la prima
riga sia automaticamente selezionata?
2.: quando premo i tasti freccia SU e Giù automaticamente la ListView compie
i dovuti scroolling quando la riga esce dalla visualizzazione nel mio
programma ci sono due componeneti speedbotton che quando premuti dovrebbero
imitare il funzionamento dei tasti freccia Su e Giù con relativi
scrooling:come si fa ad intercettare le routin dei tasti freccia senza
doverle riscrivere?
Grazie per l'aiuto Lanfranco

)

 il problema. :-)
Credo che lui voglia, usando due speedbutton, imitare il comportamento dei
tasti su/giu... purtroppo io oggi non ho tempo di provare :(
--
Jax
====
Colui che sorride quando le cose vanno male, ha già trovato qualcuno
cui dare la colpa. (Arthur Bloch)

 tasti su/giu... purtroppo io oggi non ho tempo di provare :(
procedure TForm1.sbUPClick(Sender: TObject);
begin
  SendMessage(ListBox.Handle, WM_KEYDOWN, VK_UP, 0);
  SendMessage(ListBox.Handle, WM_KEYUP, VK_UP, 0);
end;
procedure TForm1.sbDOWNClick(Sender: TObject);
begin
  SendMessage(ListBox.Handle, WM_KEYDOWN, VK_DOWN, 0);
  SendMessage(ListBox.Handle, WM_KEYUP, VK_DOWN, 0);
end;
-- 
Ciao, Anto', [37, 143, AQ] 
MB C SC 220 CDI Magma Rot
"Di sempre cio' che senti e fai cio' che pensi."
    G.G. Màrquez

 ha scritto nel messaggio
news:c5hc5e$lsg$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.lang.delphi
Titolo: Suonare MIDI contenuto in memoria

Salve,
ho creato una piccola applicazinoe che mi suona un file MIDI con l'ogetto
TMediaPlayer.
Con la propieta' FileName gli do il path dove si trova il file e lo faccio
suonare.
Adesso pero' vorrei importare nel progetto il file midi. Ossia creare un
solo eseguibile che suona un
file midi conenuto in memoria (non so... inserendolo in un buffer).
Vorrei sapere se questo oggetto mi permette di fare qualcosa del genere.
Grazie
xoooox
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

secondo me no.
A.


la strada può essere un file di risorse, guarda qui
http://www.delphiedintorni.it/geoxml/forumhistorythread?groupname=libero.delphi&messageid=uLxBvjEE$GA....@mail.dms.it
M. Rossello
P.S. ho solo cercato nel forum cosa che ti consiglio di fare per l'avvenire ;)
--- posted by geoForum on 
http://www.delphiedintorni.it

 file midi conenuto in memoria (non so... inserendolo in un buffer).
devi orientare la tua ricerca su un componente o un metodo che consenta di 
suonare un file MIDI a partire da uno stream (TStream). In questo modo è 
molto semplice includere il file MIDI come risorsa dentro l'eseguibile e 
caricarlo in uno stream (TResourceStream).
Diverso sarebbe il discorso di un file WAV che può essere caricato in un 
puntatore (vedi FindResource, LoadResource, LockResource, UnlockResource, 
FreeResource) e suonato direttamente dalla RAM (vedi sndPlaySound con 
parametri SND_ASYNC, SND_MEMORY).
Magari potresti convertire il MIDI in WAV, in giro sono disponibili 
convertitori.
-- 
Mauro Falzari
"Secondo alcuni autorevoli testi di tecnica di areonautica,
il calabrone non può volare, a causa della forma
e del peso del proprio corpo in rapporto alla superficie alare.
Ma il calabrone non lo sa e perciò continua a volare".
  (Igor Sikorsky, 1889-1972)

xoooox ha scritto:

Dai un occhio a 
http://www.wilsonc.demon.co.uk/delphi_7.htm
 i componenti 
MIDI potrebbero fare al caso tuo.
Ti salvi il file midi in una risorsa poi lo salvi su disco, e lo dai in 
pasto ai componenti midi di Colin Wilson e mentre suona lo cancelli.
Saluti Goblin
-- 
Ibis et redibis non morietur in bellum.
Newsgroup: it.comp.lang.delphi
Titolo: versione delphi 6 e delphi 7

Ciao a tutti.
Volevo sapere se ci sono profonde differenze, e se si quali, tra delphi 
6 e delphi 7.
Le novita' della 6 mi pare fosse quella dell'introduzione delle CLX per 
compilare sotto linux.
La 8 si avvicina a .NET;
Ma la 7 .....?
Grazie a tutti.
Geppetto

c' è un post identico al tuo di pochissimi gg fa.
AS

 AS
Si ma, se leggi bene, l'argomento e' completamente diverso.
Io volevo sapere quali sono le caratteristiche principali di delphi 7 e 
cosa ha portato borland a sviluppare questa release.
Geppetto

Ma la 7 .....?
La sette è stata, IMHO, fondamentalmente una mera operazione
commerciale.
-- 
Ore 18.30: premo invio.

 commerciale
Quindi (ado a parte per chi non le usa) si puo dire che passare alla 7 
dalla 6 non ne vale molto la pena.
Ossia. L'ultima versione non .net su cui valeva la pena passare era la 6 
? O mi sbaglio?
Geppetto

? O mi sbaglio?
Esatto. 
Secondo me è una perdita di tempo.
ciao


Newsgroup: it.comp.lang.delphi
Titolo: Delphi@School

Qualcuno di voi conosce un buon compilatore Delphi ***GRATUITO***
adatto ad un uso scolastico? A scuola prima usavamo Delphi 6 ma poi il nuovo
preside s'č accorto che non c'erano le licenze :p
Grazie per ogni segnalazione
deathstar 

 preside s'è accorto che non c'erano le licenze :p
Le versioni Personal?
Ciao
-- 
Andrea Magni

 Le versioni Personal?
A quanto pare non sono adatte :\ 

 ha scritto nel messaggio 
news:t6bid.257815$35.12...@news4.tin.it...

E aggiungo: ora manco esistono piů :p 

 E aggiungo: ora manco esistono pių :p 
Sul "non sono adatte" non posso rispondere visto che non scrivi cosa 
vorreste farci.
Sul "non esistono pių" direi che se trovi qualche cd di qualche 
rivista esistono ancora (a meno che qualcuno abbia rigato il cd 
proprio nel punto giusto...)
Ciao :-)
-- 
Andrea Magni

A quanto pare non sono adatte :\ 
Provate a chiedere al vostro insegnante/assistente di interpellare borland
italia, magari per le scuole danno qualcosa in comodato d'uso oppure delle
personal editions fornite ad hoc.
Io farei cosi': qualche telefonata a milano e magari vengono fuori delle belle
sorprese ;)
Ciao
-- 
Morde. 
(
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/

 preside s'è accorto che non c'erano le licenze :p


 Ciao Giorgio
Ti ringrazio, per l'uso che ne facciamo noi a scuola Lazarus sembra PERFETTO 
:)
Grazie mille davvero.
Maurizio 

 ha scritto nel messaggio
news:CXPid.130480$b5.64...@news3.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: Passaggio Parametri Opzionali

C'č un modo per passare ad una funzione o ad una procedura parametri
opzionali ?????
Grazie in anticipo !!!!!

opzionali ?????
Si'.
Leggi la sezione "Default parameters" nell'helo di Delphi.
-- 
Andrea Laforgia - walkietalkie(at)
libero.it

 Leggi la sezione "Default parameters" nell'helo di Delphi.
Ma nell'help c'è la possibilità di dichiarare variabili così:
I:Integer := 1;
Ma ciò non significa che se passo un valore null al parametro I, questo
prende il valore 1 ??????
Non credo che sia possibile richiamare la funzione (o procedura) senza
passargli il parametro.....

 opzionali ?????
Si, va dichiarata cosi:
procedure BastaUnParametro(i:integer; s:string='ciao');
begin
//
end;
posso chiamare sia
BastaUnParametro(5,'BuonGiorno');
sia
BastaUnParametro(5);
Nel secondo caso, s e' uguale a 'ciao'
Ciao (appunto :) !                            {MSX}

passargli il parametro.....
Certo che puoi.  Se avessi letto l'help te ne saresti
accorto:
procedure pippo(I: Integer = 1);
begin
  ShowMessage(IntToStr(I));
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
  pippo(3);
  pippo;
end;


 Leggi la sezione "Default parameters" nell'helo di Delphi.
E gią che ci sei vedi anche "Overloading procedures and functions"
e' un modo un po' diverso per fare quasi la stessa cosa ... ma terribilmente
bello!
--
Emilio Panozzo
mailto: 
emip...@tin.it

Newsgroup: it.comp.lang.delphi
Titolo: conversione avi

Salve: io avrei la necessità di trasformare un file avi in una sequenza di
bitmap, ovviamente utilizzando delphi. Esiste una funzione che mi permetta
questa operazione ??
Se non esiste: conoscete la struttura di un file avi ??
E quella di un bitmap ??
grazie molte...
guiz...@yahoo.it

 E quella di un bitmap ??
Si... è descritta nell' sdk di windows (in parte distrinuito con delphi).
Ciao, Davide DG

Newsgroup: it.comp.lang.delphi
Titolo: Campo esistente

Salve a tutti.
avrei la necessità di sapere da codice se un campo in una tabella paradox 
esiste o meno.
Come posso fare ?
Esiste un comando?

Danielito ha detto: in data 17/11/2006 18.40:

         with Table1 do
           begin
             open;
             If (FindField('Rildadoc') <> nil) then ...
              begin
              end; 	
             close;
           end;
Saluti, Riccardo.

 ha scritto nel messaggio 
news:455df3ff$1...@x-privat.org...

Newsgroup: it.comp.lang.delphi
Titolo: Prima e utlima riga del DBGrid

Come individuo programmaticamente la prima e ultima riga del DBGrid ? (Devo 
applicare un cambiamento al mio dataset che concerne le sole righe 
visibili). 


La vedo dura, questa. Sicuro che non puoi basarti sulla selezione?
A.

 visibili).
Secondo me hai solo una chance se il tuo dataset non ha un filtro applicato. 
Nell'evento AfterScroll del DataSet che fornisce i dati del grid quindi puoi 
valutare le condizioni:
Prima riga:  DataSet.RecNo = 1
Ultima Riga: DataSet.RecNo = DataSet.RecordCount;
Saluti,
Fritz 


Vado a memoria (non ho delphi sotto mano al momento)...
testando la proprietà "RecNo" del Dataset ... se RecNo=1 sei nella prima 
se RecNo=RecordCount sei nell'ultima
^_Goblin_^
-- 
Ibis et redibis non morieris in bello
http://goblinland.myminicity.com/

Per poter calcolare RecordCount  il dataset deve fare un
fetchall..... :-|
Io non la uso MAI.
A.

 se RecNo=RecordCount sei nell'ultima
Ho gia risposto su RecordCount...
E cmq, a lui serve non l'ultima riga del *Tdataset* ma l'ultima riga
*visibile nella dbgrid*...
A.


Attento che � True *solo* se tenti di retrocedere mentre sei gi� al 
primo record oppure hai fatto DataSet.First.
Ciao.

 testando la propriet� "RecNo" del Dataset ... se RecNo=1 sei nella prima


 ha scritto nel messaggio 
news:4b70324b$0$821$4faf...@reader5.news.tin.it...


 Io non la uso MAI.
Si, hai ragione. La durata dipende dalla quantit� di records. In certi casi 
per me questo tempo non � troppo.
Inoltre bisogna vedere la costellazione dei componenti. Usando p.e. un 
ClientDataSet in certi casi non c'� verso che vengono "fetchate" tutti 
records. E poi il RecordCount viene eseguito in memoria che dura quanto un 
lampo.
Saluti,
Fritz 

 lampo.
Sono proprio curioso di sapere come fa a restituire la recordcount se
e' attivo il paging senza fare un fetchall...
A.

Newsgroup: it.comp.lang.delphi
Titolo: Vt100 e tasti funzione..

Qualcuno ha esperienza con terminali telnet VT100 e tasti funzione?
Se premo ad esempio F1 il terminale mi ritorna la stringa OP..
Io vorrei associare ad un tasto funzione una funzione :-) e' possibile?
altrimenti a cosa servono?
ciauz!
maz

 ha scritto nel messaggio
news:beb9k7$31q63$1...@ID-194014.news.dfncis.de...

Newsgroup: it.comp.lang.delphi
Titolo: Creare un oggetto treeview con oggetti incapsulati

Ciao a tutti,
nelle preferenze di Firefox si fa uso di un oggetto secondo me comodo
che permette di creare un TreeView (credo) che, al posto di avere
sub-items, mostra oggetti di tipo diverso (radiobutton, edit,...).
Qualcuno è a conoscenza di un oggetto simile oppure mi può dare
qualche dritta sul come svilupparlo ?
p.s: ho D7
saluti
Lorenzo

 sub-items, mostra oggetti di tipo diverso (radiobutton, edit,...).
wow, c'č un componente potentissimo ed estremamente flessibile, nonchč 
rilasciato sotto licenza Mozilla Public License, anche se un po' complesso da 
imparare ad usare (tutto č praticamente basato su eventi):
Virtual TreeView 
http://www.soft-gems.net/VirtualTreeview/
Per iniziare, puoi modificare gli esempi forniti.
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

 
http://www.soft-gems.net/VirtualTreeview/
Concordo e, in verità, io lo trovo molto semplice.
Andrea
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Andrea
Fantastico veramente !!!
Grazie.
Omega

 Concordo e, in verità, io lo trovo molto semplice.
allora si vede che la tua mente era già pronta al "virtual paradigm"!


Newsgroup: it.comp.lang.delphi
Titolo: Applicazione iconizzata nella barra di Windows

Salve, vorrei creare una applicazione in Delphi che sia avviata ad ogni
avvio di Windows e che automaticamente resti in esecuzione a tempo
indefinito, iconizzandosi nella barra di windows come fanno numerose
applicazioni.
Come fa per esempio MySQL, come si realizza ciň?
Forse bisogna richiamare una API di Windows?
Grazie per le eventuali risposte.

 applicazioni.
Per partire all' avvio di Windows posiziona una stringa di richiamo in un'
area nota (come Esecuzione Automatica, Win.ini o registro di sistema).
Per restare nella traybar usa la funziona Shell_NotifyIcon() oppure uno dei
tanti componenti che fanno tutto in automatico!
Ciao
--
- Carlo -
Newsgroup: it.comp.lang.delphi
Titolo: stringhe

Ciao avrei bisono di costruire una funzione che mi verifichi se in una
stringa è contenuta un'altra stringa ed eventualmente restituirmi la
'differenza delle stringhe'.
esempio:
'Gassosa'--->è contenuta la stringa 'gas' ? Sì, allora restituisco 'sosa'
Qualcuno sa dirmi quali funzioni delle stringhe utilizzare?
Grazie mille.
Giuseppe
---------------------------------------------------------------------------
Messaggio inviato attraverso 
http://www.trucchiperpc.it
 - sezione newsgroup

cerca "string handling routines" nella guida e trovi un elenco completo
delle funzioni supportate da delphi.
Bye
A
--
Per rispondere non usare il reply ma scrivere al seguente indirizzo:
alsalvati(at)
supereva.it
Please, don'r reply this message.
Use this address: alsalvati(at)
supereva.it

 'Gassosa'--->č contenuta la stringa 'gas' ? Sģ, allora restituisco 'sosa'


Grazie mille a tutti, ho raggiunto lo scopo.
Giuseppe

Newsgroup: it.comp.lang.delphi
Titolo: mostrare un file .txt con l'applicazione di default in modalità ReadOnly

Salve,
   con l'istruzione:
ShellExecute(Application.Handle, nil, 'Leggimi.txt', nil, nil, 
SW_SHOWNOACTIVATE);
posso aprire il file con l'applicazione associata ai files .txt dal 
sistema, generalmente "Blocco Note".
L'approccio ha un inconveniente, il file può essere modificato. Come 
posso visualizzarlo in modalità ReadOnly? Si può? Come?
Grazie, ciao.

 posso visualizzarlo in modalità ReadOnly? Si può? Come?
Mi sa che Notepad non prevede questa cosa....
A.

 Come posso visualizzarlo in modalitï¿œ ReadOnly? Si puï¿œ? Come?
Siccome lo scopo ï¿œ quello di visualizzare un txt in readonly, te lo puoi 
aprire in un form utilizzando un trichedit con la proprietï¿œ readonly a true.
ciao
-- 
morde
D5,D6,D7
QT 4.7.0 - MingW- QT Creator 2.1

 posso visualizzarlo in modalità ReadOnly? Si può? Come?
setti il file con l'attributo readonly prima di aprire il blocco note.
Ale

 setti il file con l'attributo readonly prima di aprire il blocco note.
Forse generalizzo troppo per il TOPIC.. ma io eviterei di modificare 
attributi su un "oggetto" che non mi appartiene.
E bene mantenere il massimo disaccoppiamento tra gli oggetti: io 
programma quel file non lo possiedo, quindi non sono autorizzato a 
modificarne gli attributi ma posso solo leggerlo.
vantaggi:
1) eviti che se il programma crasha ti lascia il file in sola lettura (e 
poi vai a scoprire chi l'ha modificato)
2) eviti l'issue che se fosti in linux, potresti non avere le 
permissions sufficienti per cambiare l'attributo r di quel file.
3) scrivi codice mantenendo disaccoppiato il programma dall'oggetto: 
così fai una programmazione più robusta.


E allora fai una copia del txt, lo metti readonly, quando chiudi lo
cancelli. No?

 cancelli. No?
No :)
Copiare un file, aprirlo in shellex con notepad, e cancellare il file 
copiato... è di gran lunga molto peggio che usare un tmemo che ti carica 
lui il txt e te lo mostra.


 carica lui il txt e te lo mostra.  ciao
leggi il top post: Luigi vuole aprire il txt con l'applicazione di
DEFAULT, non con un tmemo o con altri accrocchi via codice.
Per fare ciò, e non far modificare il testo, l'unica è settare
l'attributo readonly del file. E stop.
Ale

 l'attributo readonly del file. E stop.
Urca, hai ragione.. non avevo letto attentamente il post dell'OP!
In quel caso sono d'accordo con te e con Luigi!
sorry per l'inutile followup!



Scusate il ritardo, non ho potuto postare per un po causa adsl down.
In effetti, per come mi è stato consigliato, ho modificato la procedura 
di installazione ed aggiornamento automatico affinché modificasse 
l'attributo del file *.txt settandolo readonly.
Grazie, ciao.


Scusate il ritardo, non ho potuto postare per un po causa adsl down.
In effetti, per come mi � stato suggerito, ho modificato la procedura di 
installazione ed aggiornamento automatico affinch� modificasse 
