Consola cualquier zona

[yusnerqui]

Hola amigos:

Necesito escribir en cualquier zona de la conzola de delphi. Tengo entendido que existe una unit implementada que tiene funciones que permite hacer esto (GotoXY). Pero no tengo ni idea de donde encontrarla. si alguien me puede ayudar

Gracias por leer mi pregunta

Saludos Yusnerqui

[delphi.com.ar]

Yo tengo hecha esta funcioncita con ese propósito:

procedure GotoXY(ACoord: TCoord); overload;
var
 Handle: THandle;
begin
 Handle := GetStdHandle(STD_OUTPUT_HANDLE);

 SetConsoleCursorPosition(Handle, ACoord);
end;

procedure GotoXY(x, y: SHORT); overload;
var
 ACoord: TCoord;
begin
 ACoord.X := x;
 ACoord.Y := y;
 GotoXY(ACoord);
end;

Saludos!

[yusnerqui]

Muchísimas gracias por la rápida respuesta y la solución

a propócito me pudieras decir como poner las citas debajo del mensage.
Recuerda que soi nuevo en el foro y no debo crear un hilo para preguntar esa tontería o todos me pondrán antes de la respuesta un y yo me pondría .

Bueno perdona la charla y si puedes sácame de esa duda

Gracias y saludos

Yusnerqui

[delphi.com.ar]

Si te refieres a la firma, la tienes en la configuración personal. Tienes que hacer click en "Panel de control" \ "Editar Firma"

Saludos!

[yusnerqui]

Grcias de nuevo

un saludo

Yusnerqui

[linuxfresh]

En esta pagina he encontrado una unidad llamada console, similar a la crt de Turbo Pascal (clrscr, gotoxy, textcolor, etc). La he probado en l nuevo Turbo Delphi y no me ha dado problemas.

http://rvelthuis.de/programs/console.html

Avisen si les sirvio.