text mit undelphix anzeigen

[ijcro]

Hello.

You can use drawing throught Surface.Canvas.TextOut like in prototype demo in undelphix 1.07a

Delphi-Quellcode:

  { Draw FrameRate }
  with DXDraw.Surface.Canvas do
  begin
    try
      Brush.Style := bsClear;
      Font.Color := clWhite;
      Font.Size := 10;
      Textout(3, 3, 'FPS: '+inttostr(DXTimer.FrameRate));
      if doHardware in DXDraw.NowOptions then begin
        Textout(3, 14, 'Device: Hardware');
        Textout(3, DXDraw.Height-16-14, 'Change device mode to software press SPACE.')
      end
      else begin
        Textout(3, 14, 'Device: Software');
        Textout(3, DXDraw.Height-16-14, 'Change device mode to hardware press SPACE.')
      end;
      if doFullScreen in DXDraw.NowOptions then
        TextOut(3,DXDraw.Height-16,'For windowed mode press ALT+Enter.')
      else
        TextOut(3,DXDraw.Height-16,'For fullscreen press ALT+Enter.');
    finally
      Release; {  Indispensability  }
    end;
  end;

  DXDraw.Flip;

or you can create bitmap, drawing throught its canvas your text, put into DIB or DXImageList and and rendering it directly from this...