Thema: Delphi WinSAT

Einzelnen Beitrag anzeigen

Razor
(Gast)

n/a Beiträge
 
#4

Re: WinSAT

  Alt 5. Okt 2009, 19:07
Well you know when you start WinSAT or Perfomance Index crap it turns it off to analyze your system if its compatible
It stops at that line wich is comented why is that widestring > pchar or what?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i:IWinSATInitiateEvents;
k:_RemotableHandle;
v:integer;
s:widestring;
begin


CInitiateWinSAT1.Create(SELF);
CInitiateWinSAT1.DefaultInterface.InitiateFormalAssessment( i,k) ;
    i.WinSATComplete(v,pchar(s)); //<here it stops and why? WINSAT_STATUS_COMPLETED_SUCCESS 0x40033
  
    if v=$40033 then
    showmessage('no');

end;
  Mit Zitat antworten Zitat