Newsgroup: it.comp.lang.delphi
Titolo: DdeClientConv multipli

Ciao a tutti,
sto cercando di creare una semplice applicazione in delphi che tramite dde 
si occupi di recuperare da una terza applicazione dei dati finanziari.
Ho utilizzato un DdeClientConv con associati alcuni DdeClientItem e tutto va 
bene, i dati si aggiornano correttamente.
Il problema nasce quando sullo stesso form utilizzo più DdeClientConv, a 
questo punto mi si aggiornano solo i dati dei DdeClientItem associati al 
primo DdeClientCon mentre gli altri
non si aggiornano.
Ho provato a cercare su internet qualche riferimento, qualche possibile 
"trucchetto" per aggirare il problema , ma non ho trovato nulla.
Qualcuno di voi può aiutarmi?
Grazie. 

 non si aggiornano.
si direbbe un bug noto non so se è stato corretto e se hanno trovato un 
workaround.
http://members.aye.net/~bstowers/delphi/bugs/generated/vcl-System.htm
ciao
-- 
Morde

 
http://members.aye.net/~bstowers/delphi/bugs/generated/vcl-System.htm
..."ultimo aggiornamento 1998"...
pensavo che il bug fosse stato risolto con le versioni di delphi successive 
a tale data ,
ho provato anche con delphi 2010 ma il comportamento è sempre lo stesso...

DDE e' considerato deprecated da un pezzo da microsoft.
Venne sostituito molti anni fa con OLE.
A.


Lo so, purtroppo la dde è il solo mezzo per connettermi all'applicazione che 
mi fornisce i dati... 

 mi fornisce i dati...
Chi ha scritto il programma in questione? Se non riesci ad intervenire 
su questo aspetto (upgrading del server a tecnologia ole) ho paura che 
dovrai modificare la logica del client. Magari mettendo più client su 
più form: un accrocchio, lo so.. brrrrr!!! :-/
Ciao
-- 
Morde

Newsgroup: it.comp.lang.delphi
Titolo: come evitare di avviare un programma se questo è già avviato

 spero che abbiate capito)
var Mutex: THandle;
  Mutex := CreateMutex(nil, True, 'AppName');
  if ((Mutex <> 0) and (GetLastError = 0)) then
  begin
    Application.Initialize;
    Application.Title := 'AppName';
    Application.CreateForm(TfrmMain, frmMain);
    Application.Run;
  end
  else
  begin
    CloseHandle(Mutex);
    Application.Terminate;
  end;
-- 
I'am what I'am, I do what I can

  // AGGIUNGERE UNIT AL DPR
  // CONSENTE SOLO UN'ISTANZA DEL PROGRAMMA
unit single;
interface
implementation
uses Windows, SysUtils;
var hnd: THandle;
initialization
  hnd := CreateMutex(nil, True, 'title');
  if GetLastError = ERROR_ALREADY_EXISTS then Halt;
finalization
  if hnd <> 0 then CloseHandle(hnd);
end.
  //Ciao da Andrea

 Grazie, devo metterlo in qualche posizione o form  particolare??
Lo devi inserire all'interno del dpr


Grazie, devo metterlo in qualche posizione o form  particolare??
Come diceva Select, nel dpr: menu' Project->View Source, dopo il begin.
Ciao
-- 
Morde. 
(morde at programmer dot net)

 Come diceva Select, nel dpr: menu' Project->View Source, dopo il
SeLect ???? 
Piango lacrime amare :(((


Piango lacrime amare :(((
eh eh eh..... ;))


 eh eh eh..... ;))
Qui continuiamo a sbagliare caro Select... ooops Setec :)
Mi sa che di devi abituare o modificare il tuo nick...
Purtroppo inganna e come...
Acqua
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG