Autor Beitrag
Luck0r
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Mo 12.04.04 22:27 
Gibt es eine Möglichkeit einen Text direkt auf dem Screen auszugeben? Also das ich z.B. angebe (500, 500, 'TEXT') und das dieser TEXT dann an der Stelle 500,500 unabhänig von der Position und Größe der Form. Also das der Text einfach dortsteht ohne das dort auch die Form sein muss und der text muss über allen programmen zu sehen sein .
obbschtkuche
Gast
Erhaltene Danke: 1



BeitragVerfasst: Mo 12.04.04 22:33 
Am einfachsten geht es wohl über TCanvas:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
with TCanvas.Create do
try
 Handle := GetDC(0);
 Brush.Style := bsClear;
 TextOut(500,500,'TEXT');
 ReleaseDC(0, Handle);
finally
 free;
end;
Luck0r Threadstarter
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Di 13.04.04 10:07 
kann man da auch die textfarbe oder größe irgentwie verändern ?
und machen das der text über allen programmen steht ?
obbschtkuche
Gast
Erhaltene Danke: 1



BeitragVerfasst: Di 13.04.04 10:31 
Canvas hat eine Eigenschaft Font, mit der kannst du das einstellen.
Und der Text steht doch über allen Programmen...?