Autor Beitrag
retnyg
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2754

SNES, GB, GBA, CPC, A500, 486/66, P4/3.0HT: NintendOS, AmigaOS, DoS
Delphi 5, Delphi 7
BeitragVerfasst: So 30.10.05 18:18 
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:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
procedure TForm1.Button1Click(Sender: TObject);
var x: integer;
begin
   x := $DEAD;
   DebugInit(form1.handle);
   SendDebugString(edit1.Text);
   SendDebugString(inttostr(x));   
end;


download: krazz.net/retnyg/retDebug.zip

_________________
es gibt leute, die sind genetisch nicht zum programmieren geschaffen.
in der regel haben diese leute die regel...