Einzelnen Beitrag anzeigen

Benutzerbild von retnyg
retnyg

Registriert seit: 11. Feb 2005
193 Beiträge
 
#1

retDebug - Debug.Print-Ersatz für Easy Debugging

  Alt 30. Okt 2005, 16:11
Bei Visual Basic gibts Debug.Print, mit dem man einfach eine Vielzahl von Werten ins DebugWindow schreiben lassen kann, ohne immer durch den Code zu steppen.

Davon inspiriert habe ich ne kleine Unit geschrieben, basierend auf WM_COPYDATA.

Das ServerProgramm hat ein Memo, in dem alle Debug-NAchrichten aus dem Client angezeigt werden.

Der Aufruf ist denkbar einfach:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var x: integer;
begin
   x := $DEAD;
   DebugInit(form1.handle);
   SendDebugString(edit1.Text);
   SendDebugString(inttostr(x));
end;
download: http://krazz.net/retnyg/retDebug.zip
  Mit Zitat antworten Zitat