DelphiX und Text

[Illuminator-23-5]

Wie kann man im delphiX Text ausgeben?

[Dagon]

meinst du textausgeben auf eine TDXDrwa komponente?

[Illuminator-23-5]

ja, ich zeichne ein Bitmap auf eine TDXDraw und möchte etwas dazuschreiben!

[Dagon]

probiers mal so:

Delphi-Quellcode:

  with DXDraw1.Surface.Canvas do
  begin
    Brush.Style := bsClear;
    with Font do begin
      Name := 'Arial';
      Color := clLime;
      Size := 30;
      Textout(10, 10, 'the_master');
    end;
    Release;
  end;

[Illuminator-23-5]

thanks!
endlich kanns weitergehn

[Dagon]

nichts zu danken!

[ATwardz]

Hi,

bei mir klapp das nit! Es wird einfach kein Text angezeigt!
Ich schreibe

Delphi-Quellcode:

  with DXDraw1.Surface.Canvas do 
  begin
    Brush.Style := bsClear;
    with Font do begin
      Name := 'Arial';
      Color := clLime;
      Size := 30;
      Textout(10, 10, 'the_master');
    end;
    Release;
  end;

in die Timermethode und sie wird immer ausgeführt doch es kommt einfach kein TEXT!

Bin ein wenig ratlose!

Danke für Hilfe!

[Dagon]

Schreibe oberhalb einfach noch DXDraw1.Flip hin, dann sollte es funktionieren.

[Florian H]

evtl. zeichnest du auch erst den text und dann das bitmap --> text wird überdeckt

[ATwardz]

Ja danke, ich hatte erst die Sprites gezeichnet und dann den Text!
Flip habe ich nach der Textausgabe stehen gelassen!

Danke