mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Residui di un wizard

Ho installato in D4 un wizard che messo una voce nel menů Project.
Disinstallato il wizard č scomparsa anche la voce nel menů, ma ogni volta
che avvio Delphi compare un messaggio di errore tipo: "Unable to load
C:\..\..\xx.dll".
Come far scomparire anche quest'ultimo residuo del wizard?
--
Sam Sahara
sa...@iol.it
http://samsahara.cjb.net

 Disinstallato il wizard è scomparsa anche la voce nel menù, ma ogni volta


 ha scritto nel messaggio
news:o9Av7.7165$DW5.1...@news2.tin.it...


Grazie a tutti. Effettivamente si trattava di eliminare una voce dal
registry. Avevo pensato che si trattasse di una voce in un file di
configurazione e avevo lanciato (ma inutilmente) grep.exe nella directory
delphi4/bin.


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

Come si ottiene in Vb l'handle di una finestra?
e di un textbox?
e di qualsiasi oggetto al quale debba accedere ad esempio da una classe?
quindi senza poter fare nessun riferimento fisso.
Grazie
Ciao

Qualcuno mi avrà già killato..
Volevo comunque chiedere scusa, ho sbagliato ng...
Ciao

 ha scritto nel messaggio
news:asBB8.17785$5k4.4...@twister2.libero.it...


 ha scritto nel messaggio
news:4qBB8.17770$5k4.4...@twister2.libero.it...


Newsgroup: it.comp.lang.delphi
Titolo: Firebird - versione free di Interbase

La notizia č OT, ma in qualche modo puň interessare a tutti i programmatori:
E' stato rilasciato Firebird 1.0 il database derivato dalla versione free di
Interbase, a chi interessa č scaricabile da questo link:
http://firebird.sourceforge.net/
Ciao
Gianni Giusti

Aggiungo il sito
www.ibphoenix.com
c'è tanta bella robina per InterBase compresi un bel po' di materiale per
Delphi ;)
--
Massimiliano Etere
massimili...@programmando.org
http://www.programmando.org

Newsgroup: it.comp.lang.delphi
Titolo: Tabella bloccata

Ho aperto una tabella in maniera esclusiva e il programma che sto'
preparando mi e' morto. Adesso mi dice che non e' possibile aprirla perche'
gia' aperta. Come faccio a renderla apribile un'altra volta?
Ciao Alan


wrote:


Mi interessava sapere se era possibile farlo da delphi!
Ciao Alan

 ha scritto nel messaggio
news:9uqnti$e71$1...@nreada.inwind.it...


Newsgroup: it.comp.lang.delphi
Titolo: DbGrid Autoresize colonne

E' possibile effettuare un auto resize delle colonne, senza dovermi passare
tutti i record e verificare il campo più lungo ?
Grazie per le info date
                  Ciao Damiano.

L'unica cosa che mo viene in mente su 2 piedi è mettere un qualcosa
sull'evento OnDrawColumnCell, ovvero, un controllo del tipo
"se larghezza di cio che va nella colonna > larghezza colonna" then
  "allarga colonna"
Bye
AS
Newsgroup: it.comp.lang.delphi
Titolo: Delphi X

chi mi può spigare il funzionamento delle collisioni con delphi X ?
grazie.
--
Davide - 
Gna...@wappi.com

grazie.
Eccomi qui ! Quando si parla di DelphiX :)
Ordunque, quali collisioni ? Ti riferisci al 2D (TSpriteEngine) o al 3D
(TCollisionDetect o simili, che tra l'altro sono componenti aggiuntivi) ?
Suppongo al 2D, però di devo dire una cosa: ti sconsiglio di usare il
TSpriteEngine, perchè è un po' troppo, come dire, macchinoso e toglie quel
po di libertà che è sempre necessaria, e poi ti costringe all'uso delle
classi.
Qui parte la mia domanda che mi rode da molto tempo: quanto le classi
influiscono sulla "pesantezza" delle applicazioni ? Quanto ""spreco"" di
memoria e tempo di esecuzione si paga esattamente per avere i vantaggi delle
classi ?
Tornando a noi, Gnaffy, dimmi a cosa ti riferisci con precisione e ti sarò
più d'aiuto !
Ciao !                                {MSX}

 classi ?
Beh, dipende anche da come sono strutturate: se hai un mucchio di metodi
virtuali, dinamici, e conseguenti overrides magari distribuiti su una
gerarchia abbastanza vasta gli overheads si sentono eccome (prestazioni
decadono)...
Come "spreco di memoria" invece non direi che ci perdi.
Tieni però presente che un sistema ad oggetti ben progettato (oltre ai
"soliti" pregi di essere + manutenibile e più facilmente
modificabile/ampliabile) può essere _molto_ efficiente...
Non saprei dirti, in definitiva, se ci perdi rispetto alla programmazione
non OO...
--
(¯`·.¸¸.·´¯`·.¸¸.-> 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: W2000 QuickReport

Capita solo a me o è un bug di QuickRep il fatto che sulle anteprime i
pulsantini di stampa e di impostazione stampante rimangono disabilitati?
Poi se salvo il report e lo ricarico miracolosamente si abilitano!!
Qualcuno sà darmi una dritta?
Ciao Raf.

 Qualcuno sà darmi una dritta?
Invece di Preview/preViewModal prova a passare per qrPrinter:
report.qrPrinter.PreviewModal;
report.qrPrinter.free;
report.qrPrinter := Nil
Saluti
AS
-- 
Posted from  [212.177.19.163] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:_FYw7.1790$YC3....@news1.tin.it...

Newsgroup: it.comp.lang.delphi
Titolo: delphi 6 e win10

Salve,
windows 10 dice che delphi 6 pro non è comatibile,
se provo comunque ad avviarlo inizia la procedura
di registrazione, ho il serial ovviamente ma non
ricordo gli altri dati con cui la feci anni or
sono, come potrei risolvere?
Grazie.
 
-- 
Oggi c'e' una grande battaglia di idee,
ma alla fine non ci saranno ne vinti,
ne vincitori, ne idee! S. Benni da Elianto.

 Grazie.
 
prego.


 però tutto funziona.
 
Capita di esaurire il numero di attivazioni concesse (che dovrebbero essere inizialmente 5, se non ricordo male), ma in genere basta aprire una richiesta al supporto tecnico sul sito Embarcadero e un "reset" dovrebbe arrivare nel giro di pochissimi minuti.
 
Comunque, ottimo lavoro. :)
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
 #Home: 
http://www.marco.breveglieri.name
 
 #Blog: 
http://www.compilaquindiva.com
 
 #DelphiPodcast: 
http://www.delphipodcast.com
 

 win 10 che ogni volta che avvio delphi 6 avvisa dell'incompatibilità,
 
 
non puoi creare un link e impostarne la compatibilita?
 
A.

 A.


 Comunque, ottimo lavoro. :)
 
Grazie.


 non ho mercato con la mia formazione da autodidatta
 
Io avevo capito che fossi uscito dal settore degli "sviluppatori di software", e invece da quello che scrivi direi di no.
 
Come si dice, mal comune mezzo gaudio. :)


 Come si dice, mal comune mezzo gaudio. :)
 
nella pubblica amministrzione faccio ben altro come dipendente
partime a tempo determinato, le utility le sviluppo per "ottimizzare" il 
mio lavoro di ufficio che consiste nel compilare e archiviare moduli per 
richieste di certificazioni varie...
:)
 
p.s.
se qualcuno avesse provato a fare il download non so come ma di era 
scazzato il codice php e non fungeva, ora va!


Grazie.
 
Io ho reinstallato piů volte Delphi 6 su windows 10.
I problemi per me sono altri ma alla richiesta di
registrazione scelgo l'ultima opzione, mi pare:
Register later.
Poi Exit e Delphi 6 parte. 
 
D'altra parte anche il demo di XE8 non andava piů
(dava un errore su una unit System)
e anche Wamp e il mio Webserver con Apache
e Mysql 5.6 e PhpAdmin e anche Titan chess :-|

> A.
 
Su Windows 10 la notifica di incompatibilità di Delphi 6
si può togliere dal menu andando su:
impostazioni
sistema
notifiche e azioni
risoluzione problemi di incompatibilità ->disattivato.
 

 e Mysql 5.6 e PhpAdmin e anche Titan chess :-|
 
apache non parte perchè la porta 80 è occupata dal
Servizio di pubblicazione sul web (IIS?)
io l'ho disabilitato e ora con xampp non ho problemi


 io l'ho disabilitato e ora con xampp non ho problemi
 
...azz...e mo come fai senza?? :-))) Lol!
 
 
A.

io l'ho disabilitato e ora con xampp non ho problemi
 
Avevo installato mysql5.6 e webserver con Wamp
e su Windows 7 pro andava tutto ma windows 10
sembra molto schizzinoso e puň essere benissimo
un conflitto con IIS installato insieme a Visual Studio.
Vedrň cosa fare piů avanti,
Grazie per la dritta.
Newsgroup: it.comp.lang.delphi
Titolo: Selezionare il testo in una cella di TStringGrid

Ogni volta che uso una TStringGrid c'è sempre qualcosa che non mi convince e
questa o quella funzione che mi piacerebbe avere...
Questa volta vorrei selezionare del testo in una cella (che sto editando)
il fatto è che non tutte le colonne possono essere modificate, così ho tolto
l'alwaysshoweditor e ho messo nell'evento onclick questo codice
  if (Grid.Selection.Left in editable) then
   begin //edit
    Grid.Options:=Grid.Options+[goEditing];
    Grid.EditorMode:=true;
   end
  else begin
    Grid.Options:=Grid.Options-[goEditing];
    Grid.EditorMode:=false;
  end;
Appunto però quando entro in una cella per modificarla il cursore si piazza
alla fine del testo, io vorrei che il contenuto della cella venisse anche
evidenziato (così che appena comincio a scrivere venga sostituito)...
Sapete come potrei fare?
Grazie mille in anticipo :-)
    Dariosky

     Grid.EditorMode:=true;
      if THkGrid(Grid).InplaceEditor <> nil then
        SendMessage(THkGrid(Grid).InplaceEditor.Handle,
          EM_SETSEL, 0, Longint($FFFFFFFF));
Saluti
Paolo Arosio

Newsgroup: it.comp.lang.delphi
Titolo: Pid di un processo NT

Qulcuno sa come ricavare da codice il Pid di un processo assegnato da NT?
Grazie infinite
-Eric-


Prova con GetCurrentProcessId()
se ho capito bene quello che ti serve.
Ciao
Davide
Newsgroup: it.comp.lang.delphi
Titolo: [OT]programmazione videogiochi in Italia

magari l'hanno chiesto 6000 volte ma sono nuovo del NG, ma volevo sapere
quali aziende creano videogiochi in delphi in Italia
Grazieeeee

 quali aziende creano videogiochi in delphi in Italia
No, non e' una domanda comune, credo sia la prima volta che viene chiesta :)
Comunque, temo proprio che la risposta sia zero. Gia' sono molto poche
quelle che pubblicano videogiochi (mi vengono in mente Trecision, Milestone,
Nayma, Zeta gameZ (anche se abitano in francia)).
Nessuna di queste usa Delphi. In verita' conosco solo un paio di giochi
professionali fatti in Delphi.

quindi tutto in c/c++?E men che meno in Java??Amen e grazie per la risposta
"{MSX}" <nlugat...@THISinwind.it> ha scritto nel messaggio
news:HHyV8.39405$Jj7.1...@news1.tin.it...


> quindi tutto in c/c++?E men che meno in Java??Amen e grazie per la
risposta
si, direi proprio di si, e credo che il 99% usi Visual C++. Java no di certo
:)
Se ti interessa la programmazione di videogiochi in delphi (amatoriale),
visita 
www.delphigamer.com
 gestito da Dominique Louis, il guru del delphi
game programming. Altrimenti se ti interessa materiale in italiano, credo
che gli unici documenti siano quelli che ho scritto io, e che trovi sul mio
sito.
Ciao!
--
{MSX}  -  
http://msx.rules.it
Mantenitore delle FAQ di it.comp.lang.delphi,
reperibili qui: 
http://gpi.infomedia.it/abc/delphi/FaqDelphi.txt


Apparte che il sito da un po' di tempo non era + tuo ma di un altro
ara addiritura tutto il sito e sparito del tutto... si è solo spostato
o cosA?
Il Razziatore,
The Only Good Windows is an uninstalled Windows
-----------------------------------------------
E-MAILs : IlRazziat...@NOSPAMnetscape.net
WEB     : 
http://www.razziatore.dns2go.com/
ICQ     : 67552596

 o cosA?
E' qui: 
http://gameprog.it


uhm...


Newsgroup: it.comp.lang.delphi
Titolo: Urgente ibx452+d5e+ib60 e QuickReport

Un saluto a quanti sono qui, oggi.
Ho un grosso problema e da stamattina non ho trovato una soluzione.
Ho un report fatto con QR che stampa dati usando un groupheader.
I dataset delle bande vengono assegnati a runtime dopo aver usato il 
costruttore del report x crearlo, cosa che avviene in un blocco 
try--finally.
Il qr usa come fonti dati 3 ibquery, una master e 2 di dettaglio.
Le query prendo dati dalla stessa tabella su un db ib60.
La tabella incriminata ha circa 160 records e viene popolata da una 
stored procedure.
Ora, la creazione del report è lentissima.
Vi espongo brevemente cosa ho gia provato:
disattivato l'espressione del gruppo, che viene assegnata a runtime
escluso uno alla volta le due qruery di dettaglio
attivato e disattivato la prop unidirectional
creato e distrutto indici sulla tabella
inibito la stampa di alcune bande
eseguito le query da ibconsole x vedere se erano problemi di indici et 
similia
usato la stessa situazione x vedere i dati in una serie di dbgrid e 
funziona alla perfezione
Qualche idea?
Grazie x ogni eventuale suggerimento
AS

 AS
Andrea

Andra, prima di tutto grazie x la risposta.
Se avessi potuto lo avrei gia fatto.
Intanto ho risolto ed era un str..ata fatta da me.
Bye
AS

 AS
Andrea
Newsgroup: it.comp.lang.delphi
Titolo: Dll o Package?

Ciao a tutti ho una curiosità,leggendo un po in giro ho notato che ci sono
vantaggi e svantaggi nell'uso di dll e package e le domande che vi pongo a
mo di sondaggio sono :
In base a cosa decido di scrivere una dll?Conviene?
Meglio usare un package o una dll?
Grazie
Antonio.

Meglio usare un package o una dll?
Sollevai la questione tempo fa, prova a dare una scorsa:
http://tinyurl.com/3xmt9
ciao
-- 
Morde. (
mo...@despammed.com
)
M-List di icld: 
http://it.groups.yahoo.com/group/icld/
Firefox, il miglior browser: 
http://www.gxware.org/mozilla/

 Morde.
Ti ringrazio ho letto il post.
Ma per la prima delle 2 domande?
Grazie
Antonio.

Newsgroup: it.comp.lang.delphi
Titolo: comportamento del Shelltreeview

Ho 2 o 3 problemucci con il suddetto componente presente in d6 pe.
il primo problema:
se imposto come root una directory x esempio
c:\programmi\mioprogramma\templates
nel treeview avro
programmi
  sottofolder di templates1
  sottofolder di templates2
  eccc
io invece vorrei venisse scritto:
templates
  sottofolder di templates1
  sottofolder di templates2
  eccc
come faccio?
seconda cosa
come faccio a renderla readonly (non voglio che l'utente possa
rinominare e cancellare files da li.
Grazie
-- 
.     _  _______  ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_
  /| // /__  __/  Kirys <Remove DELTHIS from the address to reply>
 / |/ \   / /     Kirys Tech 2000: 
http://www.kt2k.com
/__|\__\ /_/ 2000 ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_

"Kirys" ha scritto nel messaggio
| il primo problema:
Non l'ho capito.
| seconda cosa
| come faccio a renderla readonly (non voglio che l'utente possa
| rinominare e cancellare files da li.
|
Dopo aver disabilitato il tasto destro dall'OI,
nell'evento Changing metti
begin
 AllowChange := false
end;
P.S. Non l'ho provato, ma dovrebbe funzionare.
--
Ciao.
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio
Newsgroup: it.comp.lang.delphi
Titolo: Richiesta test su componente per l'esplorazione ricorsiva di cartelle/dischi

Ciao a tutti,
sto sviluppando un nuovo componente per l'esplorazione ricorsiva di tutti i 
file e cartelle contenuti in una data cartella o su un intero disco.
Nell'indirizzo che segue c'è un programma (250 Kb) per il test del 
componente:
http://digilander.libero.it/mauro.falzari/delphi/ricorsione.htm
Se qualcuno avesse voglia di provarlo e di segnalarmi eventuali 
malfunzionamenti o impressioni, gliene sarei grato.
Buone ferie!
-- 
Mauro Falzari ( 
http://digilander.libero.it/mauro.falzari
 )
"Se guardi nell'abisso, anche l'abisso guarda in te." (Friedrich Nietzsche)

 Buone ferie!
Mha.. speriamo di farle comunque pure a te
ciao
erik

 ma solo cartelle o anche file?
ciao, per ora vengono visualizzate solo le cartelle ma il componente finito 
leggerà tutti i file (o anche solo quelli corrispondenti a un dato filtro), 
con i relativi attributi (eventualmente con la possibilità anche qui di 
applicare un filtro, oppure di modificare gli attributi dei file).
Per il momento, quello che m'interessa è:
- vedere se funzia anche sotto altri sistemi operativi (Win2000, WinNT, 
WinXP, Win95);
- capire se è abbastanza veloce (si possono ottimizzare alcune parti 
scrivendole in assembler) e se le interruzioni richieste dall'utente vengono 
gestite correttamente.


 malfunzionamenti o impressioni, gliene sarei grato.
Provato su winxp sp1a: no problem
ciao fabrizio

 ha scritto nel messaggio
news:Xns93D6B42332...@130.133.1.4...


 
http://ramaya.azpoint.net/prodotto.asp?ID=3
grazie del consiglio, molto interessante.
Ho scaricato il componente (free con sorgenti) ed è stato molto istruttivo.

Newsgroup: it.comp.lang.delphi
Titolo: Problema con la gestione di file

Cosa c'e' che non va in questo codice?
Il problema che mi si presenta e' che come arrivo all'istruzione:
  Read(FDatiA, DatiE);
della procedura IniziaLog e apro con UltraEdit i file FLog e FDatiA trovo 
che l'intestazione del Log e' stata scritta in FDatiA mentre FLog resta 
vuoto.
procedure IniziaLog;
begin
  Writeln(FLog, 'Acquisizione iniziata il '+IDateTimeToStr
(DatiFile.DatiElab.Inizio)+' e terminata il '+IDateTimeToStr
(DatiFile.DatiElab.Fine));
  Writeln(Flog, '');
  Read(FDatiA, DatiE);
  Writeln(FLog, 'Tempo trascorso: 0 min.');
  Writeln(FLog, 'La velocità del vento è: '+IntToStr(Round
(DatiE.Vento.Modulo*Scala.Vento.Modulo))+' km/h');
  Writeln(FLog, 'L''angolo del vento è: '+IntToStr(Round
(DatiE.Vento.Angolo*Scala.Vento.Angolo))+'°');
  Writeln(FLog, 'La temperatura dell''aria è: '+IntToStr(Round
(DatiE.Vento.Temp*Scala.Vento.Temp-15))+'°C');
  Writeln(FLog, 'L''umidità dell''aria è: '+IntToStr(Round
(DatiE.Vento.Wet*Scala.Vento.Wet))+'%');
  DatiLog:=DatiE;
  Reset(FDatiA);
end;
procedure Elabora;
var
  NomeFile1, NomeFile2, NomeFile3: string;
begin
  [CUT]
  NomeFile1:=DatiFile.DirElab+DatiFile.Nome+ExtpTdt;
  AssignFile(FDatiA, NomeFile1);
  Reset(FDatiA);
  NomeFile2:=DatiFile.DirElab+DatiFile.Nome+ExtpDat;
  AssignFile(FDatiE, NomeFile2);
  Rewrite(FDatiE);
  NomeFile3:=DatiFile.DirElab+DatiFile.Nome+'_log.txt';
  AssignFile(FLog, NomeFile3);
  Rewrite(FLog);
  IniziaLog;
  while not(Eof(FDatiA)) do Tratta;
  CloseFile(FDatiA);
  CloseFile(FDatiE);
  CloseFile(FLog);
  VediFile(NomeFile3);
  DeleteFile(NomeFile1);
end;
-- 
Ciao,
   Stefano

 Cosa c'e' che non va in questo codice?
[CUT]
Ho risolto. Il problema non era li, ovviamente.
-- 
Ciao,
   Stefano

Newsgroup: it.comp.lang.delphi
Titolo: Tool free per creazione Report.

Qualcuno mi saprebbe consigliare qualche tool free da integrare con
Delphi(in particolare componenti da utilizzare con la libreria CLX di
delphi) per la creazione di report?
Grazie.

Per Delphi di free c'e' FastReport, per Kilyx non mi risulta ci sia nulla,
ne' free ne' commerciale.
Ciao, Sandro
Newsgroup: it.comp.lang.delphi
Titolo: Dataset e datetimepicker

Ciao a tutti.
Ultimamente sto postanto molto e trovo sempre utilissimi aiuti da
parte vostra e vi ringrazio.
Questo e' il problema.
Ho un dataset con un campo datetime e 2 datetimepicker.
Ora, devo fare in modo che cambiando i 2 datetimepicker il dataset sia
filtrato solamente sull'intervallo di tempo dei 2 datetimepicker.
Quindi setto il primo dtp su 01/01/2002 e il secondo su 05/01/2002 e
il dataset mi deve far vedere solo i campi che contengono delle date
comprese fra il 01/01 e il 05/01.
Premesso il campo con le date non e' indicizzato
Grazie!

 Premesso il campo con le date non e' indicizzato
Al volo:
procedure TForm1.Button1Click(Sender: TObject);
begin
  MyQuery.Close;
  MyQuery.SQL.Text := 'select campo1, campo2 from mytable '+
                      'where (campodata >= :pcampodata1) '+
                      ' and (campodata <= :pcampodata2) ';
  MyQuery.ParamByName('pcampodata1').AsDateTime :=
                   Trunc(DateTimePicker1.DateTime);
  MyQuery.ParamByName('pcampodata2').AsDateTime :=
                   Trunc(DateTimePicker2.DateTime);
  MyQuery.Open;
end;
--------------------------------
Inviato via 
http://usenet.libero.it

Inviato via 
http://usenet.libero.it
Scusa ma io sono un autentico principiante, potresti spiegarti meglio
dato che non conosco benissimo l'uso dei query.
Intendo cosa dovrei indicare in campo1, campo2, campodata,
ecc...ec...?!
Grazie!

 Intendo cosa dovrei indicare in campo1, campo2, campodata,
Nel mio esempio, campo1 e campo2 sono le colonne che vuoi nel dataset
risultante e campodata e' la colonna su cui vuoi operare la selezione.


Per imparare qualcosa di SQL leggi la guida su
www.w3schools.com
è util, a portata di mano e chiara.
Cmq se la query viene scritta runtime in questo modo è inutile, imho,
utilizzare i parametri, tanto vale scrivere i valori direttamente.
Ciauzz,
Alessandro
--
ilvcclx_!!!
"Andrea Laforgia" <x@x.x> ha scritto nel messaggio
news:80Z105Z34Z80Y1...@usenet.libero.it...


 utilizzare i parametri, tanto vale scrivere i valori direttamente.
Utilizzare i parametri non e' *mai* inutile, specie se utilizzi le date.


 > Cmq se la query viene scritta runtime in questo modo è inutile, imho,


 Magari come yyyy/mm/dd che credo sia quello universalmente riconosciuto?
Che non e' quello universalmente riconosciuto ;)
E poi, comunque, ti comporta del lavoro di trasformazione della data in
piu'.

Newsgroup: it.comp.lang.delphi
Titolo: Anno bisestile

Salve,
  probabilmente questa domanda sarà stata fatta un miliardo di volte. Come
si fa a sapere se un anno è bisestile?
Grazie Marco

 si fa a sapere se un anno è bisestile?
Se non erro un anno è bisestile se è divisibile per 4 e non divisibile per
100 a meno che non lo sia anche per 400.
Esempio:
1900 è divisibile per 4 ma anche per 100 quindi non è bisestile
2000 è divisibile per 4 e per 100, ma anche per 400 quindi è bisestile
2004 è divisibile per 4, non per 100 e quindi è bisestile
Sulla base di questa regolina puoi implementare un algoritmo per calcolare
l'anno bisestile
--
- Carlo -
c.b...@libero.it

 wrote in message
news:9mvf49$7o4$1...@fe1.cs.interbusiness.it...


 si fa a sapere se un anno è bisestile?
IsLeapYear  (unit SysUtils)
--
Ciao !  Davide DG.

Newsgroup: it.comp.lang.delphi
Titolo: Evitare bug impostazione application.title nel dpr

In un vecchio post avevo sollevato la questione di un bug con
l'impostazione di application.title nel file dpr. Ecco il bug:
var Titolo: String;
begin
  Title := 'Ciao';
  Application.Initialize;
  Application.Title := Titolo;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end
A questo punto non si riusciva più a fare il debug!
Ecco come evitare il bug:
with Applicatio do Title := Titolo;
Spero che vi serva!
Ciao
  { Impostazione del titolo - Uso di with per correggere un bug di Delphi }
  with Application do
    Title := InitEXE.Title;


Dimenticavo: uso D7

Newsgroup: it.comp.lang.delphi
Titolo: RADICE QUADRA DOVE' ???? novello

Come da oggetto come posso utilizzare la formula matematica della radice
quadra in Delphi5 ?
Io stò usando la trial inglese e nell'Help non ho trovato nulla (per quel
poco che capisco l'inglese)
In compenso ho trovato sen, cos, tng, ecc., ma mi manca la radice quadra per
finire il mio programmino sulla trigonometria . Ho persino cercato nei
caratteri Ascii, ma del simbolino radice niente ????? :-(
grazie in anticipo a chi mi consiglierà.

 ha scritto nel messaggio
news:RYiY6.26984$Rq1.4...@news.infostrada.it...
: Come da oggetto come posso utilizzare la formula matematica della radice

:
:
puoi usare la funzione "power" e passare come esponente 0.5
ciao
giuliano

Dall'help in linea:
------------------------------------------------
SQRT
Returns the square root of X.
Unit: System
Category: arithmetic routines
function Sqrt(X: Extended): Extended;
Description
X is a floating-point expression. The result is the square root of X.
----------------------------------------------------------------------------
--
Ciao
Andrea


grazie moltissimo

caratteri Ascii, ma del simbolino radice niente ????? :-(
Che c'entrano i caratteri ASCII ?
--
Andrea Laforgia - walkietalkie(at)
libero.it
#exclude <windows.h>

 Che c'entrano i caratteri ASCII ?
speravo almeno di trovare il simbolino della radice, invece niente

Newsgroup: it.comp.lang.delphi
Titolo: Delphi Superpage

Ho perso l'indirizzo del sito.
Qualcuno può inviarmelo, poichè non riesco a ritrovarlo?
Grazie
--
Gerardo
Toglietemi il necessario ma non il superfluo
(Oscar Wilde)

...


hi
http://www.programmers.net/mirrors/DSP/
bye Max
Newsgroup: it.comp.lang.delphi
Titolo: ©Copyright

Salve a tutti avrei 2 domande da porvi:
1) Se faccio un programma e lo vendo a un sofware house, essa ha il diritto
di togliere il mio nome da ogni copia venduta?
2) Se vendo il mio software devo dare anche il sorgente? Oppure anche solo
l'eseguibile abbassando il prezzo?
Grazie
--
Posted from [195.223.215.6] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Oppure anche solo l'eseguibile abbassando il prezzo?
dipende da te decidere, sei tu l'autore.
Ricorda che se il lavoro e' fatto su commissione (loro) loro sono
proprietari di tutto, sorgente compreso, salvo che non mettiate per iscritto
condizioni diverse prima dell'inizio del lavoro.
Ciao, Sandro

 l'eseguibile abbassando il prezzo?
sempre dal contratto (puoi fare entrambe le cose)
Newsgroup: it.comp.lang.delphi
Titolo: passaggio array dinamico a una funzione

Ciao
ho questa funzione
procedure InflatePolygon(const Points:array of Tpoint3;
                        var Points2: array of TPoint3;
                        var area:integer;
                        const screenCoordinates:boolean;
                        const inflateby:integer);
quando la chiamo gli passo un array dinamico, precedentemente dimensionato 
con setlenght.
Ho questo errore :
Incompatible typ Array and dynamic array.
Chi mi aiuta ?
Grazie, Giň. 

 Incompatible typ Array and dynamic array.
Come inizializzi l'array che passi alla funzione? Com'è dichiarato?
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Scusa!!! per la fretta ti ho inviato una mail !!!
Dunque
type
    T3Dpoint = record
             X:double;
             Y:double;
             Z:double;
           end;
  procedure XXXXX
  procedure XXXXX
  procedure XXXXX
.......
  private
    { Private declarations }
  public
    { Public declarations }
  end;
   TVertici = array of T3DPoint;
 var
  Vertici_1 : array of TVertici;
  Vertici_2 : array of TVertici;
POI chiamo la procedura dichiarata così
 procedure InflatePolygon(const points:array of Tpoint3;
                        var points2: array of TPoint3;
                        var area:integer;
                        const screenCoordinates:boolean;
                        const inflateby:integer);
InflatePolygon (Vertici_1,Vertici_2,area,0,10);
TPoint3 e T3Dpoint sono dichiarati cone record allo stesso modo (in 2 unit
diverse)
Grazie per l'attenzione!

                         const inflateby:integer);
Qualsiasi tipo "array of", anche se equivalente a quello effettivamente 
utilizzato, risulta differente al compilatore.
Se devi valorizzare un array e passarlo ad una funzione, definisci il 
tipo relativo:
   type
     TMyArray: array of TMyRecord;
e utilizzalo anche nel prototipo della funzione
   function MyFunction(const MyArray: TMyArray);
   begin
     // ...
   end;


> POI chiamo la procedura dichiarata cosě


 come faccio a fargli "vedere" la dichiarazione del mio array dinamico ?
Il tipo del tuo array dinamico deve essere nella sezione *interface* 
della unit in cui è definito, mentre la unit che lo utilizza deve 
includere la prima nella clausola *uses*.


 ha scritto nel messaggio 
news:47a9f0d6$1...@extreme.x-privat.org...

Newsgroup: it.comp.lang.delphi
Titolo: Leggere la rubrica

E' possibile in delphi leggere la rubrica dei contatti di outlook?
Se si come si puo' fare

2000 o express?
Bye
AS

 ha scritto nel messaggio
news:fuQy8.24216$W9.5...@twister2.libero.it...


Newsgroup: it.comp.lang.delphi
Titolo: Sfogliare directory

Esiste una funzione in delphi per ottenere la lista dei file in una
directory?

 directory?
No. Se ne è discusso approfonditamente non molto tempo fa...
Cerca tra i vecchi post che trovi anche il codice per far ciò.
Acqua
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Open Delphi Manual (
http://groups.yahoo.com/group/delphi_open_manual/
)
Newsgroup: it.comp.lang.delphi
Titolo: TableName from component

C'è un modo per sapere il nome della tabella di un TDBedit ?
Ho provato String s=TTable(nome_dbedit->DataSource->DataSet).TableName
con Cbuilder, non dà errori ma non visualizza nulla.
Thanks,
Stef

 C'è un modo per sapere il nome della tabella di un TDBedit ?
No, non ha senso.  Il contenuto di un TDBEdit è quello di un campo di un
dataset e il contenuto di un dataset prescinde da tabelle specifiche.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 C'è un modo per sapere il nome della tabella di un TDBedit ?
xche? :-|
A

 A
Ho piů componenti DBEdit con campi di tabelle diverse;
un evento su uno dei dbedit dovrebbe attivare un'unica funzione
nella quale ho bisogno del nome del campo (e ce l'ho:DBEdit1->DataField)
e del nome della tabella, che non so come prendere.
Stef

 con Cbuilder, non dà errori ma non visualizza nulla.
Sei sicuro che in quel momento la TTable sia impostata?
Giorgio 

Giorgio Padoan ha scritto:

Certo, Table1->TableName contiene il nome della tabella.
Stef

 >> Ho provato String s=TTable(nome_dbedit->DataSource->DataSet).TableName
..se nome_dbedit è legato a un TDataSource che a sua volta è legato al
tuo "Table1" e se come dici "Table1->TableName contiene il nome della
tabella", allora quel codice *DEVE* funzionare.  Se il sistema non
visualizza nulla, è possibile che tu stia compiendo un downcast non valido
(da TDataSet e TTable).
Tutto questo, fermo restando che non dovrebbe mai essere necessario
risalire al nome di una tabella specifica, a partire da un dataset
risultante e se richiedi una cosa del genere, a mio avviso stai
sicuramente sbagliando qualcosa nell'impostazione dell'applicazione...


 un evento su uno dei dbedit dovrebbe attivare un'unica funzione
Vuol dire che dentro la funzione hai una cosa del tipo:
se tabella1 and campo1 do
....
se tabella2 and campo2 do
...
uhm.. io non lo farei, fossi in te.
rischi di avere una funzione molto lunga (+ di 25 righe..), poco
leggibile e scomoda.
imho, se spieghi bene quale è il tuo problema forse qualcuno riesce a
suggerirti una via alternativa come si deve.
A.

>
Prova con
String s=nome_dbedit->DataSource->DataSet->TableName;
Giorgio 

 String s=nome_dbedit->DataSource->DataSet->TableName;
Non ha senso, come già detto.  'TableName' non può essere una proprietà di
TDataSet.


 se tabella2 and campo2 do
No, un'unica query sql, ma per poterla fare mi serve, oltre al nome del
campo che ho gia', anche il nome della tabella.
Sinceramente pensavo di poterlo recuperare facilmente ma ho sbattuto su
un muro ! Ho un componente che fa riferimento ad un campo di una
tabella, ho il nome del campo ma non posso sapere il nome della
tabella ??
Googlando pare che con delphi la cosa sia fattibile, per questo chiedevo
lumi...
Stef

 No, un'unica query sql[...]
Hai letto ciò che ti ho scritto negli altri messaggi ?

Newsgroup: it.comp.lang.delphi
Titolo: Installare più servizi che usano la stassa applicazione

Ciao,
ho la necessità di creare più servizi che partano dallo stesso eseguibile
e ovviamente devo cambiare il parametro NAME ogni volta che lo installo. Ho
adottato il seguente codice che però non funziona:
procedure TMyService.ServiceBeforeInstall(Sender: TService);
begin
  if ParamStr(1)='-install' then IHotel := ParamStr(2) else IHotel :=
ParamStr(1);
  IHotel := TRIM(AnsiReplaceText(Copy(IHotel,2), ' ', ''));
  if Length(IHotel) = 0 then
    begin
      Showmessage('Hotel name not specified.' + #13 + 'Service can not be
installed');
      Abort;
    end;
  DisplayName := 'Opera IFC8 AliveCheck for ' + IHotel;
  Name := 'MyServiceAliveCheckfor' + IHotel;
end;
Funziona solo se commento l'ultima riga dove assegno un valore alla
variabile NAME ma poi in questo caso posso installare solo un servizio...
Qualcuno riesce a suggerire un'alternativa?
Grazie 1000 in anticipo
Elena
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 adottato il seguente codice che perÃ² non funziona [...]
La pratica di modificare il nome del servizio tramite la proprietï¿œ 
"Name" del *TServiceModule* con cui questo ï¿œ implementato ï¿œ un gioco 
molto... sporco, perchï¿œ vai a modificare una proprietï¿œ che ha un ruolo 
specifico nella VCL (non ï¿œ una comune stringa, come puï¿œ esserlo la 
proprietï¿œ "DisplayName").
Forse ï¿œ piï¿œ conveniente utilizzare un nome e una descrizione generica 
per il servizio, e agire attraverso un file di configurazione per 
determinare quello che il programma deve fare, anche perchï¿œ nel tuo 
scenario si presuppone che tutti gli eseguibili siano identici, giusto?
Forse si dovrebbe chiarire maggiormente qual ï¿œ l'obiettivo che ti ha 
portato a scegliere questa soluzione, per vedere poi se c'ï¿œ la 
possibilitï¿œ di valutarne una alternativa e piï¿œ pulita. :)
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Newsgroup: it.comp.lang.delphi
Titolo: Completamento automatico

Esiste un componente  simile a un Tmemo  che permetta di avere la funzione
di completamento automatico ?
(tipo quella dell' IDE di delphi)
PS: possibilmente dovrebbe essere free, visto che non è x un progetto
commerciale...

il pacchetto mwedit ha tra le altre cose anche un componente per il
completamento automatico.
L'url non lo ricordo, ma se cerchi con google dovresti trovarlo.
Ciao!    {MSX}
--
{MSX}  -  
http://msx.rules.it
Mantenitore delle FAQ di it.comp.lang.delphi,
reperibili qui: 
http://gpi.infomedia.it/abc/delphi/FaqDelphi.txt

"{MSX}" ha scritto nel messaggio
| il pacchetto mwedit ha tra le altre cose anche un componente per il
| completamento automatico.
| L'url non lo ricordo, ma se cerchi con google dovresti trovarlo.
|
| Ciao!    {MSX}
|
Credo che dalle spoglie di mwEdit sia nato il progetto SynEdit.
Molto bello ed Open Source.
Si trova qui:  
http://synedit.sourceforge.net
--
Ciao.
ACSH
[D4]
---------------------------
Chi fa da se'
fatica il doppio

Newsgroup: it.comp.lang.delphi
Titolo: Delphi e .... Linux (Kylix) : info please !!

Salve,
dopo avere letto i precedenti post sull'argomento mi sono rimaste
delle domande :
Dovendo iniziare a programmare , essendo interessato ad un linguaggio
cross platform per Win+Linux le alternative sono Delphi+Kylinx oppure
Java.
Visto che dovrei fare delle "semplici" applicazioni desktop, con
accesso a database locali (quindi niente client/server) cosa
consigliate ? Eventualmente anche altre alternative considerando che
attualmente le richieste sono 90% win e 10% linux (obvious....).
La mia domanda iniziale comunque era : Se io compilo un programma con
Delphi, usando le CLX è 100% compatibile e ricompilabile sotto
Linux-Kylix ?
E se io uso le librerie VCL "standard" di Delphi ?
Come velocità gli eseguibile Delphi sono = a quelli Kylinx ?
Grazie 1000,
Grazie
--------------------------------------------------------------
Matteo F               RAVENNA - Italy
To reply delete REMOVE from my e-mail address.

 Come velocità gli eseguibile Delphi sono = a quelli Kylinx ?
Linux e' generalmente piu' lento, in modalita' grafica, di Windows, a
parita' di hardware. I binari generati dal compilatore, inoltre, non e'
detto che funzionino su tutte le distribuzioni di Linux, dipende dalle
librerie grafiche e da altri moduli (non so esattamente, non ho mai
approfondito) del sistema, che variano da distribuzione a distribuzione.
Secondo me ti conviene aspettare che esca Delphi 7, le versioni pro ed
enterprise saranno fornite in bundle con Kylix 3.
Ciao, Sandro

 Linux-Kylix ?
teoricamente si
--
Davide Consonni
(
davidec...@virgilio.it
)
Newsgroup: it.comp.lang.delphi
Titolo: Stampa da Memo

Gentili iscritti, sono alle prime armi con Delphi e ho la necessitą di
stampare del testo contenuto in un oggetto Memo e di inviarlo alla
stampante. Qualcuno avrebbe per favore qualche suggerimento da darmi a
riguardo? In particolare ho navigato nell'archivio di questo newsgroup
grazie a Google e grazie agli esempi che ho trovato, ho scritto il seguente
codice:
var
  Line: Integer;
  PrintText: TextFile;   {declares a file variable}
begin
    if (PrintDialog1.Execute) then
    begin
      AssignPrn(PrintText);   {assigns PrintText to the printer}
      Rewrite(PrintText);     {creates and opens the output file}
      Printer.BeginDoc;
 
Printer.Canvas.Font.Name
 := 
Memo1.Font.Name
; {assigns Font settings to
the canvas}
      for Line := 0 to Memo1.Lines.Count - 1 do
          Writeln(PrintText, Memo1.Lines[Line]); // inoltra e scrive il
contenuto di memo1 sulla stampante
      System.CloseFile(PrintText);
      Printer.EndDoc;
     end;
end;
Il problema? Non stampa con il carattere Courier New. La stampante č una
nuova hp inkjet in rete; ho anche provato a scrivere le due seguenti linee
di codice che ho inserito prima del ciclo for:
Printer.Canvas.Font.Name
 := 'Courier New';
Printer.Canvas.Font.Size := 12;
ma niente... la stampante continua a stampare in Arial! Qualche
suggerimento?
Grazie in anticipo per le eventuali risposte, un saluto caloroso.
--
Paolo Guagliumi

 Grazie in anticipo per le eventuali risposte, un saluto caloroso.
Prego
Andrea

 eheheheheheheheheheheh
Ciao Andrea, grazieeeeeee per le indicazioni! Si, ho fatto un po' di
mischiafrancesca! Ma! Grazie a Te, ecco che funziona la stampa! Allego il
codice nell'eventualità che ad altri prima o poi possa servire, anche se è
molto semplice.
procedure TForm1.Button3Click(Sender: TObject);
var
begin
    if (PrintDialog1.Execute) then
    begin
      Printer.BeginDoc;
 
Printer.Canvas.Font.Name
 := 'Courier New';
      Printer.Canvas.Font.Size := 12;
      Printer.Canvas.TextOut (0, 0, Memo1.Text);
      Printer.EndDoc;
    end;
end;
Altra domandina, nel caso tu o qualcun'altro mi possa rispondere... se
volessi far comparire la finestra delle proprietà della stampante per
modificare qualche parametro, come fare?
Grazie mille per ogni eventuale risposta! Un saluto, ciao!

       Printer.Canvas.TextOut (0, 0, Memo1.Text);
Domade stupide ...
1)  ma il wrap è automatico ??
2) va a pagina nuova ???
^_Goblin_^

 modificare qualche parametro, come fare?
PrinterProperties, guarda nell'SDK.

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

Salve a tutti, 
Come si fa a rimuovere il rumore di windows che si ha quando si preme
invio in un Edit? :-0 
Ho provato a settare Key:=0 oppure a fare un PlaySound con un
parametro che faceva stoppare tutti i suoni..... ma niente...... Quel
maledetto suono continua ad assillarmi :-(

 ha scritto nel messaggio
news:3bbb8250...@news.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: Una dritta sulla compatibilità

Forse dico una grande caz.... ma un programma fatto con Delphi sotto un
qualsiasi Windows, in una macchina MAC ci gira?
Scrittura e lettura in database PARADOX danno fastidio alla cosa??

 qualsiasi Windows, in una macchina MAC ci gira?
Se per MAC intendi Macintosh penso che dovresti ristudiarti l'informatica di
base.
Pesupposto che per Windows intendi Win32 su tecnologia i86 devi tener
presente che il processore è CISC mentre sul Mac il processore (che sia
68000/PowerPC G3 o G4) è RISC, due tecnologie molto differenti a livello
fisico oltre a questo il Mac di norma monta il Mac Os 8/9 ... che è un
sistema operativo differente da windows per tutto ciò che non rigurda la
GUI.
A meno che ...
Se prendi un'applicativo Delphi 6 fatto con le librerie QT (CLX), lo compili
sotto Linux con Kylix e lo fai girare su un Mac con Mac Os X allora potresti
avere qualche possibilità di successo.
Saluti


68000/PowerPC G3 o G4) è RISC, 
Per dire la verità tutti i processori classe 68000 (quindi anche il
68020/30/40 ecc..) sono CISC.
Ciao, Rocco

 68000/PowerPC G3 o G4) è RISC
Il 68000 e' CISC, mentre il PowerPC monta processori RISC.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Hai cannato alla grande, eh? :)))
E' quasi come chiedere "Perche i Mac non hanno l'adesivo Intel Inside?"
Bye
AS


> Il 68000 e' CISC, mentre il PowerPC monta processori RISC.
Ma esistono ancora Mac che usano processori della serie 68000?
La prima serie Power che usa i RISC risale a circa 10 anni fa....
Bye
AS


 > Scrittura e lettura in database PARADOX danno fastidio alla cosa??
Per il paradox ti serve il BDE.
Il bde esiste solo x win.
Se usi il dbexpress non dovresti avere problemi.
Ma poi una domanda molto cattiva...
Mollereste MacOs x passare a Linux?
Io credo proprio di no!


Ho cannato anche io...
il compilatore Kylix produce un exe per processori intel.
Quindi, non puo' girare su un processore che non ha nessuna
compatibilita con le schifezze di Intel.
Niente intel, niende delphi/kylix.
Bye
AS
"Se è Microsoft non funziona"


Ma esistono ancora Mac che usano processori della serie 68000?
No, credo di no.
-- 
Andrea Laforgia (
walkie...@libero.it
)
"Usenet is a strange place" [Dennis Ritchie]

 La prima serie Power che usa i RISC risale a circa 10 anni fa....
Ehm, sigh, sě, esistono... e vanno manutenuti :)
Ciao!
Davide DG.
-- 
All resistance is futile! Prepare to be disassembled !

Newsgroup: it.comp.lang.delphi
Titolo: Formato file FP3 ?

Salute a tutti
qualcuno ha mai trovato in rete le specifiche del formato file FP3 usato
da File Maker per i database?
Ogni informazione č gradita.
Grazie.

 da File Maker per i database?
prova 
www.wotsit.org
 (o .com)
ciao
giuliano

 Grazie.

Grazie, ma č l'unico formato che manca!


Essendo questo un gruppo di programmazione mi sembra logica la risposta:
leggerli.

Newsgroup: it.comp.lang.delphi
Titolo: [ot] il db dei cap aggiornato

ciao a tutti, qualcuno di voi ha già trovato l'elenco aggiornato dei NUOVI 
CAP???
Simone 

 CAP???
http://www.italy.fsfeurope.org/it/projects/cap/
http://www.italy.fsfeurope.org/it/projects/cap/trovacap.sql.gz
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

grazie sei sempre un grande...
ma questo può essere la sostituzione di quello precedente?? io ho un file 
access con l'elenco precedente, posso svuotarlo e usare questo?
Simone 

 access con l'elenco precedente, posso svuotarlo e usare questo?
Certo.


simone p. ha scritto:

Dipende dall'uso che ne fai, riporto quello che c'è scritto nel sito:
"ATTENZIONE.Non siamo in grado di affermare che l'elenco sia completo, 
per cui non consigliamo l'uso per scopi professionali, che avviene 
comunque 'a rischio e pericolo' dell'utente."
Non ti danno la garanzia ASSOLUTA che l'elenco sia completo poiché SOLO 
posteitaliane ha l'elenco completo di TUTTI i cap.
Saluti
Max

posteitaliane ha l'elenco completo di TUTTI i cap.
Peccato che posteitaliane lo faccia pagare 5000 euro l'anno (+ IVA).

 Peccato che posteitaliane lo faccia pagare 5000 euro l'anno (+ IVA).
Questa è un'altra storia
Max

Questa è un'altra storia
Quindi tu spendi 5000 euro ?

 Questa è un'altra storia
Io lo chiamo...un vero furto! :-|
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

Andrea Laforgia ha scritto:

Ho semplicemente precisato che il DB dei CAP presenti nel sito, come da
loro indicato, POTREBBE non essere completo.
Alla domanda posta da simone p.
"ma questo può essere la sostituzione di quello precedente?? io ho un
file access con l'elenco precedente, posso svuotarlo e usare questo?"
Tu hai risposto:
"Certo. "
Io ho SEMPLICEMENTE puntualizzato che doveva fare attenzione all'uso
che ne faceva, poichè come indicato nel sito:
"ATTENZIONE.Non siamo in grado di affermare che l'elenco sia completo,
per cui non consigliamo l'uso per scopi professionali, che avviene
comunque 'a rischio e pericolo' dell'utente."
E tu hai tirato fuori la storia dei soldi, che non c'entra nulla con
quello che ho detto io.
Max

 quello che ho detto io.
C'entra invece, se ci pensi bene...


 
Scusa hai ragione, non avevo letto chi eri....
Max

 Scusa hai ragione, non avevo letto chi eri....
Ma statte zitto...


 Ma statte zitto...
Se per vivere ti dicono "siediti e stai zitto" tu alzati e muori
combattendo. (Jim Morrison)
Puoi anche rispondere (ho visto che in genere vuoi sempre l'ultima
parola) ma ignorerò il thread
Saluti
Max
Newsgroup: it.comp.lang.delphi
Titolo: D2006 Win32 non trova dbexpint.dll

caricando un progetto creato in D2005 Win32 che fa uso dei
componenti dbexpress , visualizzando il datamodule mi da
errore "unable to load dbexpint.dll"
questa dll e' presente nelle cartelle di progetto , ma non in
quelle dove D2006 si e' installato ne in Windows\System32
ho il dubbio che ci sia qualcosa che non quadra,
- prima di disintallare D2005 il problema non si presentava
- ho reinstallato D2006 Pro ma la .dll continua a non essere copiata
copiando dbexpint32.dll datata 09/08/2002 ore 15:00 in \System32 ,
la libreria viene trovata e tutto procede;
qualche suggerimento ?
grazie Maurizio 

 qualche suggerimento ?
Se intendi fare uso dei driver forniti con Delphi, non devi usare quella 
DLL ma la versione aggiornata (in quanto la precedente potrebbe non 
essere compatibile con le revisioni apportate alla libreria dbExpress).
Trovi una tabella dettagliata e altre considerazioni a riguardo nel 
seguente capitolo del "free eBook" di Marco Cantù:
http://www.marcocantu.com/md2005/UpdateDelphi2006_ch14.html
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
Inviato da X-Privat.Org - Registrazione gratuita 
http://www.x-privat.org/join.php

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 5/6 e "Object TreeView"

Ciao, ho notato una cosa strana nel delphi 6 rispetto al 5.
Quando nel 5 aggiungevo delle procedure o delle variabili (non appartenenti
alle form o altri oggetti) queste
venivano aggiunte su una finestra a lato del codice (tipo l'object TreeView)
e da qui potevo selezionarle velocemente.
Nel delphi 6 (PE) invece questa funzionalità non c'è (o non sono riuscito a
trovarla).
Qualcuna mi può confermare o smentire?
Grazie

E' stata volutamente rimossa nella PE, se scarichi la trial ent. la trovi.
"Balbar" <...@...> ha scritto nel messaggio
news:OUpq8.111525$1S3.3...@twister1.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: Network view

Ciao a tutti, qualcuno conosce qualche componente o qualsiasi modo per
leggere tutti i nomi dei computer e delle condivisioni di ogni singolo
computer(cioč una scansione della rete; SO su cui deve girare il servizio da
Win 95 in su.)
Grazie a tutti

 Win 95 in su.)
Mi associo con una richiesta simile, dovrei avere la possibilita di
monitorare la rete locale
avendo come riscontro gli utenti (ip) che si collegano alla macchina da
cui è lanciato il
monitor.
Grazie
Linus
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:82gW8.44459$Jj7.1...@news1.tin.it...

Per ottenere la lista dei computer in rete (procedura presa non so piů
dove):
function EnumerateFunc(var l: TStringList; hwnd: HWND; hdc: HDC ; lpnr:
PNetResource ): Boolean;
const
  cbBuffer : DWORD       = 16384;      // 16K is a good size
var
  hEnum, dwResult, dwResultEnum : DWORD;
  lpnrLocal : array
        [0..16384 div SizeOf(TNetResource)] of TNetResource;    // pointer
to enumerated structures
  i : integer;
  cEntries : Longint;
  aux: string;
begin
  centries := -1;               // enumerate all possible entries
  // Call the WNetOpenEnum function to begin the enumeration.
  dwResult := WNetOpenEnum(
                          RESOURCE_CONTEXT,  // Enumerate currently
connected resources.
                          RESOURCETYPE_DISK, // all resources
                          0,                 // enumerate all resources
                          lpnr,              // NULL first time the function
is called
                          hEnum              // handle to the resource
                          );
  if (dwResult <> NO_ERROR) then
  begin
    // Process errors with an application-defined error handler
    Result := False;
    Exit;
  end;
  // Initialize the buffer.
  FillChar( lpnrLocal, cbBuffer, 0 );
  // Call the WNetEnumResource function to continue
  //  the enumeration.
  dwResultEnum := WNetEnumResource(hEnum,           // resource handle
                                  DWORD(cEntries),  // defined locally as -1
                                  @lpnrLocal,       // LPNETRESOURCE
                                  cbBuffer);        // buffer size
  // This is just printing
  for i := 0 to cEntries - 1 do
  begin
    // loop through each structure and
    // get remote name of resource... lpnrLocal.lpRemoteName)
    aux:= lpnrLocal[i].lpRemoteName;
    l.Add (aux)
  end;
  // Call WNetCloseEnum to end the enumeration.
  dwResult := WNetCloseEnum(hEnum);
  if(dwResult <> NO_ERROR) then
  begin
    // Process errors... some user defined function here
    Result := False;
  end
  else
    Result :=  True;
end;
poi la richiami cosě:
if EnumerateFunc (l, handle, 0, 0) then
    memo1.Text:= L.text;
Ciao ciao