mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.delphi
Titolo: Togliere il focus alle MDIChild

Ho sempre la mia bella applicazione MDI con il pannel allineato ad un bordo
della finestra. All'interno di questo panel ho una listview. Quello che
vorrei fare (soprattutto per continuare ad ottenere la certificazione di M$)
è "togliere" il focus dalle MdiChild quando l'utente "entra" nella listview.
Per default una MDI child è sempre attiva e quindi ha il focus, anche se
l'utente sta utilizzando i componenti all'interno del panel.
Da una ricerca con google l'unica soluzione che per il momento ho trovato è
di fare delle finte caption per le MdiChild e di pilotarle da codice, però
non mi sembra un gran che, specialmente ora che c'è di mezzo anche il look
di XP....avete qualche idea?
-- 
Lis
ICQ@Home #7317603sette     ICQ@Work #16285702tre
Mercatino: 
http://lis77.bravepages.com
 (aggiornato *con foto*: 16/06/03)


Sei sicuro che occorra fare questo x ottenere la certificazione M$?
Da quel che ho capito la tua list view sta nella MDIForm e tu vorresti che,
quando questa list view ha il focus, non ci fosse nessuna MDIChild attiva
(ovvero tutte con la caption grigia). A me pare che questo sia un
comportamento fuori standard. Tutti i programmi M$ che utilizzano MDI hanno
sempre una MDIChild attiva (ho qui davanti Visual C++ 6.0 e fa cosi').
Una MDI Child deve sempre essere attiva xche' e' il target di tutti i
comandi dell'applicazione
Ciao,
Stefano

 comandi dell'applicazione
Qui trovi un piccolo prototipo di quello che sto cercando di fare:
http://lis77.bravepages.com/MdiApp.jpg
In pratica dal panel posso trascinare dei files sulle finestre MDIChild.
Il focus mi serve perchč c'č la voce di menu View in cui l'utente puņ
scegliere l'ordinamento dei files, se vederli come report, icone, ecc., e
visto che le funzionalitą sono le stesse, vorrei usare lo stesso comando di
menu sia per le MDIChild sia per quella nel panel.
Ho aperto anche io VB6 ed effettivamente una finestra ha sempre il focus, ma
ci sono le toolbar "attaccate" ai lati che hanno comunque la caption che
cambia colore quando diventa attiva.
Avete qualche idea, anche modificando l'interfaccia, che possa rendere
funzionale l'applicazione?



Se il problema e' solo la condivisione del menu con le voci di ordinamento
ti consiglio di lasciar perdere e studiare qualcosa di alternativo. Nelle
TBX (ancora in valutazione? :P) c'e' un componente che si chiama
TBXDockablePanel che potrebbe esserti molto utile.
Ciao,
Stefano

Newsgroup: it.comp.lang.delphi
Titolo: Delphi 5 VS Delphi 6

Quali sono i pregi e i difetti? Compatibilità. Sapete dirmi xkè conviene
usare il 6 invece del 5 o viceversa?
Ciao

su, indovina un po, 
www.borland.com
 cliccando su:
delphi
prevuious versions
trovi lcuni link che puntano alla feature matrix e altro.
Bye
A.
Newsgroup: it.comp.lang.delphi
Titolo: GDI e MemoryStatus

Ciao ragazzi.
attraverso la GlobalMemoryStatus sono riuscito a recuperare l'ammontare
della memoria fisica libera e la totale.
Avrei bisogno di sapere le stesse cose per quanto riguarda la memoria GDI.
Credo che l'espressione corretta sia
System Resources = User (Menů, Windows) + GDI (pen, brush, bitmap)
Mi sbaglio?
Potete darmi qualche indicazione, qualche APINA?
ho guardato la documentazione ma non ho capito molto...

> ho guardato la documentazione ma non ho capito molto...
una volta si usava SystemHeapInfo  ma perň adesso non credo ti serva piů
saperlo :)
ciao

Newsgroup: it.comp.lang.delphi
Titolo: SQL 7 e Delphi 5

Vorrei scrivere un'applicazione che gestisca circa 15 tabelle SQL 7 (da
circa 30 Mb l'una).
Intendevo basare il collegamento con i componeneti ADO, cartando il BDE (che
tra l'altro mi ha dato numerosi problemi di dll mancanti in applicazioni già
esistenti passando da office 97 al 2000!!!). Che ne dite?
Avrei dei dubbi su come lanciare delle SP da far eseguire direttamente da
SQL e non da Delphi, in modo da rendere il tutto + veloce.In pratica da dove
le posso lanciare o scivere. Sapreste aiutarmi?

Io ho usato BDE + SQL links con SQL server 7 su Win NT e non ho mai avuto
problemi. Almeno non dovuti a delphi o a bde (avrei invece qualcosina da dire su
sql 7).
Ho fatto delle prove comparative (molto parziali) tra bde e ado, bde č risultato
di gran lungha piů veloce (vari ordini di grandezza).

Newsgroup: it.comp.lang.delphi
Titolo: disattivare il tasto invio

Salve ragazzi,vorrei disattivare il tasto invio nel mio programma,potete
darmi una dritta.
Ciao

 Salve ragazzi,vorrei disattivare il tasto invio nel mio programma
--------
onKyePress
if key = #13 then key := #0;
ciao erik

 ha scritto nel messaggio



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

 ha scritto nel messaggio
news:wWQWa.16205$cl3.5...@news2.tin.it...


 chiaro. ciao
Accidenti, occhio al quoting! :-)
I ringraziamenti sono ben accetti ma stai attento a non riportare
inutilmente tutto il testo del messaggio al quale hai risposto senza
motivo.

Newsgroup: it.comp.lang.delphi
Titolo: XE7 TParallel.For

prova reale, non il solito isprime con questa funzionalita', da quanto 
ho capito dovrebbe risultare utile, nei cicli for
 
uses .... System.threading;
 
  iNumeroFile := NomiFiles.Items.Count - 1;  //da un FileListBox
  sElenco := TStringList.Create;
 
//vecchio ciclo for, preleva il nome di un file e lo rinomina
//tutto si comporta come previsto
{for i := 0 to NomiFiles.Items.Count -1 do
  begin
   sOldName := NomiFiles.Items[i];
   sElenco.Add(NomeFile(sOldName, sPath));
  end;}
 
{il nuovo TParallel.for
  - non posso seguire il debug
  - non esegue sElenco.Add(NomeFile....
}
 
TParallel.For(1, iNumeroFile, procedure(i: integer)
  begin
   sOldName := NomiFiles.Items[i];          <-- qui passa
   sElenco.Add(NomeFile(sOldName, sPath));  <-- qui non passa mai (F8)
  end);
 
non solo, il ciclo da 1 a iNumeroFile, non si completa mai, come se 
entrasse in un loop infinito (sono solo 10 file).
 
l'esempio classico
 
  TParallel.For(1, 100000, procedure(I: Integer)
   begin
     if IsPrime(i) then
       inc(total);
   end);
 
spero proprio di non aver capito il funzionamento.

 spero proprio di non aver capito il funzionamento.
 
Nel tuo codice fai uso di *TStringList* e di altre strutture dati che non sono tipicamente usabili in un contesto multithreading.
 
Adotta piuttosto una coda o uno stack adatta a questo contesto, ad esempio una *TThreadedQueue*:
http://docwiki.embarcadero.com/Libraries/XE7/en/System.Generics.Collections.TThreadedQueue
 
 
Ciao,
  Marco.
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
#Home: 
http://bit.ly/marcobreveglieri
 
#Blog: 
http://bit.ly/compilaquindiva
 

   end);
 
Evidentemente stai beccando il breakpoint sempre sullo stesso punto del codice, per tutti i thread. Un'esecuzione parallela (se c'e`) fa si` che ogni thread sollevi un interrupt per il debugger. Poi, l'accesso a sElenco, risorsa condivisa dai thread, va sincronizzato!
Newsgroup: it.comp.lang.delphi
Titolo: Invio Mail

Dovrei realizzare una applicazione che invii una o più mail a svariati 
indirizzi.
Ho provato con MapiSendMail, ma mi viene visualizzata la finestra di outlook 
oppure un msg di conferma. C'è un modo per evitarlo, cioè fare in modo che 
l'applicazione lavori autonomamente senza bisogno di star li a confermare 
messaggio x messaggio?
Da post precedenti ho visto che in D4 esisteva un componente TNMSMTP che in 
Turbo Delhpi (Explorer) non ritrovo. C'è un componente analogo?
Altra domandina: vedo che nelle palette "WebServices" e "Servers" di turbo 
delphi ci sono componenti che non conosco, ma per i quali non ritrovo 
documentazione nell'help. Riscontrate la stessa lacuna o capita solo a me? 
(es: TOutlookapplication)
Gianni. 

 documentazione nell'help.
Gianni,m scusa..
Oulook non è un prodotto Borland....la doc spetta al produttore.
A

(es: TOutlookapplication)
Non ho la tua versione ma credo che l'help per i "WebServices" sia
mancante per carenza dell'help stesso, per i "Servers" invece il fatto è
che sono wrapper per "pilotare" via com le applicazioni office quindi i
metodi e le prorietà  e l'help sono quelli di office.
Ciao
--- posted by geoForum on 
http://www.delphiedintorni.it
Newsgroup: it.comp.lang.delphi
Titolo: Cursore personalizzato.

Saluti a tutto il NG,
come fare per usare una immagine di cursore, da me creata con
Image Editor, in una applicazione ???





 ha scritto nel messaggio
news:a6vjfo$v65$2...@newsreader.mailgate.org...


   Screen.Cursor := Posizione;
Grazie funziona ma a me interessava integrarlo nel file compilato
in questo modo funziona solo se in una determinata macchina esite il mio
cursore
e deve trovarsi nello stesso percorso.
come posso fare ?

 Grazie funziona ma a me interessava integrarlo nel file compilato
per integrarlo nel file compilato devi includerlo come risorsa:
Dall'IDE: Tools->Image Editor ... 
Dall'Image Editor: File->New->Resource File  e fai New->Cursor
Il file di risorse (nomefile.res)  lo includi mettendo nel progetto 
principale (Project->View Source) 
{$R nomefile.res}
Per caricare il cursore a runtime poi usi LoadCursor
Ciao!
Davide DG.
-- 
All resistance is futile! Prepare to be disassembled !

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

Ciao a tutti.
Vorrei chiedere se qualcuno di voi ha intenzione di abbandonare Delphi e
programmare con C#.
C# dovrebb essere un linguaggio (quasi) perfetto. In fondo, è stato creato
dallo stesso creatore di Pascal. Assomiglia molto a Delphi/Java. E poi, ha
tutti i vantaggi del .NET. E inoltre vorrei chiede a quellii che non ci
pensano di passare a C#.NET, cosa li spinge a rimanere su Delphi (tranne la
produttività personale e il fatto che Delphi non è della Microsoft).
Grazie a tutti.
Marco.
P.S. Ma la Borland, ha intenzione di fare Delphi.NET???

 produttività personale e il fatto che Delphi non è della Microsoft).
Mi sembra decisamente prematuro per abbandonare Delphi per c#.....io uso PHP
per applicazioni lato server e Delphi per quelle lato amministratore e il
connubio funziona benissimo......per il futuro vedremo.
Ciao
Gianni Giusti
Newsgroup: it.comp.lang.delphi
Titolo: Simulazione pressione tasto [Ctrl]

Salve, ho un problema molto strano.
Ho realizzato un programma per la simulazione della pressione e del
rilascio del tasto [Ctrl] usando la funzione Keybd_Event, però
nonostante funzioni con Win98, non funziona con Win2K e inoltre si
comporta in modo strano, cioè la pressione del [Ctrl] funziona, mentre
non funziona il rilascio all'interno della mia applicazione, infatti
se apro, per esempio, WordPad il [Ctrl] risulta rilasciato, se poi
torno alla mia applicazione anche se premo il [Ctrl] sinistro la
situazione non cambia, ma se premo quello di destra allora il tasto
viene rilasciato anche nel mio programma.
Avendo notato sull'Help che la Keybd_Event non funziona per W2K ho
provato a usare la SendInput, ma il risultato è stato identico.
Qualcuno ha un'idea di come poter risolvere il problema.
Grazie in anticipo.
Alessandro

provato a usare la SendInput, ma il risultato è stato identico.
In un paio di applicazioni uso la funzione Keybd_Event e mi gira senza
problemi sotto 2000.
Io uso un codice tipo questo.
keybd_event(VK_LCONTROL, MapVirtualKey(VK_LCONTROL, 0), 0, 0);
...............
keybd_event(VK_LCONTROL, MapVirtualKey(VK_LCONTROL, 0), 0,
KEYEVENTF_KEYUP);
L'unica cosa  che mi viene in mente e' sapere se passi il codice
hardware (mapVirtualkey), senza il quale a volte le applicazioni si
comportano in modo bizzarro.
Ciao,
Massimo
-- 
Ore 18.30: premo invio.

 KEYEVENTF_KEYUP);
Eventualmente puoi provare ad usare anche le API GetKeyBoardState e
SetKeyboardState e le relative del gruppo, ricordando però che sono
locali al thread di esecuzione.
Ciao
Antonio
 

 Massimo
Non passo alla Keybd_Event il codice hardware perché altrimenti non
funziona con Win98.
Ho notato una cosa ancora piů strana: su un Win2K Pro e su un Win2K
Server non funziona, mentre su un'altro Win2K Pro funziona. Tutti
questi 3 computer hanno installato il Service Pack 3, sono in lingua
italiana e apparentamente non hanno differenze rilevanti, eccetto per
il fatto che il computer su cui funziona ha il disco formattato con
file system FAT32, mentre sugli altri PC č NTFS: mi sembra strano,
perň potrebbe essere questo il motivo?

perň potrebbe essere questo il motivo?
Sinceramente non saprei che dirti, certo che mi sembra alquanto
improbabile..
Purtroppo oltre non so andare :(


 Purtroppo oltre non so andare :(
Sono riuscito a trovare un computer con FAT32 in cui non funziona il
rilascio del tasto [Ctrl] (sarebbe stato davvero strano
altrimenti...), quindi il problema non è dovuto all'NTFS.
Putroppo non sono riuscito a capire il modo per risolvere il mio
problema: qualcuno a qualche idea?
Grazie.

Problema risolto!!!
Grazie.
Alessandro
Newsgroup: it.comp.lang.delphi
Titolo: Info Rete

con questo codice posso avere le informazioni di connessioni ma non 
voglio lo showmessage.
[code]  Function HayConexion: boolean;
  var
    flags: dword;
  begin
    Result := InternetGetConnectedState(@flags, 0);
    if Result then
    begin
      showmessage('Conexion a Internet Activa');
      if (flags and INTERNET_CONNECTION_MODEM) = 
INTERNET_CONNECTION_MODEM then
         showmessage('Conexion por modem');
      if (flags and INTERNET_CONNECTION_LAN) = INTERNET_CONNECTION_LAN then
         showmessage('Conexion por lan');
      if (flags and INTERNET_CONNECTION_PROXY) = 
INTERNET_CONNECTION_PROXY then
         showmessage('Conexion por proxy');
      if (flags and INTERNET_CONNECTION_MODEM_BUSY) 
=INTERNET_CONNECTION_MODEM_BUSY then
         showmessage('modem busy');
    end;
  end;
begin
  HayConexion;
[/code]
Allora ho fatto cosi.
[code]procedure TForm1.TCPInfoClick(Sender: TObject);
begin
InfoDominio.Caption:= (TCP.LocalDomainName);
HostLocale.Caption:= (TCP.LocalHostName);
end;
Function HayConexion: boolean;
var
flags: dword;
begin
Result := InternetGetConnectedState(@flags, 0);
if Result then
begin
Stato.Caption:= ('Attiva');
if (flags and INTERNET_CONNECTION_MODEM) = INTERNET_CONNECTION_MODEM then
Rete.Caption:=('Modem');
if (flags and INTERNET_CONNECTION_LAN) = INTERNET_CONNECTION_LAN then
Rete.Caption:=('Lan');
if (flags and INTERNET_CONNECTION_PROXY) = INTERNET_CONNECTION_PROXY then
Rete.Caption:=('Proxy');
if (flags and INTERNET_CONNECTION_MODEM_BUSY) 
=INTERNET_CONNECTION_MODEM_BUSY then
Rete.Caption:=('Modem Occupato');
end;
end;
begin
HayConexion;
end;
end.[/code]
ma mi da questo errore:
[Warning] Email.pas(226): Unsafe type 'PChar'
[Warning] Email.pas(243): Unsafe code '@ operator'
[Error] Email.pas(246): Undeclared identifier: 'Stato'
[Error] Email.pas(248): Undeclared identifier: 'Rete'

 [Error] Email.pas(248): Undeclared identifier: 'Rete'
Quali sarebbero le linee226, 243, 246 e 248?
Prova comunque questo:
  sNormalString:= 'hello';
  MessageBox(0, PChar(sNormalString), 'ConstantString', MB_OK);
  PChar(myString);
  PChar('Testo');
Ciao,
Gianpiero
Newsgroup: it.comp.lang.delphi
Titolo: Modificare autorizzazioni chiavi registry remoto

Volevo sapere se c'è la possibilità di vedere/modificare le autorizzazioni
delle chiavi del registry su una macchina remota.
Ho provato a guardare in giro ma non ho trovato niente!
Grazie



Premetto che non ho mai provato però la strada dovrebbe essere questa:
RegConnectRegistry() 
RegOpenKeyEx(............., AKey);
SetSecurityInfo(AKey..........);
-- 
Ore 18.30: premo invio.

Newsgroup: it.comp.lang.delphi
Titolo: Annullare un Data

Salve a tutti;
Ho un DBF con delle date, che leggo cosi':
 x_data1:=DateToStr(Table1DATA1.Value);
ma quando la data e' assente la variabile x_data1 ha il valore '30/12/1899'
Ora, quale volore inmmettere SE DOVESSI ANNULLARE il valore in un campo 
Date?
Ho provato '' o '  /  /  '  e tutte le intuibili combinazioni ma non 
funziona.
L'istruzione sarebbe:
 IF (x_data1 <> '30/12/1899') THEN
  Table1.FieldValues['DATA1']:= STRTODATE(x_data1)
 ELSE IF (x_data1 = '30/12/1899') THEN
  Table1.FieldValues['DATA1']:= STRTODATE('00.00.00');
Grazie Carlo 

 '30/12/1899' 
non conosco nello specifico l'RDBMS che stai usando, ma parlando in 
generale, nel tuo caso dovresti usare NULL.
NULL non è un valore, ma ha il significato di: valore non definito, valore 
non conosciuto, valore non impostato.
NULL è differente da una data 30/12/1899.
Altrimenti, se la tua colonna non è nullable, prova a impostare il valore  
del persistent field (TDateTimeField, presumo) con AsDateTime := 0
-- 
Mauro Falzari 
   [ 
http://digilander.libero.it/mauro.falzari
 ]
 
 "Se guardi nell'abisso, anche l'abisso guarda in te." 
   (Friedrich Nietzsche)

>  ELSE IF (x_data1 = '30/12/1899') THEN
    Table1.FieldByName('DATA1').CLEAR
-- 
Alberto Salvati
A NEAPOLITAN Delphi Developer who is studying c# and .net
"Dicette 'o pappece 'nfaccia 'a noce dammi 'o tiempo che pure te spertoso"

 ha scritto nel messaggio 
news:darh7o$hsp$1...@newsreader1.mclink.it...


> Materia di studio
No, materia di Help:
TDateTime is a used by the date and time routines to hold date and time 
values.
Unit
System
type TDateTime = type Double;
Description
Delphi stores date and time values in the TDateTime type. The integral part 
of a TDateTime value is the number of days that have passed since 
12/30/1899. The fractional part of a TDateTime value is fraction of a 24 
hour day that has elapsed.
Following are some examples of TDateTime values and their corresponding 
dates and times:
0 12/30/1899 12:00 am
2.75 1/1/1900 6:00 pm
-1.25 12/29/1899 6:00 am
35065 1/1/1996 12:00 am
To find the fractional number of days between two dates, simply subtract the 
two values. Likewise, to increment a date and time value by a certain 
fractional number of days, simply add the fractional number to the date and 
time value.
Note: Delphi 1.0 calculated the date from year 1 instead of from 1899. To 
convert a Delphi 1.0 date to a Delphi 2.0 date, subtract 693594.0 from the 
Delphi 1.0 date. The date format changed to be more compatible with OLE 2.0 
Automation.
Newsgroup: it.comp.lang.delphi
Titolo: Drive Pronto

Salve a tutti. Volevo chiedervi come e' possibile accorgersi che un drive si
è attivato. Ad esempio che qualcuno ha inserito un cd o (quello che più mi
serve in questo momento) un floppy?
Probabilmente non esiste niente del genere. In tal caso come è possibile
controllare se in a:\ è presente un floppy?
Grazie mille!!!!!!!
Elisa

"Ely77" <Elisa.AdamoliTOG...@Tiscali.it> ha scritto nel
messaggio:

C'è un Tip di David Marcucci sulle Faq a proposito del floppy presente nell'
unità.
Per quanto riguarda l' inserimento di un cd nell' unità windows lo notifica
alle applicazioni ed ai device driver mediante il messaggio WM_DEVICECHANGE.
Eccoti un esempio:
{TForm1}
Private
  procedure DeviceChanges(var Msg: TMessage); Message WM_DEVICECHANGE;
[...]
procedure TForm1.DeviceChanges(var Msg: TMessage);
const   OUTPUT = $8004;
           INSERT = $8000;
           NO_VALUE  = '';
var
   Show : String;
 begin
   Show := NO_VALUE;
   case Msg.wParam of
     INSERT   : Show := 'CD inserito nell''unità';
     OUTPUT   : Show := 'CD estratto dall''unità';
   end;
   if (Show <> NO_VALUE) then ShowMessage(Show);
 end;
--
- Carlo -

 Grazie mille!!!!!!!
Copio e incollo da un tip non so scritto da chi:
function DiskInDrive(const Drive: Char): Boolean;
var DrvNum: Byte;
    EMode: Word;
begin
  Result := False;
  DrvNum := Ord(Drive);
  if DrvNum >= Ord('a') then
    Dec(DrvNum, $20);
  EMode := SetErrorMode(SEM_FAILCRITICALERRORS);
  try
    if DiskSize(DrvNum-$40) <> -1 then
      Result := true
    else
      MessageBeep(0);
  finally
    SetErrorMode(EMode);
  end;
end;
Non so se funzica anche per i cd.
--
Un Ippatsu Bolts & Nuts
ICQ: 135471013
Newsgroup: it.comp.lang.delphi
Titolo: wsdl importer

Buongiorno a tutti, volevo porre un quesito.
Ho la necessità di agganciare una mia applicazione ad alcuni webservices.
 
Dall’endpoint non è possibile scaricare il wsdl (usando il comando 
?wsdl) e non è possibile invocare il servizio da browser.
 
Gli endpoint sono forniti in un file a parte.
 
Il problema è che utilizzando Wsdl importer nel file wsdl
alle voci namespace e schemaLocation
sono specificati gli url che non possono essere invocati, quindi il 
sistema non riesce ad importare gli xsd collegati.
 
C'è un sistema per aggirare il problema?
 
Spero di essere stato chiaro, è la mia prima esperienza con i 
webservices in delphi.
 
Grazie

 webservices in delphi.
 
Giusto per avere un riferimento iniziale, che versione di Delphi utilizzi?
 
-- 
MARCO BREVEGLIERI (Software and Web Developer)
#Home: 
http://bit.ly/marcobreveglieri
 
#Blog: 
http://bit.ly/compilaquindiva
 


 
Utilizzo Delphi XE.
 
Ciao Marco, grazie della risposta, facendo la stessa operazione con 
delphi XE7 funziona senza problemi. Come mai?

 delphi XE7 funziona senza problemi. Come mai?
 
Non ho avuto modo di approfondire il tuo problema (sono fuori ufficio), però ogni versione di Delphi porta sempre diversi bug fixing e migliorie dal lato WSDL, quindi può darsi che il tuo problema sia dovuto effettivamente a un errore dell'importatore che è stato censito e risolto.
 
Riesci a utilizzare il "wrapper" creato con XE7 all'interno di Delphi XE?
 
Per il resto, prova a spiegare meglio i passaggi che compi e gli errori che ti vengono dati, giusto per consentire di riprodurre il problema senza avere tutti i file di cui disponi tu, e magari c'è modo di aggirare l'ostacolo anche in XE. :)
 
Ciao,
  Marco.


Ciao Marco, posso utilizzare il wrapper di xe7 in xe. Grazie.
 
Se posso approfittare volevo chiederti alcune delucidazioni
sull'utitizzo dei webservices con delphi inviandoti una parte del
wrapper in pvt
 
Grazie
 


Ciao Marco anche io sto lavorando al tuo stesso progetto trovando non poche difficoltà.
E' la prima volta che lavoro con i  webserver  se vuoi possiamo collaborare insieme.
 
Saluti pippo

Newsgroup: it.comp.lang.delphi
Titolo: Preview personalizzata

Ciao a tutti,
           esiste un qualche tutorial che insegni come fare un preview 
personalizzata con QuickReport 3 ??
Con l'esempio fornito dalla qsoft non sono riuscito a fare molto .... anzi 
ben poco.
Grazie per l'aiuto.
Daniele 

con QuickReport 3 ??
Dopo vari tentativo ci sono riuscito !!!
Grazie a tutti
Daniele
Newsgroup: it.comp.lang.delphi
Titolo: manuali on-line?

Vorrei iniziare aprogrammare in delphi(versione 6)...
...dove posso trovare on-line dei buoni manuali o tutorials
magari ricchi di esempi pratici con i quali cominciare a capirci veramente
qualcosa???

 Scrissi:

Se conosci altri ambienti di sviluppo o conosci l'inglese puoi provare
i seguenti siti:
www.manuali.it
www.programmare.it
http://www.kaposnet.hu/books/tysdelphi4/
 (corso completo in inglese)
http://programmazione.html.it/delphi/index.html
ciao maury

 ha scritto nel messaggio
news:GgOd8.11850$v7.4...@twister1.libero.it...


Scusate mi è partito l'invio ^_^
Antonio

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

Creo una nuova classe:
type TMyForm = class(TForm)
...
end;
quando eseguo il comando:
MyForm := TMyForm.Create(Owner)
in runtime ricevo questo errore
"Project xxxxxxx raised exception class EResNotFound with message
'Resource TMyForm not found'. Process stopped. Use Step or Run to continue."
La cosa sparisce se il tipo creato discende da TPanel o altro...
Sembra che non possa creare dinamicamente discendenti di TForm.
Possibile?
Se qualcuno ha una luce, mi illumini.

 La cosa sparisce se il tipo creato discende da TPanel o altro...
imho, non credo sia possibile.
Tanto x iniziare il form si porta dietro il file dfm salvo che tu non
escluda dal codice la direttiva
{$R *.dfm}...
A.

 A.
Non esiste un file dfm: creo una classe nuova e alla creazione
dell'istanza mi dà errore. Spiegati meglio.

 Spiegati meglio.
uhm...
A.

 dell'istanza mi dà errore. Spiegati meglio.
Leggere l'help fa così schifo?
Cerca nell'help CreateNew.
Ciao,
Andrea

Newsgroup: it.comp.lang.delphi
Titolo: Ottimizzazione Interrogazione SQL

Ciao a tutti,
   giusto per tenere un po' vivo il nostro NG ....
 
Nell'ormai famoso gestionale i dati di cui ho bisogno sono spalmati in 2 
tabelle e hanno dei flag (da 1..n) che identificano le operazioni fatte dai 
vari operatori.
Per la totalizzazione, operatore per operatore, eseguo la stessa query tante 
volte quanti sono gli operatori, la query e'
 
Select Sum(Tabella1.Importo) As Totale FROM Tabella1
          INNER JOIN Tabella2 on (Tabella1.Idx=Tabella2.Idx and 
Tabella2.Data = '22/02/2018' and Tabella2.OperatoreIdx=1
 
Dove Data e' una data che viene passata di volta in volta e OperatoreIdx e' 
il numero assegnato all'opertore
 
Dato che siamo in 4, la query viene eseguita 4 volte (o meno se qualcuno in 
quel giorno riposa).
E' possibile fare tutto in una sola interrogazione?
 
Grazie e alla prossima ...
 
Ciao
 
Daniele
 
 

 
 
Così dovresti ottenere quello che chiedi:
 
Select
   sum(Tabella1.Importo) As Totale,
   Tabella2.OperatoreIdx
FROM
   Tabella1
   INNER JOIN Tabella2 on (Tabella1.Idx=Tabella2.Idx and
   Tabella2.Data = '22/02/2018')
group by
   Tabella2.OperatoreIdx
 
Ciao.
Newsgroup: it.comp.lang.delphi
Titolo: TcpClient del BDS 2005

Stavo provando i componenti delphi TcpClient e Server (del gruppo Internet).
Succede una cosa strana, se connetto il client al server premendo il 
pulsante Button1 ho l'evento accept sul serv ma non l'evento Connect sul 
Client.
Il codice e' talmente semplice che non so che pensare.
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
TcpServer1.Active:=True;
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
TcpServer1.Active:=False;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
TcpClient1.Active:=True;
end;
procedure TForm1.TcpClient1Connect(Sender: TObject);
begin
//ShowMessage('Connessione ok');
TcpClient1.Sendln('Stringa Tr')
end;
procedure TForm1.TcpServer1Accept(Sender: TObject;
  ClientSocket: TCustomIpClient);
var n: Integer; St: String;
begin
ClientSocket.Receiveln(St);
//ShowMessage('Ricevuto: '+st);
end;
procedure TForm1.Button4Click(Sender: TObject);
begin
TcpClient1.Active:=False;
//ServerTh.Free;
end;

 Client. [...]
Su BDS2006 l'evento Connect risponde correttamente...passa anche sull'Accept
del server ma non visualizza lo showmessage fino a che non clicchi sul
button disconnect client.
Forse gli eventi non sono distribuiti correttamente
Ciao
Valter

 ha scritto nel messaggio 
news:3ltRg.2039$Xm....@tornado.fastwebnet.it...

Come hai impostato i componenti, bloccanti o non, Giorgio 

 Come hai impostato i componenti, bloccanti o non, Giorgio
client bloccante, server threadblocking si comporta come ti ho detto
client e server bloccanti non visualizza lo showmessage del server alla
disconnessione del client
in entrambi i casi l'evento on connect del client viene processato

 button disconnect client.
Ovviamente restituisce solo 'Ricevuto: ' senza il parametro stringa St

 ha scritto nel messaggio 
news:VGtRg.2076$Xm....@tornado.fastwebnet.it...

Dovevo avere il S.O. in tilt: ho riavviato il pc ed ora aggancia l'evento.
Ciao, Giorgio
Newsgroup: it.comp.lang.delphi
Titolo: [MI] - Analisti Programmatori DELPHI

Societą multinazionale con H.Q. in Milano ricerca le seguenti figure
professionali :
REF : IT/AD/70
Analisti-programmatori / programmatori da inserire nel prorio team R&D
Tipo rapporto di lavoro:
- Assunzione diretta o contratto di consulenza
Sono richiesti :
- Esperienza almeno triennale nello sviluppo in ambiente DELPHI
- Laurea o diploma in Informatica
- Buona conoscenza della lingua inglese.
Sarą considerato titolo preferenziale :
- La conoscenza di SQL ,
- DB relazionali
- aver sviluppato applicazioni internet
Inviare dettagliato curriculum vitae all'indirizzo 
jo...@omniticket.it
indicando nell' oggetto la posizione di interesse ed esplicitando il
consenso al trattamento dei dati personali secondo la legge sulla privacy
675/96.

un po' OT, no ?
Già messo su it.lavoro.informatica ....
Andrea

Già messo su it.lavoro.informatica ....
Bravo, hai fatto bene. :)
Ciao
-- 
Morde. 
(morde at programmer dot net)

che gli OT di questo tipo sarebbero *molto* graditi! ;-))
Ho fatto un colloquio tempo fa con questa azienda, la Omniticket.  
Fu un incontro con una persona molto cordiale di cui conservo un buon
ricordo.  L'azienda promette molto bene, vi consiglio di provarci, se
siete nella zona di Milano.

 L'azienda promette molto bene, vi consiglio di provarci, se siete nella
zona di Milano.
Provarci con tale persona cordiale?
Sicuro?
Che tipo č?

Che tipo č?
Per favore scrivigli in privato, queste risposte non sono attinenti al
newsgroup tantomeno alla privacy.


Newsgroup: it.comp.lang.delphi
Titolo: Server news.tin.it

Non riesco iù ad accedere al newsgroup con il mio solito server 
news.tin.it
. 
Mi dice "Impossibile accedere al server". Girando in rete ho trovato 
nntp.aioe.it
, che è quello che sto usando ora. Mi chiedo se è successo ad 
altri o se è solo un mio problema. 
 
 
---
Questa e-mail è priva di virus e malware perché è attiva la protezione avast! Antivirus.
http://www.avast.com
 
 


è in fase di dismissione...quindi hai fatto bene a migrare

Newsgroup: it.comp.lang.delphi
Titolo: [Importante] Backdoor Interbase

Da una new (Nando Dessena) sul ng di Cantu' dedicato ad IB. 
Date un'occhiata a:
http://www.kb.cert.org/vuls/id/247371
Saluti
Paolo Arosio


si veda anche 
http://www.ibphoenix.com/sec1.html
patches a
http://64.55.62.15/
e
http://www.borland.com/interbase/downloads/patches.html
Saluti
Paolo Arosio

 wrote in message
3a5d7939...@news.cis.dfn.de...

Scusate, ma quello che non capisco bene traducendo gli articoli esposti su
questi siti è: cosa ho rischiato fino ad adesso? Ovvero, questo "back door"
poteva dar seri problemi con chi accedeva al db passando determinatati
parametri? Dico una cacchiata?
Ciao a tutti
Simone

parametri? Dico una cacchiata?
Per quel che ho capito io, 
se hai un db interbase (4, 5, 6) in giro non patchato, chiunque,
loggandosi con quella coppia di username e password, avrebbe gli stessi
diritti di sysdba.
Quel che mi preoccupa e' che fra le pubblicita', oltre all'esercito
degli SU era elencata come cliente di IB anche la mia banca.
Saluti
Paolo Arosio
Newsgroup: it.comp.lang.delphi
Titolo: image

come posso fare a inserire una immagine bmp nella tabella visto che
l'immagine č visualizata con il componente image?
Sapete dirmi l'istruzione?
 io l'mmagine la faccio visualizzare con l'istruzione :
Image1.Picture.LoadFromFile(Filelistbox.FileName);
ma poi devo memorizzarla nel campo della tabella.
Il campo della tabella č dichiarato ole.

 Il campo della tabella è dichiarato ole.
hai provato con
tabella.campo.value := image1.picture;
oppure 
tabella.fieldbyname('nomecampo').value := image1.picture;
-- 
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

Mi sembra tempo fa di aver risolto con una assign.... ma io avevo un campo
blob su paradox..

Newsgroup: it.comp.lang.delphi
Titolo: ADO update

Ciao a tutti!
Per scrivere un record nuovo in un DB access, con Ado, faccio cosi':
   ADOQuery2.Open;
   ADOQuery2.Insert;
   myScriviCampiInADOQuery(ADOQuery2); // compilo i campi del record
   ADOQuery2.Post;
   ADOQuery2.Close;
Come faccio invece a fare l'update di un record? (ovvero a modificarlo
mantenendo un campo contatore invariato?)
Chris


    ADOQuery2.Open;
   // Qui ti posizioni sul record che vuoi modificare
    ADOQuery2.Edit;  <<<<<<<<<<<<<
    myScriviCampiInADOQuery(ADOQuery2); // compilo i campi del record
    ADOQuery2.Post;
    ADOQuery2.Close;
--
Gianluigi Genasi
--------------------------
Minisystem Srl

Newsgroup: it.comp.lang.delphi
Titolo: Conversione file da MDB a DBF

Salve a tutti
Scrivo per la prima volta in questo NG in quanto stň iniziando a scrivere
programmi in delphi e trovo qualche problema, per me incomprensibile ed
irrisolvibile.
Intanto uso Delphi 3 Professional.
La formalizzazione del quesito:
Dato un file MDB (MS Access) non indicizzato, cercare su una data e scorrere
il file fino al cambiamento di data, ed estrarre i dati, copiandoli su un
file DBF creato ex novo di volta in volta.
Ho identificato in delphi lo strumento per risolvere il quesito, ho iniziato
creando un'ALIAS con Explorer e come TYPE MSACCESS; ma ad ogni tentativo di
proseguire mi chiede:
Database Login
Database: MSACCESS
User Name:
Password:
Perchč? Come proseguire?
C'č chi puň darmi lu,i? Sui manuali non trovo nulla.
Grazie
Carlo

Perchč? Come proseguire?
Usa un componente TDatabase e imposta LoginPrompt a false.
Se il db ha bisogno di autenticazione usa LoginParams.
--
CyberWalkie - walkietalkie(at)
libero.it

Grande! Grazie!  Ha funzionato!!
"CyberWalkie" <cyber...@cyberwalkie.cyb> ha scritto nel messaggio
news:3b51f28d...@news.libero.it...


 Grande! Grazie!  Ha funzionato!!

accettare i campi vuoti, ma compare sempre !!!??
Impossibile.  Se metti LoginPrompt a false non te li chiede.
--
CyberWalkie - walkietalkie(at)
libero.it
Newsgroup: it.comp.lang.delphi
Titolo: [d5][d6] smpp protocol

ciao a tutti, qualcuno sa come interfacciarsi ad un server smpp con 
delphi??? Indy può essere una buona strada ??? con qualche componente???
Simo 

i nomi degli indy includono in genere un qualcosa che indica a cosa
serve..
Ad esempio, se leggo tidpop3 presumo che sia per l'utilizzo di pop3...
A.

pensavo stessa cosa però con indy9 non ho trovato nulla di simile a smpp, 
pensavo di usare i socket e spedire in modalità "grezza" i dati
Simo
Newsgroup: it.comp.lang.delphi
Titolo: [OT}Strumenti per analisi

Ciao a tutti, scusate l'OT, ma credo che qui ci siano molti in grado di
darmi risposte valide.
Quali strumenti utilizzate al momento in cui fate l'analisi di un progetto
o di una parte di esso?
Soltanto Word, Excel, o anche altri strumenti? 
Mi interesserebbe sapere se esiste qualcosa che lavora "in simbiosi" con
Delphi.
Magari qualcosa di non troppo complicato.
Grazie e ciao,
pippirillo
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Delphi.
<joke>
Io, mentre faccio l'analisi, per sentirmi in simbiosi con Delphi lavoro con 
Excel e Word, ma li piloto via Ole automation tramite Delphi.
</joke>
-- 
- Carlo -

 Delphi.
in primis, molto dipende dalla versione di delphi che usi, visto che
alcune versioni includono degli strumenti che possono semplificare il
lavoro.
Poi, molto dipende dalla metodologia.
Se non 6 im ambito MDA, lo strumento principe dovrebbe essere un tool
per la progettazione dei database.
Esistono svariati prodotti x fare cio.
Io conosco erwin e sybase powerdesigner.
Quest'ultimo l'ho  usato in passato e secondo me è un prodotto
eccellente.
Tra () powerdesigner permette anche di creare diagrammi UML, cosa molto
comoda se lavori in MDA.
Se invece lavori in MDA, alcune versioni di delphi includono ECO.
Poi, se vedi sul sito di mamma borland vedrai che di fatto essa produce
una suite che include strumenti abbastanza eterogeni il cui scopo è
offrire ausilli per le varie fasi dell'ALM.
Se poi vuoi veramente qlc di mastodontico, esiste rose...
A.

o di una parte di esso?
Enterprise Architect
Embarcadero E/R Studio
tanto per citarne un paio...
Newsgroup: it.comp.lang.delphi
Titolo: Nuovo Componente

Salve a tutti.
In questi giorni mi sono cimentato nella creazione del mio primo
componente.
E' un semplice richedit con la possibilità di lampeggio, ma ho incontrato
alcuni problemi.
Per prima cosa come posso cambiare la proprietà Color (anche SelStart e
SelLength) dalla procedura Create del componente stesso? Mi pare di aver
capito (dall'errore che compare) che il componente ha bisogno di avere
prima un Parent, e quindi ho risolto creando una procedura Inizializza che
richiamo dopo aver 'imparentato' lo stesso.
Pensavo di aggiungere il Parent all'interno del Create, ma non so...avete
suggerimenti??
Inoltre come mai se provo ad installarlo (ora lo uso come uses esterna)
nell'IDE mi dice che si richiama ricorsivamente evidenziando la prima
dichiarazione ('unit TSEdit')...?
Vi ringrazio :)
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Vi ringrazio :)
Caro collega, senza vedere il tuo codice e' difficile darti una mano  :-)
-- 
Morde. 
(
mo...@despammed.com
)

 Caro collega, senza vedere il tuo codice e' difficile darti una mano  :-)
:) Ho risolto tutto...prima il metodo create era così:
constructor TSaltaEdit.Create(AOwner:TComponent);
begin
  inherited Create(AOwner);
  Text:= '00';
  Font.Height := -11;
  Font.Name := 'Courier New';
  Font.Size := 24;
  Font.Color:= clLime;
  Font.Style:= [fsBold];
  Height:=35;
  Width:=140;
  BorderStyle:= bsNone;
end;
e se provavo a settare Color:= clBlack; mi dava errore...ora ho modificato
così:
constructor TSaltaEdit.Create(AOwner:TComponent);
begin
  inherited Create(AOwner);
  Parent:= AOwner as TWinControl;
  Text:= '0:00:00';
  Font.Height := -11;
  Font.Name := 'Courier New';
  Font.Size := 24;
  Font.Color:= clLime;
  Font.Style:= [fsBold];
  Height:=35;
  Width:=140;
  BorderStyle:= bsNone;
  Lime:=true;
//Aggiunte queste proprietà!!
  SelStart:=0;
  SelLength:=1;
  Color:= clBlack;
end;
Saluti :)


   Parent:= AOwner as TWinControl;
AAAAAAAAAAAAAAAAARRRRRRRRRRGHHHH!!!
Scusa eh, ma perché quelle proprietŕ non provi a metterle
nell'AfterConstruction
oppure nel Loaded? Perché devi usare questi barbatrucchi per risolvere 'ste
cose?
Andrea


Open Delphi Manual (
http://groups.yahoo.com/group/delphi_open_manual/
)
Newsgroup: it.comp.lang.delphi
Titolo: icone multiple nella barra di windows

Salve a tutti,
vorrei sapere come è possibile realizzare una applicazione che per ogni form
creata crei una nuova icona indipendente nella barra di windows (come fa MSN
per ogni chat aperta).
Spero mi sia spiegato bene.
Grazie
Giorgio


Aggiunti questo codice alle form successive alla prima:
type
  TForm2 = class(TForm)
    ...
  private
    { Private declarations }
    procedure CreateParams(var Params: TCreateParams); override;
  public
    { Public declarations }
  end;
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
   inherited CreateParams(Params);
   Params.WndParent := GetDesktopWindow;
end;> Grazie> GiorgioPregoGiorgio  anche io

    Params.WndParent := GetDesktopWindow;
Non c'č bisogno di forzare il Parent della finestra (che potrebbe anche
essere utile mantenere diverso dalla finestra del desktop):
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle := Params.ExStyle+WS_EX_APPWINDOW;
end;
Ciao e HTH :-)
--
Andrea /\/\agni - ICQ#: 174108000
http://www.delphiedintorni.it
Newsgroup: it.comp.lang.delphi
Titolo: percorso eseguibile e collegamento....

La funzione ExtractFilePath(Application.ExeName) mi restituisce il 
percorso dell'eseguibile (es:c:\programmi\mioprogramma). Se faccio un 
collegamento sul desktop dell' eseguibile, la stessa funzione mi 
restituisce il percorso del desktop (es:C:\Documents and 
Settings\gianni\Desktop)e non dell'eseguibile..... perchč? C'č una 
funzione che mi da il reale percorso del file eseguibile?
Uso win xp pro (ntfs) e delphi 7
Grazie dell'aiuto
Gianni Giusti

 funzione che mi da il reale percorso del file eseguibile?
Probabilmente nel link sul desktop non č settata la directory di 
destinazione dell'eseguibile.
Io comunque uso paramstr(0) per avere il path originale dell'eseguibile , 
prova.
Giulio 

 prova.
Ho guardato ora la guida, ti restituisce anche il nome dell'eseguibile. 
Comunque provo magari in quel modo funge senza riempire il "Da:"
Ciao
Gianni

 funzione che mi da il reale percorso del file eseguibile?
Forse sto per sparare la fregnaccia piů grossa e banale dell'universo 
ma...sei sicuro di non aver copiato l'eseguibile sul desktop al posto di 
aver creato un semplice collegamento? :-)
-- 
Marco «Alka» Breveglieri
  (marco [@] abls [.] it)
  ABLS Team S.n.c. - Software & Web
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 riempie quel campo
Se non ricordo male, il campo "Da" dovrebbe corrispondere alla directory 
di lavoro del programma, che diventa la directory corrente quando il 
programma viene eseguito...tuttavia, /Application.ExePath/ dovrebbe 
sempre e comunque restituire il percorso in cui si trova l'applicazione, 
indipendentemente dalla suddetta cartella di lavoro. :-|


 Comunque provo magari in quel modo funge senza riempire il "Da:"
come sempre da usare con  ExtractFilePath
Giulio 

 aver creato un semplice collegamento? :-)
Durante l'orario di lavoro cerco di non bere alcolici, dopo le 20 può 
succedere di tutto :-)
....a parte gli scherzi, la cosa mi è successa dal cliente sui due pc in 
cui devo installare il programma. Ho riprovato anche in ufficio ed ho lo 
stesso problema, risolto mettendo nel campo "Da:", del collegamento, il 
percorso completo dell'eseguibile.
La soluzione è accettabile, comunque voglio provare anche il 
suggerimento di GiulioC
Ciao e grazie a tutti
Gianni Giusti

Newsgroup: it.comp.lang.delphi
Titolo: Aiuto con eolesyserror

Installando una mia vecchia applicazione su un PC ho un eccezione
eolesysterror interfaccia non registrata all'istruzione
 
xsd := CoDOMDocument40.Create;
 
Mi sapete dire come posso risolvere ?
 
Grazie


Uso la unit MSXML2_TLB

Hai gia' cercato con google il significato del msg di errore?
 
A.
Newsgroup: it.comp.lang.delphi
Titolo: stampa testo

Per caso conoscete o avete del codice o componenti per la stampa veloce di
testo, quindi non in modalità grafica?
Ah dimenticavo, non a pagamento.
Grazie.
Alberto.

 Ah dimenticavo, non a pagamento.
Cerca PReport, è un tool di report free che, oltre ad essere ottimo, ha
anche un componente (PTxReport) per generare appunto stampe destinate alle
stampanti ad aghi.
--
Jax
====
"La bomba al centro commerciale finlandese e' stata costruita su Internet"
titolo di una diffusa newsletter

 stampanti ad aghi.
Preport è interessante comunque non mi sembra sia free. Mi sembra di
capire che costa $90.
Io uso ReporBuilder e per generare stampe su stampanti ad aghi imposto
la stampa su 'Stampante Generica' che ho preventivamente configurato
in Windows.
C'è qualche problema legato alla difficoltà di dimensionamento dei
campi, ma se si prende la mano si riesce a sbrigarsi abbastanza in
fretta.
Credo che la stessa soluzione si possa adottare in ogni tool di stampa
che consenta di scegliere la stampante definita in windows.
Giovanni Caramia

Newsgroup: it.comp.lang.delphi
Titolo: Field & DBGrid

Ciao a tutti,
ho una DBgrid che tramite un DataSource prende i dati da un ClientDataSet.
Qualcuno sà per caso come potrei fare a conoscere quale è la cella
seleziona?
Grazie
Rino
--------------------------------
Inviato via 
http://usenet.libero.it

 seleziona?
Guarda l'help....
 TCustomDBGrid.SelectedIndex
Specifies the index of the currently selected column in the Columns array.
property SelectedIndex: Integer;
Description
Set SelectedIndex to move focus to a column in the grid that is identified
by position. Read SelectedIndex to determine which column in the grid has
focus. A value of 0 indicates the first data column, 1 is the second data
column, and so on. SelectedIndex is -1 if there is no currently selected
column.
If the Options property includes dgIndicator, the index of the data column
given by SelectedIndex will differ from the index of the physical column in
the grid.
To access the field component for the selected column, use the SelectedField
property.
A.S.
Newsgroup: it.comp.lang.delphi
Titolo: Controllo programmi in esecuzione?

Come faccio a sapere se un programma è in esecuzione sotto windows?C'è
qualche funzione di delphi? o della shell?
Grazie Marco Cotroneo


Uhm... non capisco... puoi spiegarti?
Andrea

guarda l'api findwindow
--
 _______________________________________
        Gnaffy SoftWare
   web: 
http://gnaffy.tripod.com/
   e-mail: Gna...@Wappi.com
   e-mail: 
bmq...@tin.it
   ICQ#: 76488613
 ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

 Uhm... non capisco... puoi spiegarti?
Cosa non capisci? E' stato chiarissimo.
Vuole sapere se un certo programma è in fase di esecuzione o meno.
Ti posto questa funzione senza neppure modificarla, stila una lista di
processi attivi (includi la unit tlhelp32).
Procedure Lista ( PList : TStringList );
var
EProcess  : TProcessEntry32;
IsNotLast : Boolean;
begin
hSnapShot:=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
If hSnapShot <> -1 then
   begin
     IsNotLast:=Process32First(hSnapShot,EProcess);
     While IsNotlast  do
     begin
      PList.Add(EProcess.szExeFile);
      IsNotLast:=Process32Next(hSnapShot,EProcess);
     end;
   end;
CloseHandle(hSnapShot);
end;
modificala passando per valore un parametro corrispondente al nome del
processo interessato, e poi verifica se quel processo è attivo o meno.
Se non riesci chiedi pure che ti riscrivo questa procedura in maniera che
faccia ciò che chiedi.
--
- Carlo -
c.b...@libero.it

 guarda l'api findwindow
Come soluzione potrebbe essere buona, purtroppo nessuno assicura che un
processo abbia almeno una finestra.


qualche funzione di delphi? o della shell?
Questo programma possiede o no una finestra ?

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

Scusate l'insistenza, anche se ho gia fatto questa richiesta, ma senza
alcuna risposta :(  ci riprovo...
Come e possibile, includere in un progetto, delle  form senza dover
aggiungere allo stesso tutte le uses a cui fa riferimento la form aggiunta?
Spero di esser stato chiaro...
Grazie
Davide


Prego,
Andrea
Newsgroup: it.comp.lang.delphi
Titolo: Oracle & Delphi7

Ciao a tutti,
sono all'inizio di un nuovo progetto e sono al momento di scegliere quale 
DBMS utilizzare nella mia applicazione, che richiederà estrema velocità di 
interrogazione del DB, estrema stabilità del sistema e la possibilità di 
effettuare lo sviluppo in ambiente Client/Server Windows e Linux.
La domanda è : qualcuno di voi ha già sviluppato in Delphi 7 + Oracle ? I 
due oggetti dialogano bene ? Avete fatto uso di prodotti (VCL,ecc.) 
acquistati da terze parti ? Quali ?
Ero intenzionato a partire con MySQL il quale conosco abbastanza bene.. dato 
che non ho mai lavorato con Oracle, il gap tra i due DBMS è davvero elevato 
? Su quali caratteristiche è elevato il gap ?
Ogni suggerimento è ben voluto !
Grazie, Vittorio

? Su quali caratteristiche è elevato il gap ?
Su quasi tutto. Oracle è costruito per essere un DB high-end con
funzionalità avanzate, ma questo viene ad un prezzo:
1) Richieste hardware elevate.
2) Curva di apprendimento e tuning complesso.
Se non sei esperto, potresti avere cattive sorprese in termini di velocità
di interrogazione rispetto a MySQL.
Luigi D. Sandon - D&amp;D Support Team
--- posted by geoForum on 
http://www.delphiedintorni.it

 Ogni suggerimento è ben voluto !
Il gap e' piuttosto enorme. Diciamo che al confronto MySql e' un 
programmino per studenti.
Comunque ti consiglierei di valutare anche altri DBMS free: postgres ad 
esempio e' spettacolare. E di firebird ho sentito parlare molto bene.
Ciao

Oracle ha il vantaggio di essere "comodo" per lo sviluppatore.
Ha un sql molto potente (vedi rollup...), una miriade di parametri che 
permettono una ottimizzazione paurosa (indici bitmapped, hash e 
tradizionali, partizionamento logico) e dei sistemi per la salvaguardia 
dell'integrità dei dati che sono paurosi.
Lo svantaggio è prima di tutto il costo; poi, serve un *signor server* e 
la sua amministrazione non va presa sotto gamba.
Esistono altri prodotti non free che io valuteri, tipo Sybase, che ho 
usato per un po e l'ho trovato un buon prodotto.
Imho, dovresti prima avere le idee chiare su cosa fa la tua app.
Se devi gestire una mole di dati notevole (ma credo anche Sybase..) 
potrebbero fare per te.
Se si tratta di un applicativo gestionale per piccole e medie imprese, 
il costo di Oracle( sw+server+tuning+amministrazione) renderebbe poco 
competivivo il prodotto dal punto di vista commerciale senza contare che 
potrebbe essere sovradimensionato rispetto alle tue eali esigenze; in 
questo caso un prodotto come firebird potrebbe essere la scelta ottimale.
AS