mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Conoscere i diritti dell'utente in uso

Salve a tutti.
Ho un programma che per girare ha bisogno dei diritti di amministratore,
altrimenti la funzione principale và in errore. Non ho però il feedback 
di questo errore, perciò devo fare in modo di mandare un messaggio in 
caso non si posseggano i suddetti diritti.
Come posso fare?
Grazie,
Kayn.

cerca:
Security Functions
nella guida sdk di windows
AS

 ha scritto nel messaggio
news:3wNye.38916$h5.17...@news3.tin.it...


Newsgroup: it.comp.lang.delphi
Titolo: OT: Una mail ricevuta in privato

Salve,
Volevo pubblicamente ringraziare Giovanni che, adulandomi, mi ha detto che
sono uno dei più esperti da queste parti.
So che non è vero, però mi ha fatto comunque stare bene per un pò in un
periodo non semplice.
Grazie.
--
Andrea Raimondi
rain...@tin.it
ICQ #66008183
"Software development is as having a girlfriend :
  it delights many times but it can make u crazy..."

periodo non semplice.
Scommetto che cominciava cosi' :
"Visto che sul newsgroup sei uno dei piu' esperti mi chiedevo se
saresti disposto a darmi alcune dritte."
eh eh eh ...
--
Andrea Laforgia (
andrea_...@bigfoot.com
)
---------------------------------------------
#exclude <windows.h>

 wrote in message
8m44ms0lv7qj9sac8...@4ax.com...


 Non mi dire che anche tu... eh?
MUHAUHAUHAAAHAHAH !!!! ANCHE A ME !!!
Visto che sul newsgroup sei uno dei più esperti mi chiedevo se saresti
disposto a darmi alcune dritte.
Deve aver creato una mail-template !!!! eheheheh
Ciao, o Colleghi Esperti di Delphi !! ;-)   Davide DG

Non mi dire che anche tu... eh?
Eh gia' ! :)
L'economia insegna che l'inflazione porta alla svalutazione ! :))
Spero che adesso tu non ti senta peggio ;)


>Ciao, o Colleghi Esperti di Delphi !! ;-)   Davide DG
Ciao Collega esperto...ebbene si, anche io sono esperto! :)
Ciaooooooooo
--
- Carlo -

 wrote in message
vfb4mscugb9e3p2un...@4ax.com...


VI AMO !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
ANCHE NOI !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 


 wrote in message
12l4ms49vup0gb1cd...@4ax.com...


 In napoletano significa divertimento !!!!!
"E io che tengo anche un cuggino napoletano, so che 'pariare' significa
anche un'altra cosa...
quando il complemento oggetto è una ragazza.... :-) "
Ciao!! Davide DG

 wrote in message
8jubdh$9r2$1...@sirmdpsin16.inwind.it...


> Acca' simm' tutt' paesani... :=))))
ma un software gestionale tutto in napoletano no? o tradurre le risorse di
Delphi in stringhe in napoletano? :-)))
Ciao, Sandro

 wrote in message
7e0cPVn5$GA....@news1.galactica.it...


> Mai sentito parlare di " Scrivimm' "? E' il "write" in napoletano...
:=))))
frammento di codice di gestionale in delphi napoletano ;)
si pagato=0 allora scrivimm' ('sto sfaccimm' di cliente!');
Ciao! Sandro :-)

 wrote in message
CbuHiL25$GA...@news1.galactica.it...

Newsgroup: it.comp.lang.delphi
Titolo: Indici in CDS

Sto usando un ADOCDS con un database Access.
Le tabelle sono state create con access ed ho inserito vari indici. Ora a 
design pensavo di ritrovarli della proprieta' IndexName del CDS, invece non 
ci sono:
trovo solo ChangeIndex ed il Default.
Con AddIndex ottengo l'errore 'campo inesistente'.
Come vanno gestiti gli indici in un CDS?
Giorgio 

Giorgio Padoan ha scritto:

Gli indici che vengono aggiunti sono generalmente quelli predefiniti: 
sei tu a poter/dover definire ulteriori indici da utilizzare per 
l'ordinamento e ricerca (in memoria) dei record che sono presenti nel 
CDS. Non vengono aggiunti ulteriori indici poiché, occupando memoria, 
non è detto che lo sviluppatore sia intenzionato a sprecarla per indici 
che poi non utilizza.
Aggiungi gli indici manualmente al componente, indicando il nome del 
campo - o dei campi - che ne fanno parte.
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 ci sono:
Gli indici definiti su DB non vengono mappati sugli indici a run-time del
CDS.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio 
news:466970a5$1...@newsgate.x-privat.org...

Se inserisco il nome dell'indice nella proprieta' IndexName mi va' in 
errore, funziona invece se metto il nome in IndexFieldNames. Ti torna?
Giorgio 

 errore, funziona invece se metto il nome in IndexFieldNames. Ti torna?
Hai usato la proprietà /IndexDefs/ per definire gli indici? Come li hai 
configurati?
La proprietà /IndexName/ viene impostata al nome di uno degli indici? 
(il nome è definito dalla proprietà /Name/ sull'indice stesso)
Che tipo di errore ti viene restituito? (questa è un'informazione 
fondamentale, che non dovrebbe mai mancare)


Newsgroup: it.comp.lang.delphi
Titolo: Rilevare se un'estensione è registrata

Salve a tutti!!!
Ragazzi come faccio a rilevare se una particolare estensiose (*.xxx) è
registrata, ovvero è già associata a qualche programma?? (o meglio io vorrei
sapere se non è per niente registrata).
Si fa con qualche API o devo agire necessariamente sul Registry??? in
quest'ultimo caso come devo fare....????????
Grazie ragazzi per l'aiuto che di sicuro mi darete!!!
Ciao! :-))
de...@inwind.it

la seconda che hai deto, devi intervenire sul registro di configurazione. le
chiavi dovrei perň andarle a vedere, se le trovo ti scrivo
--
Davide - 
Gna...@wappi.com

 quest'ultimo caso come devo fare....????????
La FindExecutable fa proprio al caso tuo... (API di Win32)
Puoi anche rovistare nel Registry ma io sceglierei la prima strada (meno
codice, + manutenibile)
Ciao :-)
--
(¯`·.¸¸.·´¯`·.¸¸.-> Andrea <-.¸¸.·´¯`·.¸¸.·´¯)
AntiSpam: rimuovere il trattino basso dall'indirizzo per rispondere
AntiSpam: remove the underscore from the e-mail address to reply


Newsgroup: it.comp.lang.delphi
Titolo: [SetRange()] problema di visualizzazione





Un saluto a tutti,


in una mia applicazione ho un componente TDateEdit nel cui 
evento OnAcceptDate ho inserito un'istruzione


 


SetRangeStart;


....


SetRangeEnd;


...


ApplyRange;


Purtroppo ho riscontrato che la data inserita nel  
SetRangeEnd non viene visualizzata nella DBGrid ma viene considerato come ultimo 
il giorno precedente a quello inserito nel TDateEdit.


Come posso fare a risolvere questo problema?


 


Grazie 
anticipatamente. 
______________________________________
Andrea 
Cervi
webmaster - software developer
member of Italy Data - 
www.italydata.com
member of Developers 
Team - 
www.devteam.net
eml : 
a.c...@devteam.net



 Come posso fare a risolvere questo problema?
Cerca TTable.KeyExclusive nell'help.
-- 
Roberto Lupi

Newsgroup: it.comp.lang.delphi
Titolo: MS ACCESS

Ciao,
sono nuovo di delphi e volevo sapere come mia da SQL Explorer riesco a
collegarmi a un SQL server via odbc ma non riesco a collegarmi a un normale
file di access97 (ho delphi4 client-server), in piu' volevo sapere come
bypassare sqlexplorer per la gestione dei database... ovvero posso creare
una conn con il componente DATABASE direttamente a una sorgente??

Si.
Ma ti conviene sempre avere un ALias di BDE.
Lo crei con BdeAdMin e gli dici di puntare al tuo db Access.
Dopo, nel tuo codice, il componente TDataBase avra' come aliasName il nome
dell'alias di cui sopra.
Saluti.
AS
"Se è Microsoft non funziona"

Newsgroup: it.comp.lang.delphi
Titolo: Delphi e fax

Come faccio a permettere la ricezione dei fax nella mia applicazione?
.. e magari poi stamparli in una finta stampante che crea pdf??
E' una applicazione che gestisce il protocollo in ingresso e in uscita
secondo le norma ISO9000 e serve solo per il mio ufficio.
Il problema è convertire tutti i documenti in pdf..!
Mauro

 .. e magari poi stamparli in una finta stampante che crea pdf??
http://www.cs.wisc.edu/~ghost/gsview/
(da quelle parti)

.. e magari poi stamparli in una finta stampante che crea pdf??
La stampante virtuale che crea PDF ce l'hai con Adobe Acrobat.

La stampante virtuale che crea PDF ce l'hai con Adobe Acrobat.
Se il suo scopo e' di generare un pdf, forse potrebbe utilizzare uno dei 
tanti componenti che ci sono su torry, che acquistarsi Acrobat.
Ho capito giusto?
ciao
morde
Newsgroup: it.comp.lang.delphi
Titolo: aiuto registro

Come faccio ad aggiungere una voce al registro di windows?
e-mail:  
sab...@libero.it

Jacopo Sabbatini:
| Come faccio ad aggiungere una voce al registro di windows?
unit Registry...
var R:TRegistry;
...
 R:=TRegistry.Create;
 with R do begin
  RootKey:=HKEY_LOCAL_MACHINE;
  Result:=OpenKey('\cartella\del\registro\',TRUE);
  if Result then begin
   WriteString('Nuova chiave','valore');
   CloseKey;
  end;
  Free;
 end;
l'ho scopiazzato da un mio prg, ovviamente
dai un'occhiata anche all'help! :-)
Ciao!
Alan Solo

Newsgroup: it.comp.lang.delphi
Titolo: Link utili per uso parallela-seriale

Avete per caso qualche link utile dove trovare tutorials ed esempi di codice 
per utilizzo della seriale e parallela ?
Magari anche USB ?
Grazie infinite 

 ha scritto nel messaggio 
news:e9q9nl$gsn$1...@area.cu.mi.it...

Dovrebbe esserci un componente della ex turbopower che va bene per la 
seriale e parallela, ora credo inserito in sourceforge.
Giorgio 

cerca "turbopower" su 
sourceforge.net
 e troverai quello che ti serve
oltre ad altre suites molto carine.
A.
Newsgroup: it.comp.lang.delphi
Titolo: Spiegazione di un errore...

Se un mio programma fatto girare su altri pc causa questo erroe:
ERROR INITIALIZE BORLAND DATABASE ENGINE (ERROR $2109)
Cosa significa?

Cosa significa?
significa che se non hai portato anche il db e il runtime
del BDE non funzionerà mai :)
--
Lawrence Oluyede
rhy...@myself.com



Hai installato il BDE sugli altri PC ?
-- 
Andrea Laforgia (
walkie...@libero.it
)
"Usenet is a strange place" [Dennis Ritchie]

Ma allora questo significa che i miei programmi girano solamente nei
computer dove c'č installato il BDE??
Scusate ma sono alle prime armi, tanto che ci siete allora mi dite cosa non
bisognerebbe fare per fare causare questo errore?
Cioč nel senso cos'č che causa questo errore, l'utilizzo di database o
cos'altro?
Vorrei immaginarmelo cosě potrei sapere quali programmi posso e quali non
girare in pc senza DBE!

cos'altro?
l'errore è causato dalla non presenza del Borland Database
Engine sul pc in cui viene eseguita l'applicazione
--
Lawrence Oluyede
rhy...@myself.com

PARADOX

Quindi sulla sezione DOWNLOAD del sito 
www.borland.it
 dici che trovo il
BDE??

BDE??
www.borland.com
ps. cmq potresti dare un'occhiata e non chiedermi se lo
trovi...
--
Lawrence Oluyede
rhy...@myself.com

Quindi questo significa che sei io metto in rete un mio programma tutti
quelli che vogliono scaricarselo e fallo funzionare devono prima x forza
scaricarsi il BDE??



Il principio e' che se la tua applicazione usa il BDE, tutti
i PC su cui essa girera' devono essere forniti di BDE.
Visto che e' molto scomodo che un utente si installi il BDE
per conto proprio, e' previsto che InstallShield ti compia
l'installazione del BDE durante l'installazione
dell'applicazione (puo' anche definirti gli alias in
automatico).  


Grazie dell'esauriente risposta!!

Sto' procedendo come mi hai detto con l'install shield ma mi sono bloccato
xkè quando gli dico di immettere nell'installazione anceh il pacchetto del
BDE quando vado a fare un build mi ricerca un file di nome:
DATAPUMP.EXE, cos'è? Dove si trova che nel mio hard disk non c'è?
Dove lo posso trovare?
Newsgroup: it.comp.lang.delphi
Titolo: GetProcAddress come può funzionare

Ma come fa la GetProcAddress a funzionare con funzioni tipo OpenPrinter in
cui devi passare dei parametri????
BOOL OpenPrinter(
    LPTSTR pPrinterName, // pointer to printer or server name
    LPHANDLE phPrinter, // pointer to printer or server handle
    LPPRINTER_DEFAULTS pDefault  // pointer to printer defaults structure
   );


Scusa ma qual è il problema ??? Hai ricevuto la mia risposta via email ??
Non capisco la domanda di questo thread ... :((
A meno che a te non interessi l'intimo funzionamento della GetProcAddress...
e quindi la struttura
di una dll... ?
Ciao, Davide DG

Newsgroup: it.comp.lang.delphi
Titolo: usare rave per stampa su etichette

Salve al gruppo,
nessuno di voi a mai usato rave per stampare su etichette pretagliate di 
piccole dimensioni (3x1 cm) ?
Omega

Omega wrote:

Per stampare le etichette
penso che ti convenga utilizzare
il TLabelShell
Cordialmente,
Stefano

Newsgroup: it.comp.lang.delphi
Titolo: Apprendimento database

Ciao sono un neofita della programmazione e voglio imparare ad usare e
programmare i database. Potreste darmi qualche consiglio?

>Ciao sono un neofita della programmazione e voglio imparare ad usare e
programmare i database. Potreste darmi qualche consiglio?
Ci sono dei testi specifici che parlano del modello relazionale dal punto di
vista matematico.
Per la cronaca, il modello relazionale e'il modello piu' utilizzato
attualmente per la gestione dei database.
Senza voler scendere troppo in dettagli teorici, inizierei dalla guida in
linea di delphi. In D4CS l'help spiega bene i concetti base. Poi, se uno non
ci sbatte la testa facendo un po' di prove, non imparera' nulla.
Saluti
AS

Qualche testo delle scuole superiori di informatica generale e/o gestionale
puo' andare bene per cominciare a studiare. Poi la pratica verra' di seguito
Ciao,Sandr

Newsgroup: it.comp.lang.delphi
Titolo: Confronto di caratteri

Salve a tutti.
Ho un problema con i confronti tra caratteri.
Come faccio a sapere se un carettere è uguale a:  '  ?
con  if car=''' non mi funziona dicendomi : Unterminated string
Come posso fare?
Ciao.

 Ciao.
Ciao, Anto.

 > Come faccio a sapere se un carettere č uguale a:  '  ?


Fai cosi':
If car = #39 then...
Bye,
David
--
Risorse per Webmaster:       
www.utilityweb.net
Gruppo di ricerca ufologico:  
www.findout.it
Guadagnare con email:        
www.intelliad.com/?20313316
Newsgroup: it.comp.lang.delphi
Titolo: Database in rete

Ciao a tutti.
Ho un programma semplicissimo che deve essere
utilizzato da due computer diversi.
Che database mi consigliate di utilizzare.
Tale programma è basato su una sola tabella,
molto sempliciotta solo per tenere una rubrica
telefonica, quindi inutile scomodare DATABASE
giganti e importanti per fare una cosa del genere.
Posso usare paradox in rete?
Io per interfacciarmi ai database uso ADO.

 Posso usare paradox in rete?
Si, ma vedi sopra
Ciao Daniele

 ha scritto nel messaggio
news:c1f120$1gcfli$2...@ID-123585.news.uni-berlin.de...


 Sul sito non sono riuscito a vedere se è freeware.
www.firebirdsql.org
è open source :-)
Ciao

 ha scritto nel messaggio
news:c1f243$1gcfli$3...@ID-123585.news.uni-berlin.de...


 
Se vuoi ti permette di farlo
Ciao Daniele

Newsgroup: it.comp.lang.delphi
Titolo: Informazioni di debug nel .exe?

Ciao a tutti,
è un po' che ho questo dubbio: compilando un SW anche piccolo scritto
in Delphi con l'uso delle JEDI JVCL, ho notato che la differenza di
dimensione tra il prg. compilato con le info di debug e senza è di
meno di 50KB.
E' normale? Esiste qualche programma della suite D2007 che mi verifica
la presenza di info di debug (magari nelle librerie usate) e/o elimina
tali info dall'EXE?
Un tempo con Turbo Pascal una cosa del genere esisteva.
Grazie,
Gp

 tali info dall'EXE?
Con Delphi 2007 non saprei dirti, ma con FPC puoi eliminare i simboli 
attivando lo stripping con -Xs; sotto linux (ma anche sotto windows) 
puoi eliminare le informazioni di debug anche usando: strip --all 
file_eseguibile.
Credo che con Delphi anche esista qualcosa del genere.
Antonio

 file_eseguibile.
Grazie per le info. Ho provato a cercare qualcosa su Delphi, ma non ho
trovato nulla. Qualcuno sa qualcosa su Delphi?
Tnx
Gp

 tali info dall'EXE?
Dalle opzioni del progetto (Project|Options) puoi modificare le 
impostazioni relative alle informazioni di debug (vedi le schede 
"Compiling" e "Linking").
Consulta la Guida in linea per maggiori informazioni.
A partire da D2007 puoi anche creare profili di configurazione specifici 
senza l'ausilio di tool esterni (ad esempio, un profilo con le opzioni 
di base e due profili, "Debug" e "Release", per le specifiche attivit� 
di debugging e rilascio).
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

 di debugging e rilascio).
Lo so, grazie. Ma la mia domanda era un'altra: come faccio a
verificare che non ci siano info di debug?
Lo chiedo perché ho il sospetto che alcune lib. che uso abbiano info
di debug dentro.
Io cerco un pogramma tipo quelle messo a disposizione da Borland con
il vecchio TurboPascal che STRIPPAVA tutte le info di debug da
un .EXE.
Secondo me c'e' qualcosa tra gli eseguibili a command-line di D2007,
ma io non sono riuscito a trovarlo.
Gp

 di debug dentro.
Se si tratta di librerie DLL vere e proprie, non sono sicuro che tu 
possa "estirpare" le informazioni di debug all'interno.
Se si tratta di unit Pascal che vengono incorporate all'interno 
dell'eseguibile, o di package che puoi materialmente ricompilare, vale 
quanto detto nel precedente messaggio.

Newsgroup: it.comp.lang.delphi
Titolo: Random listbox

Ho un listbox che carica delle stringhe da un txt.
Come faccio a fargliele visualizzare in ordine casuale?

while not eof do
begin
  leggi stringa
  ListBox.Items.Insert( Random(qualcosa), stringa
  Next;
end;
Bye
AS

 wrote in message
news:aau89t$1atg$
2...@newsreader1.mclink.it

Non trovo corretto questo codice a livello logico.
Innanzitutto bisogna capire bene che si intende per "qualcosa".
Non e' possibile inserire stringhe "a casaccio" in una listbox,
perche' bisogna rispettarne i limiti.  Quindi, quel *qualcosa*
deve sempre essere il numero massimo di elementi correntemente 
presenti.  Ma questo introduce un altro inconveniente: la scarsa
casualita' della lista risultante, almeno tra i primi elementi.
Le prime stringhe del file sono molto vicine tra loro nella lista
risultante.
Piu' saggio sarebbe, quindi, costruire una prima lista e da essa
ottenerne una seconda, discriminando le righe da inserire in modo 
casuale. Successivamente distruggere la prima.
procedure TForm1.Button1Click(Sender: TObject);
var
  OrderedList: TStringList;
  RandomList: TStringList;
  Max, Idx: Integer;
begin
  Randomize;
  OrderedList := TStringList.Create;
  RandomList := TStringList.Create;
  try
    OrderedList.LoadFromFile('myfile.txt');
    Max := OrderedList.Count;
    while Max > 0 do
    begin
      Idx := Random(Max);
      RandomList.Add(OrderedList.Strings[Idx]);
      OrderedList.Delete(Idx);
      Max := OrderedList.Count;
    end;
    Memo1.Lines.AddStrings(RandomList);
  finally
    if Assigned(OrderedList) then
      OrderedList.Free;
    if Assigned(RandomList) then
      RandomList.Free;
  end;
end;
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Prima carichi tutte le stringhe dal file tramite la LoadFromFile.
Poi generi N coppie di numeri casuali (che rappresenteranno coppie di
indici) e per ogni coppia utilizzi il metodo Exchange che esegue lo swap
degli elementi corrispondenti ai due indici.
Il valore di N varia a tuo piacere, in relazione al numero di scambi che
vuoi effettuare.
Ciao.
Gianluca
Newsgroup: it.comp.lang.delphi
Titolo: Per delphi

Ciao, una volta ho sentito dire che c'erano delle librerie per cambiare i
messaggi di delphi dall'Inglese in  Italiano,  sapete darmi una dritta in
merito?. grazie 1000

Ci sono diversi metodi per cambiare i messaggi di delphi dall'inglese
all'italiano: la prima funziona solo da D4 in poi, la seconda solo se
hai i sorgenti delle VCL
1. una volta compilato il progetto, File/New...
InternationalDllWizard.
Crea ed apre un progetto di DLL con tutte le stringhe del progetto
(purchè -credo- siano in qualche resourcestring) e tutte le form
(comprese quelle "automatiche" usate per il login e la password).
A questo punto _basta_ armarsi di pazienza e:
a) Tradurre tutte le stringhe che servono (contenute in prjstrs.rc)
ed editare le form
b) Cancellare il file prjstrs.res e ricompilare prjstrs.rc con
brcc32.
c) Compilare la DLL (dall'ide).
La dll risultante (con estensione ITA) va copiata nella directory
dell'eseguibile ed il gioco è fatto.
2. invece in questo caso dovresti tradurti tutti i messaggi presenti nei
sorgenti, ricompilarli e rimetterli in \Lib
Scegli un po' te cosa preferisci ...   :)


Newsgroup: it.comp.lang.delphi
Titolo: Imporre una lookup

Salve
ho fatto una DBGrid con una lookup, problema:
data una tabella 
CODICE DESCRIZIONE
cod1       descrizione1
cod2       descrizione2
con CODICE nella lookup
se seleziono il CODICE col mouse funziona.
ma se lo impongo dall'esterno tipo
DBGRID1.fileds[0].asString:='cod2';
nella cella si scrive 'cod2' ma non ha gli stessi effeti di quando lo
scelgo col mouse: DESCRIZIONE diventa descrizione1 e poi si cancella.
Come faccio ad imporre una lookup dall'esterno con gli stessi effetti
di quando premo il mouse ?
GRAZIE 1000
faf...@tiscalinet.it

Premesso che trovo estremamente scomodi gli edit sulle dbgrid....
Spero x te che la tabella di lookup non abbia troppi records 
altrimenti mentre si apre la lista fai in tempo a scendere a prendere
un caffè....! :))
Comunque, invece di:
DBGRID1.fileds[0].asString:='cod2';
prova:
DBGRID1.DATASOURCE.DATASET.FIELDS[0].asString := 'cod2';
Saluti
AS
-- 
Posted from 
ammi.mclink.it
 [195.110.128.1] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.lang.delphi
Titolo: BDE-PARADOX creazione indici secondari via codice

ciao a tutti, dovrei creare via codice a runtime un indice secondario ad una
tabella paradox, manualmente con database desktop andando nel restructure e
poi aggiungendo un secondary index riesco tranquillamente, via codice come
posso fare??
Simone

 ad una tabella paradox, <SNIP> via codice come posso fare??
TTable.AddIndex ?
HTH
--
Andrea /\/\agni
ICQ#: 174108000
Newsgroup: it.comp.lang.delphi
Titolo: BDE vs ADO

Capisco perfettamente che ormai è ora di passare ad ADO
ma facendo dei test ho riscontrato che eseguendo un query
con il BDE e lo stesso query con ADO mi risulta che il primo
sia più veloce.
Ho provato solo con una SELECT.
Voi che ne dite?

 sia più veloce.
Ma non dici con quale db ne quale ole db provider usi: sii + preciso.
Bye
AS

 ha scritto nel messaggio
news:ae1jad$173p$2...@newsreader1.mclink.it...


Se usi ADO ti serve un Oledb provider specifico per il db che usi x ottenere
il massimo delle performance.
Se usi come provider ado quello legato ai driver odbc, sarà lento.
Conviene procurarsi un ole db provider x db2.
Oppure se hai d6e, potresti provare il dbexpress.
Riguardo il dbase4 credo che il bde sia la scelta ottimale.
Se poi vuoi un qualcosa che vada bene per entrambi, credo avrai problemi x
le differenze intrinseche tra i 2 db.
Db2 è un client/server
Dbase è un FILE server
BaiBai
AS

Newsgroup: it.comp.lang.delphi
Titolo: Simulare Click in una DBWebGrid...

Salve amici!
Ho una dbwebgrid, e una delle colonne è definita come "PushButton".
Vorrei simulare il click su uno dei bottoni (ad esempio nella colonna "ugo"
la quinta riga).
Ho messo un tasto fuori dalla grid,ma cosa devo mettere nell'evento del
click di questo bottone?!?!
Grazie per il cortese aiuto!

 click di questo bottone?!?!
Provo a buttarla lì...dovresti esaminare il sorgente della pagina 
restituita (che contiene HTML e codice JavaScript); individua la parte 
relativa al pulsante di tuo interesse ed esamina i parametri usati nel 
chiamare lo script di "PostBack" e iniettali lato client anche per il 
tuo pulsante.
Forse sarebbe più semplice gestire tutto lato server richiamando lo 
stesso evento generato dai singoli "PushButton" all'interno del codice 
/OnClick/ del pulsante estraneo, passando valori corretti per gli 
argomenti come se fosse stato effettivamente premuto uno dei pulsanti 
appartenenti alla griglia.
Fai qualche prova, poi mi saprai dire com'è andata... ;-)
Ciao! :-)
-- 
Marco «Alka» Breveglieri
  (marco [@] abls [.] it)
  ABLS Team S.n.c. - Software & Web
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

Dopo aver trovato le coordinate del "PushButton" ( .ClientToScreen) puoi
simulare il Click usando le API di windows.
giorgio
"Marco Breveglieri" <ma...@NO.SPAM> ha scritto nel messaggio
news:93bKd.461952$b5.21...@news3.tin.it...


 simulare il Click usando le API di windows.
Sono un po' confuso...come fanno a subentrare le API di Windows in 
questo contesto?
mumble...mumble... :-)


Bho!

Newsgroup: it.comp.lang.delphi
Titolo: 2 domande sul TOpenDialog

C'è un metodo del TOpenDialog che restituisca solo il nome del file scelto e
non tutto il suo percorso?? Non riesco a trovarlo...
(Ad es. "Pippo.txt" invece di "c:\Documenti\Pippo.txt").
Ed esiste anche un metodo che restituisce solo l'estensione del file scelto?
GRAZIE CIAO!!!!!!

 C'č un metodo del TOpenDialog che restituisca solo il nome del file scelto


 GRAZIE CIAO!!!!!!
Ciao, Antň.
Newsgroup: it.comp.lang.delphi
Titolo: ###  #  # ###

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



Matteo Taverna ha scritto:
<cut>
Credo sia ora di contattare l'abuse del buon Cantų.  Chi lo fa ?
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Tu ?


 Credo sia ora di contattare l'abuse del buon Cantų.  Chi lo fa ?
Giā fatto da un po'... :-)
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
     Non hai la possibilitā di scaricare Turbo Delphi Explorer?
     Te lo spedisco io!! [
http://www.marco.breveglieri.name/?p=48
]

Arriva l'altra testa di cazzo a ruota !


 Arriva l'altra testa di cazzo a ruota !
Yawn... che noia... avrete notato che normalmente non vi rispondo ma 
questa volta proprio non ce l'ho fatta: non ho resistito ad esprimervi 
quanto siete poco "incisivi" in qualità di troll.
La fantasia certo...vi manca. :-)
Non capisco come possiate pensare di poter offendere qualcuno, 
seriamente intendo.
Devo ammetterlo: dare del "troll" a voi è offendere chi è un "troll" per 
davvero. :-D
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
     Non hai la possibilità di scaricare Turbo Delphi Explorer?


 davvero. :-D
Accidenti, hai ragione.  Quasi quasi mi travesto da troll e gli faccio
vedere come si fa :-D


 La fantasia certo...vi manca. :-)
qua siamo a livello da ricovero
-- 
Mauro Falzari
"Un unico giorno abbraccia la vita della rosa,
in un istante essa unisce gioventù e vecchiaia".
  (Decimo Magno Ausonio, sec. IV)
Newsgroup: it.comp.lang.delphi
Titolo: in delphi funziona ma compilato no?

ciao a tutti
sapreste dirmi cosa sto sbagliando?
questo programmino fatto partire da delphi funziona,
se invece lo compilo e faccio partire direttamente l'eseguibile no!
lo copio&incollo, tanto e' corto, spero non si offenda nessuno...
grazie,
d.
unit Unit1;
interface
uses
  Windows,
  shellAPI,
  ExtCtrls,
  StdCtrls,
  Controls,
  Classes,
  forms,
  sysutils;
type
  TForm1 = class(TForm)
    Button1: TButton;
    EdHandle: TEdit;
    EdCaption: TEdit;
    EdClass: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Timer1: TTimer;
    procedure getinfo(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  end;
var
  Form1: TForm1;
  running : boolean;
  doit:boolean;
implementation
{$R *.DFM}
procedure TForm1.getinfo(Sender: TObject);
var apoint:tpoint;
    ahwnd: hwnd;
    pippo : pchar;
begin
 if not doit then exit;
 if running then exit;
 running:=true;
 pippo:='                                                            ';
 getcursorpos(apoint);
 AHwnd := WindowFromPoint(APoint);
 if ahwnd<>0 then
   begin
     Edhandle.text:=inttohex(ahwnd,4);
     if getclassname(ahwnd, pippo, 128) <> 0
        then EdClass.text:=pippo
        else Edclass.text:='boh? '+inttostr(getlasterror);
     if getwindowtext(ahwnd, pippo, 128) <> 0
        then EdCaption.text:=pippo
        else EdCaption.text:='';
   end;
 pippo:='';
 running:=false;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
 running:=false;
 doit:=false;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
 doit:=not doit;
end;
end.

 if getclassname(ahwnd, pippo, 128) <> 0
Puoi risolvere o con GetMem (Pippo, 128+1)
o direttamente con un bel var Pippo : array[0..255] of char;
Il perchè in delphi funzioni ... penso sia perchè delphi è un figo :PP
Ciao, Davide DG.

 Ciao, Davide DG.
ciao,
d

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

Ciao a tutti!
Avrei una domanda da porvi.
Sto sviluppando una piccola procedura in Delphi5 ed ho necessità di
copiare dei file da una directory ad un altra.
Questi file hanno tutti lo stesso nome ma estensione diversa.
Ho provato a fare una cosa di questo tipo:
fileSource := PercorsoSorgente + NomeFile + '.*';
fileDest := PercorsoDestinazione;
CopyFile(PChar(fileSource), PChar(fileDest), nil);
Però non ottengo quello che voglio perchè deve essere specificata per
forza l'estensione.
Come faccio a prenderli tutti??
Ciao
Stefano M.

 Come faccio a prenderli tutti??
SHFileOperation
Guarda gli ultimi messaggi nel ng.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 
Perfetto!
Grazie!
Ciao
Newsgroup: it.comp.lang.delphi
Titolo: Info

E' possibile creare applicazioni (pagine) HTML in delphi 5 ?

>E' possibile creare applicazioni (pagine) HTML in delphi 5 ?
beh dipende da cosa intendi di preciso.. le pagine html sono file di testo,
quindi le puoi facilmente creare con ogni linguaggio, anche delphi. Poi le
puoi anche uploadare..
non so se intendevi questo.. :)
Ciao !

Non intendevo creare dei file di testo, ma crare delle form che si possono
visualizzare sul web! Capito cosa intendo?
Grazie

Newsgroup: it.comp.lang.delphi
Titolo: Icone per Delphi!

ciao,
qualcuno sa dove posso trovare delle icone da inserire nei button e in
oggetti simili?
ho cancellato la precedente versione di Delphi e la 4 non li ha sul CD.
grazie, ciao!!!:o)


forse non ho capito cosa cerchi.. ma credo che tu le abbia qui:
C:\Programmi\File comuni\Borland Shared\Images\Buttons
ciao
buio

> C:\Programmi\File comuni\Borland Shared\Images\Buttons
ma se ha detto che le ha cancellate.
--
Gna...@Wappi.com
bmq...@tin.it
ICQ# 76488613
http://gnaffy.tripod.com/

"Alessia":
| qualcuno sa dove posso trovare delle icone da inserire nei button e in
| oggetti simili?
| ho cancellato la precedente versione di Delphi e la 4 non li ha sul CD.
| grazie, ciao!!!:o)
girando senza meta nella Rete ho trovato questo:
http://www.eldos.org/download-dev.html#icons
(cmq, anche il 4 ha le icone...)
Ciao,
Alan Solo

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

Ciao a tutti,
ho un problema con ShellExecute: lo uso per aprire una pagina HTML in 
locale che viene creata dal programma stesso.
Il problema è che alcune (la maggior parte delle) volte funziona e altre 
no. Nei casi in cui non funziona ho notato che se non c'è nessun browser 
aperto non succede niente, ma se c'è viene aperta una nuova scheda con 
la pagina da visualizzare.
Avete idea di cosa comporti questo funzionamento o almeno dirmi come 
fare per effettuare un debug sulla chiamata alla funzione per capire 
cosa non funziona?
Grazie
Daniele

 
Ok, ho risolto.
Insomma, non ho ancora capito perché non funzionasse, ma ho fatto così:
la stringa originale era
ShellExecute(0, PAnsiChar('open'), PAnsiChar(tmp_dir+'temp.htm'), 
PAnsiChar(''), PAnsiChar(''), SW_SHOW);
e l'ho modificata togliendo la parola "open" dal secondo parametro.
Adesso esegue l'operazione di default (che è la open) invece 
dell'operazione specificata.
Quando era specificata però non dava nessun errore e la shell tornava 
codice 33 (quindi esecuzione corretta), semplicemente non veniva aperta 
nessuna finestra.
Se qualcuno sa spiegare cos'è successo ne sarei felice...
Daniele
Newsgroup: it.comp.lang.delphi
Titolo: capienza di un TMemo

ciao a tutti, ho sviluppato una routine di creazione file riba, per salvarlo
utilizzo un memo in cui accodo le righe per poi eseguire un
lines.savetofile()... il mio problema č che su sistemi operativi win98
quando le righe sono tante (per tante non posso quantificare ma credo oltre
100) mi tronca questo file, mentre su winxp, 2k non mi da problemi.... č
normale??
Simone

 problemi.... è normale??
Direttamente dall'help di Delphi:
- TMemo is a wrapper for a Windows multiline edit control.
- Note:	Under Win 9x, there is a limit of 64k of text for this control.
Di conseguenza dovresti usare un TRichEdit oppure un altro componente
che supera le limitazioni dei controlli di Windows. Su torry ne trovi
molti.
Ciao
Antonio

 ha scritto nel messaggio
news:A2CFa.73066$pR3.1...@news1.tin.it...


 Simone
-- 
Ciao, Anto', [35, 143, AQ] 
MB C SC 220 CDI Magma Red
"Di sempre cio' che senti
 e fai cio' che pensi."
	G. Garcìa Màrquez

 ha scritto nel messaggio
news:Xns9397999BAD9DCan...@195.31.190.132...


 salvare il tutto in foprmato ascii puro.   
La proprietà Lines del TRichEdit è una TStrings nella dichiarazione.
Per cui avresti potuto fare semplicemente:
Memo1.Lines.Assign(RichEdit1.Lines);
oppure assegnarla ad una qualsiasi altra stringlist.
Ciao
Antonio

 Antonio

Newsgroup: it.comp.lang.delphi
Titolo: campi DateTimePicker con data automatica

Ciao a tutti, ho il seguente problema: in una form ho due capmi di tipo
DateTimePiker e vorrei che ogni volta che apro la form venga inserita in
uno di questi campi la data corrispondente al primo giorno del mese
corrente, mentre nell'altro la data dell'ultimo giorno del mese corrente.
In questo modo con ad ogni  mese nuovo, quando aprirò la form, avrò sempre
le date aggiornate dal primo all'ultimo giorno del mese corrente.
Grazie a tutti.
---------------------------------------------------------------------------
Messaggio inviato attraverso 
http://www.trucchiperpc.it
 - sezione newsgroup


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

Ciao Marco,
EncodeDate(...) e DecodeDate(...) sono le funzioni che fanno al caso tuo.
All'avvio del tuo programma, recuperi la data odierna (Date) e tramite le
funzioni
di cui sopra le manipoli a dovere.
Saluti,
Carmine

 Ciao!
Ho delphi 6, come posso fare?


 Ho delphi 6, come posso fare?
Usi l'istruzione DecodeDate per scomporre la data nei suoi componenti di
giorno, mese, anno e li riunisci utilizzando la EncodeDate, ponendo
attenzione di impostare il giorno rispettivamente a 1 per l'inizio del
mese e a 28/30/31 a seconda dei casi per la fine del mese.
Se non vuoi costruirti un vettore col numero di giorni per ogni mese per
determinare l'ultimo giorno, potresti anche agire cosě: trovi il primo
giorno del mese successivo e, da quella data, togli un giorno.
Tuttavia, io suggerirei di costruire il vettore; ricordati degli anni
bisestili da controllare!


 Ho delphi 6, come posso fare?
E' uguale: la DateUtils esiste anche in Delphi 6.0.
Ciao.
Gianluca.

 Gianluca.
Grazie e tutti, ho trovato la DateUtils e con le funzioni StartOfTheMonth
e EndOfTheMonth funziona a dovere e non ho neanche tribolato più di tanto!!

Newsgroup: it.comp.lang.delphi
Titolo: Velocità di compilazione programmi Delphi

Ciao a tutti
Piu' che un problema è una curiosità........
Esiste un modo (o qualche accorgimento da prendere) per velocizzare la
compilazione dei progetti Delphi ? La non eccessiva velocità di compilazione
è l'unico difetto che ho riscontrato in questo ambiente di sviluppo. Per il
resto è eccezionale.
Mi spiego meglio, a volte capita di fare dei paragoni con progetti VB (sigh
!!!!! purtroppo lo devo usare a malincuore ma preferisco il Delphi) e noto
la grandissima velocità nell'esecuzione di  un programma dall'IDE. Lo so, mi
direte che per il VB non  compilazione allo stato puro ma a volte la
maggiore lentezza del Delphi mi da la tentazione di sviluppare
un'applicazione in VB (quando ho la possibilità di scelta). Ma io non voglio
assolutamente che le mie scelte ricadano sul VB per questo motivo chiedo a
voi se c'è un accorgimento da prendere per la compilazione in Delphi che mi
faccia risparmiare tempo ogni volta che compilo ed eseguo.
Grazie anticipatamente per la risposta.
Ciao

 un'applicazione in VB (quando ho la possibilità di scelta).
Nessun programmatore serio considererebbe la scelta di un linguaggio
o di un altro in base alla velocita' di traduzione del suo compilatore.
E' un fattore importante, ma tutt'altro che determinante.
Se quello che dici fosse pretesto sufficiente per scegliere l'uno
o l'altro linguaggio, nessuno, oggi, programmerebbe in C++.
Concentrati su aspetti piu' seri se vuoi realmente scegliere.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


...e oltretutto il compilatore Borland non č niente male...

Meglio un eseguibile CORRETTO che uno...


 ...e oltretutto il compilatore Borland non č niente male...
Si', ma sai, con una velocita' di *appena* 4 milioni di linee al 
minuto, effettivamente, fa propendere per il Visual Basic...


 minuto, effettivamente, fa propendere per il Visual Basic...
che praticamente non le compila ;-)

6 fuori?
Bye
AS

Newsgroup: it.comp.lang.delphi
Titolo: Re: Client di posta

 riesco a scaricare solo messaggi solo text e html
cosa vuol dire che non riesci?
-- 
Lis
Mercatino: 
http://snurl.com/sito_lis
FAQ di it.comp.lang.delphi: 
http://snipurl.com/faq_icld
"Sèmm al muund in düü e vöen me sta söi bàll", DVDS

 
che quando scarico il messaggio è scopro che è multipart.
sul programma che ho creato non visualizza niete diciamo una pagina 
vuota per capirci

 vuota per capirci
Prova a rileggere questo tuo messaggio e rifletti: come può esserti di aiuto
chi non sa come è fatto il tuo programma? Che istruzioni hai usato, che
componenti...insomma, specifica meglio!!!
Mi sembra di sentire gli utenti quando ti dicono che un programma non
funziona...ma volo, volete specificare cosa fate e come le fate? Che
abbiamo, la palla di vetro?


 
allora io sto lavorando per la creazione di un client di posta in delphi 
7 sto usando i componenti indy quindi (idpop3,idsmtp,idmessage)
ma non riesco a scaricare i messaggi multipart,


)

 riesco a scaricare solo messaggi solo text e html
Oltre a quanto ti ha suggerito Marco, quello che intendo io è proprio di
farci vedere proprio la parte di codice con cui scarichi la mail e la
visualizzi.
Eventualmente sui newgroups di indy (
news.atozedsoftware.com
, senza user e
password) sapranno anche essere più precisi di noi


 riesco a scaricare solo messaggi solo text e html
hai gia dato un occhio alla property MessageParts?
A
Newsgroup: it.comp.lang.delphi
Titolo: Argomento "generico"

Salve.
Data la funzione
Function MyFunction(var VarIn) : integer;
    Begin
    result:= (SizeOf(VarIn) + 174);
    End;
visto che SizeOf accetta come argomento ogli tuipo di variabile, come
trasferire questa genericità all'argomento della funzione che la richiama?
Il codice precedente non da errori di compilazione, ma se passo alla
funzione un record come argomento dà risultati errati.
Grazie.
         BedBaol

 Data la funzione


Non e' bello rispondere ad una domanda con un'altra domanda,
ma ti chiedo: perche' hai bisogno di questo?
Non mi sembra il tuo codice molto "bello", usabile e sicuro. Se hai bisogno
di una funzione "generica" per tipi diversi vedi la direttiva overload.
Ciao
ACSH
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Era solo un esempio.
La funzione serve per calcolare il numero di record per un block-transfer.
La sintassi esatta č:
result:= Trunc(SizeOf(VarIn)/128 + 1)
Una palla ripeterlo ogni volta, tenendo conto che il mio programma esegue il
block-tranfer su file di centinaia di record differenti...
Comunque, grazie per la risposta.
      BedBaol

 Una palla ripeterlo ogni volta, tenendo conto che il mio programma esegue >
il block-tranfer su file di centinaia di record differenti...
Si', ma cosi' devi ripetere centinaia di volte la chiamata a MyFunction():
cosa ti cambia? 
Oggi sono parecchio assonnato, lo ammetto, ma non capisco il tuo problema:
Function DimensioneRecord(const intRecDim: Integer): Integer;
begin
 result:= Trunc(intRecDim/128 + 1)
end;
e la richiami nel codice cosi' 
variabile := DimensioneRecord(SizeOf(tuoRecord));
O mi perdo qualcosa?
Ciao.

Newsgroup: it.comp.lang.delphi
Titolo: Impedire la funzionalità del tasto Stamp Print Screen

C'è un sistema per evitare la copiatura delle schermate dell'applicativo 
come inibire il tasto Stamp Print Screen o l'uso di programmi tipo Snagit? 
Thanks
St 

un hook di tastiera?
A.

 come inibire il tasto Stamp Print Screen o l'uso di programmi tipo Snagit? 
Non penso che esista un metodo in grado di bloccare qualsiasi software 
in grado di catturare una schermata video.
A mio avviso, se la richiesta proviene dall'esigenza di tutelare un 
copyright applicato ad immagini mostrate nell'applicativo, meglio 
sfruttare altri mezzi come, ad esempio, una "filigrana", ammesso che sia 
possibile farlo (non so quale tipo di applicazione stai realizzando).
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)

cerca info su questo ramo del registro
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Keyboard Layout
considera pero che le impostazioni che fai in questa sezione si riperquotono
su tutto il sistema e non impediscono ad un'applicazione di aprire l'handle
dalla root-window dello schermo e copiarsi il contenuto
Bye,
Raktzo

 come inibire il tasto Stamp Print Screen o l'uso di programmi tipo Snagit?
Se cerchi di proteggere le tue schermate non perdere tempo perchè è
impossibile, anche inibendo il tasto print screen ci sarà sempre un
programma che scansiona il video e ne copia la bitmap da qualche parte.
Inoltre, se proprio vogliamo dirla tutta, io posso anche fotografare con
una digitale il monitor nel momento che mi interessa di più (escamotage per
catturare schermate non windows quale o.s. boot, eula di installazione
winzozz, ecc..)
Ciao
-- 
Morde. 
ICLDweb: 
http://www2.samatel.com/icld/
Newsgroup: it.comp.lang.delphi
Titolo: Invalid variant type conversion

Nel passaggio da Delphi6 a Delphi7 eseguendo il programma si genera questo
errore:
EVariantTypeCastError with message 'Could not convert variant of type (null)
into Type (string)'
Qualcuno puň aiutarmi??
Grazie
J
--------------------------------
Inviato via 
http://usenet.libero.it

E la riga che genera l'errore ce la immaginiamo?
In telepatia veritas.
A.

Il problema è che non riesco a capire dove viene generato l'errore!


Il problema è che non si riesce a capire dove viene generato l'errore!


metti dei breakpoint nei punti in chi richiami vartostr
Bye
A.

 ha scritto nel messaggio
news:213Z45Z35Z170Y1...@usenet.libero.it...

Newsgroup: it.comp.lang.delphi
Titolo: [Intraweb] Esperienze di pubblicazione

Ciao a tutti,
sto facendo delle prove con Intraweb vers 7.x e ho notato con il task 
manager un leggero memory leak. Inoltre dovendo sviluppare una 
applicazione per un cliente abbiamo dato una piccola demo al suo 
provider che voleva testare l'applicazione dato che era scettico. Il 
provider ci ha risposto che con win 2000 server l'applicazione ha dato 
seri problemi limitando l'accesso ai siti (circa 20) pubblicati su IIS e 
addirittura la macchina è andat in crash, con win 2003 server le cose 
sono andate meglio ma ci hanno consigliato di sviluppare con 
ASP.NET
 
dato che anche su questa macchina sono pubblicati diversi siti e temono 
crash improvvisi.
Qualcuno ha esperienze in merito? 
Grazie per le risposte
--- posted by geoForum on 
http://www.delphiedintorni.it

 Grazie per le risposte
ciao
   gabriele

    gabriele
Andrea

 Qualcuno ha esperienze in merito? 
Intraweb è una gran schifezza, se puoi accetta il consiglio.  Sono
sinceramente convinto che abbia ancora molti bug.  E' strano comunque che
sotto Win2003 abbia funzionato.  Le ultime che io avevo è che sotto questo
sistema IW non va, a meno di non impostare il web server con la
compatibilità a IIS 5.0.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Spiego meglio la situazione dato che mi sono accorto di aver tralasciato 
alcuni particolari che sicuramente non cambieranno la vostra opinione:
l'applicazione IW è stata testata in modalità standalone che sarebbe la
modalità definitiva magari come servizio, questo perchè il provider ci ha
negato la possibilita di eseguire dll isapi e fanno uno sforzo ad 
accettare
una applicazione standalone con conseguente apertura di una porta, ecc.
Dalle prove fatte dal provider non da me (ma mi devo fidare) 
l'applicazione
occupava sempre più risorse di sistema, la qualcosa l'avevo notata 
anch'io
con delle semplici prove sul mio pc e che non è ben documentata anzi per
niente da Atozed e sui newsgroup viene trattata con bei giri di parole ma
senza una soluzione.
La mia demo consisteva in due IwForm e nella session unit ho messo una
ADOConnection e tre ADODataset che vengono chiusi alla chiusura della
sessione e che essendo della sessione stessa immagino vengano distrutti 
con
la sessione.
Il fatto strano è che con W2003 ci sono stati meno problemi che con 
W2000 forse proprio per l'utilizzo di ADO che su 2003 è più aggiornato.
Ma date le risposte evasive e non tecniche del provider o credi nelle 
tue scelte rischiando che fra X tempo ti dicano che l'applicazione è 
dannosa al sistema anche se magari il problema è dovuto ad altro, tipo 
un mal configurazione del sistema stesso, o ti affidi ad altro nel 
nostro caso proverò 
ASP.NET
 con D2005 e se qualcosa non va la
colpa non è della nostra applicazione.
Cosa ne pensate di 
ASP.NET
 con D2005.




--- posted by geoForum on 
http://www.delphiedintorni.it
Newsgroup: it.comp.lang.delphi
Titolo: Help per shutdown in windows NT

Qualcuno potrebbe gentilmente aiutarmi a settare le migliardi di api per
fare lo spegnimento del pc??
grazie all'anima pia ; P

Presa non so piu' dove...
Ciao, Rocco
procedure EseguiRiavvio;
var
  hToken, hProcess: THandle;
  tp, prev_tp: TTokenPrivileges;
  Len, Flags: DWORD;
begin
  //**********************
  if Win32Platform = VER_PLATFORM_WIN32_NT then
     begin
       hProcess := OpenProcess(PROCESS_ALL_ACCESS, True,
            GetCurrentProcessID);
       try
         if not OpenProcessToken(hProcess, TOKEN_ADJUST_PRIVILEGES or
              TOKEN_QUERY,hToken) then
            Exit;
       finally
         CloseHandle(hProcess);
       end;
       try
         if not LookupPrivilegeValue('', 'SeShutdownPrivilege',
tp.Privileges[0].Luid) then
           Exit;
         tp.PrivilegeCount := 1;
         tp.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;
         if not AdjustTokenPrivileges(hToken, False, tp,
SizeOf(prev_tp),
              prev_tp, Len) then
            Exit;
       finally
         CloseHandle(hToken);
       end;
     end;
  Flags := EWX_FORCE;
  ExitWindowsEx(Flags or EWX_REBOOT, 0);
end;

        end;
Questo e anche l'altro blocco try ... finally non servono: OpenProcessToken 
non può sollevare eccezioni!
Per effettuare un giusto controllo sugli errori bisogna utilizzare 
GetLastError()
Ciao!!
Davide DG.
-- 
All resistance is futile! Prepare to be disassembled !

grazie mille !!!! : ))

Newsgroup: it.comp.lang.delphi
Titolo: Installazione componente senza .PAS

Ciao,
credo se ne sia già discusso ma non riesco a rintracciare dove.
Come da oggetto ho un componente senza .PAS (ho solo .DCU e .DPK)... 
come posso installarlo?
Grazie
Fabio

Devi almeno conoscere il nome del componente.
Crea una unit ex novo simile a questa:
Unit Register;
Uses
   Windows, Classes, UnitDelComponente;
Procedure Register;
implementation
Procedure Register;
begin
   RegisterComponents('<nome palette>', [<nome del componente>]);
   {
   Esempio: RegisterComponents('System', [TMIOCOMP]);
   }
End;
End;



siccome il DCU non è altro che un file PAS "pre-compilato", in teoria 
dovresti riuscire ad installare anche solo con il DCU e il DPK
(la distribuzione del solo DCU si fa quando non si vuole rilasciare il codice 
sorgente)
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

Newsgroup: it.comp.lang.delphi
Titolo: Problema con i forms

Ho due forms (Form1 e Form2) ma ne visualizzo solo uno alla volta con il
seguente codice:
 procedure TForm1.Button1Click (Sender: TObject);
 begin
  Form1.Visible := false;
  Form2.Show;
 end;
Il mio problema č che quando minimizzo il form Form2 mi appare la TitleBar
sopra il bottone Start! Avrei bisogno di nasconderlo cosě da avere solo la
TitleBar del Form1 visibile.
Grazie,
Dr.Phobos

Io uso
Form1.Hide; o Form1.Show;