Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #27  
Antiguo 08-08-2017
Juampi Juampi is offline
Miembro
NULL
 
Registrado: may 2017
Posts: 14
Poder: 0
Juampi Va por buen camino
Gracias

Hola ecfisa.

El primero me dio error, este era el código:

Código Delphi [-]
implementation

uses LCLType, strutils, windows;

{$R *.lfm}

{ TForm1 }

{___________________________________________________________________________________________________  _________________________________________________________

--- FORM ON CREATE ---
____________________________________________________________________________________________________  _________________________________________________________}

procedure TForm1.FormCreate(Sender: TObject);
begin
  Application.OnIdle := @ApplicationEventsIdle;
  ult := 0;
  sobreescriboNro := true;
  sobreescriboOp := false;
  sobreescriboOp2 := false;
  ok := true;
  coma := false;
end;

Y me daba el error: Error: Identifier not found "ApplicationEventsIdle"

Luego fui al inspector de objetos, pestaña eventos e ingresé en el "OnEnter" y usé el segundo código que me pasaste:

Código Delphi [-]
{___________________________________________________________________________________________________  _________________________________________________________

--- DISPLAY ---
____________________________________________________________________________________________________  _________________________________________________________}

procedure TForm1.displayEnter(Sender: TObject);
begin
  HideCaret(display.Handle); {ESCONDO EL CURSOR}
end;

Y ese si me funcionó, muchas gracias.

Actualizo lista de lo que recuerdo que me queda de este mini proyecto:
  1. Que vaya operando y actualizando el resultado a medida que voy presionando los signos y no recién cuando aprieto el botón =.
  2. Programar algunos botones más como el de porcentaje o el de raíz cuadrada.
  3. Poder hacer "infinitas" operaciones.
  4. Corregir el asunto de que el foco queda en el último botón clickeado con el mouse y si mezclo uso de teclado con mouse el Enter me ejecuta dos acciones, la que corresponde que es el botón = y a continuación el último botón presionado.
  5. Ir poniendo punto para separar los miles.

Muchas gracias.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Opinión sobre la estabilidad actual de Lazarus/Free Pascal Toni Lazarus, FreePascal, Kylix, etc. 34 06-02-2016 01:04:45
Soy desarrollador de Delphi ¿Que necesito saber para usar Lazarus? Godzuki Linux 7 23-02-2012 23:54:34
Lazarus, Nemesis Pascal rmendoza83 Varios 1 08-01-2009 17:41:08
Indy soporta Free Pascal/Lazarus Delfino Noticias 6 15-01-2006 10:55:55
Free Pascal y Lazarus Magician^ Noticias 7 31-03-2004 19:12:04


La franja horaria es GMT +2. Ahora son las 08:33:41.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi