This is done quite easily. It's actually not much different from drawing a line on the form's canvas.

[pascal]
procedure TForm1.DXTimer1Timer(Sender: TObject; LagCount: Integer);
begin
//enter coords to the point you start drawing
DXDraw1.Surface.Canvas.MoveTo(10,10);
//enter coords to the endpoint of your line
DXDraw1.Surface.Canvas.LineTo(100,100);
//never forget this line when drawing on the canvas!
DXDraw1.Surface.Canvas.Release;

DxDraw1.Flip;
end;

procedure TForm1.DXDraw1Initialize(Sender: TObject);
begin
DXDraw1.Surface.Canvas.Pen.Color:=clRed;
end;

end.[/pascal]

Just make make you release the canvas again, else bad things will happen.

Displaying a text is should be easy now
[pascal]
DXDraw1.surface.Canvas.Textout(100,100,'Welcome to DGDev!');
[/pascal]

[size=9px][Edited by BlueCat - hope you don't mind Traveler, I pascal-ed your code tags :twisted: ][/size]