Ver Mensaje Individual
  #1  
Antiguo 15-09-2005
Avatar de papulo
papulo papulo is offline
Miembro
 
Registrado: ago 2005
Ubicación: Lleida - Cataluña - España -Europa - Planeta tierra - Sistema solar - Via Lactea ...
Posts: 542
Reputación: 21
papulo Va por buen camino
CASE/OF... (y la madre del cordero)

Como mi experiencia con DELPHI, calculada en un intervalo de 0 a 100, donde 0 es nada y 100 todo, calculo que estoy a un -25 todavia, es por eso que aun inundare el foro con mis preguntitas de parvulario, pero no por ello menos importantes.

El caso es que estoy intentando que con la instruccion CASE/OF lo siguiente:
Código Delphi [-]
 procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
 begin
  if key = #13 then
  case Edit1.Text of
  VAR : ShowMessage('VAR`');
  INT : ShowMessage('INT');
  else ShowMessage('Escribe mejor, chavalote');}
 end;
 
 end.

A destacar, que en la ayuda pone que CASE/OF no se puede usar con strings.

¿Es correcto lo que he leido, y por ende, absurdo lo que estoy intentando, al menos por este camino?

Suegerencias para hacer lo mismo, seran bienvenidas.

Que pasen un buen dia, chicos!!
Responder Con Cita