teclado numerico virtual

[ecfisa]

Hola erik.

No entiendo bién que es lo que deseas hacer...

Lo normál en una calculadora es que se simule un display, si decidieras usar un TPanel en lugar del TEdit, usando el código de roman, sólo deberías cambiar:

Código Delphi [-]
procedure TForm1.ButtonClick(Sender: TObject);
begin
  Panel1.Caption := Panel.Caption + Chr(Ord('0') + (Sender as TControl).Tag);
end;

Saludos.

[novato_erick]

Ok en realidad no es calculadora
Es en un formulario de caja por ejemplo (donde se usa un scaner de codigo de barra), luego el siguiente edit es donde pongo las cantidades. y en caso de utilizar el formulario de pagos?

Thank u...