Novata necesita Ayuda

[[gatosoft]]

Este es un paréntesis dentro de este hilo....

Solo quiero llamar la atención sobre algo muy peculiar aqui, sin ánimo de crear polemica...

Lo que quiero decir es que en "otras circunstancias", los moderadores habrian entrado a este hilo y le habrian "tirado las orejas" a quien inicio el hilo por no poner un titulo mas descriptivo sobre el problema, y lo hubieran remitido a la guia de estilo (sin responder la pregunta)....

Por el contrario ante un titulo tan sugestivo, todos hemos caido prestos en ayuda de la dama... (yo cai, pero vi que ya no necesitaba ayuda, jejejeje)

Bueno, pero eso esta bien... hay que ser caballero y a las damas se les perdona todo, sobre todo en nuestro club, en donde casi no hay...


Saludos.... y esperamos verte mas por aqui day_eli, aqui todas son siempre bienvenidas...

[[Al González]]

¡Hola a todos!

Para ser sincero, entré a leer este hilo por mera curiosidad de ver cómo se le respondía a nuestra amiga, sospechando lo que luego descubrí.

Empezado por gatosoft

...en "otras circunstancias", los moderadores habrian entrado a este hilo y le habrian "tirado las orejas" a quien inicio el hilo por no poner un titulo mas descriptivo sobre el problema, y lo hubieran remitido a la guia de estilo (sin responder la pregunta)...

Lo mismo medité.

Pero esto:

Empezado por gatosoft

...hemos caido prestos en ayuda de la dama... (yo cai, pero vi que ya no necesitaba ayuda, jejejeje)

Bueno, pero eso esta bien... hay que ser caballero y a las damas se les perdona todo, sobre todo en nuestro club, en donde casi no hay...todas son siempre bienvenidas...

Me dejó sin palabras. Sé que tu último comentario es bien intencionado Gatosoft, pero en lo personal me parece algo sexista. Mas sólo es una observación.

Me alegro que hayas recibido ayuda Day_eli, no dejes de plantearnos tus dudas sobre Delphi. Aquí son todos bienvenidos, sin preferencia de género. Pero te sugiero utilizar títulos más descriptivos para los mensajes, así será más fácil que alguien con experiencia en el tema se interese en responder.

Un abrazo de camaradas.

Al González.

[Wellnic]

Quería llamar la atención sobre un pequeño detalle, y es que usando directamente el evento Edit1KeyPress, el código se ejecuta antes de actualizarse el TEdit (al menos en mi querido Delphi 3. ¿No sería mejor utilizar un Timer?:

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
Timer1.Enabled:= True;
end;


procedure TForm1.Timer1Timer(Sender: TObject);
begin
      IF Trim(Edit1.Text)=''THEN
      BEGIN
           IF(Key=#69)OR(Key=#86)THEN //E=69 - V=86 .. Utiliza la propiedad "CharCase" en ecUpperCase
              Exit
           ELSE
              Key:=#0;
      END
      ELSE
      BEGIN
           IF Key = #8 THEN Exit; // Tecla 
           IF (Key<#48)OR(Key > #58) THEN
               Key:=#0;
      END;
end;

Timer1.Enabled:= False;
End;

Asimismo, en el Object inspector conviene ponerle al Timer las propiedades Enable a False e Interval a 1.

[BuenaOnda]

.... sabes me resulta raro lo que dices...

[[AzidRain]]

Tienes razón Román, me confundí con el equivalente de MaskEdit de DevExpress que viene mas completo...

Contestando a nuestra amiga:

Pon esto en el onKeyPress del Edit

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  // Si la tecla NO es una V o E y es el primer caracter...lo eliminamos
   If ((Key<>'E') and (key<>'V')) and (Length(Edit1.Text)=0) Then
     key:=chr(00);
   //Aqui pon la validacion para los numeros...me dio flojera poner todo el 
código...jeje

end;

Solo permite E como primer caracter y V como segundo, los demas pueden ser cualesquiera

[Wellnic]

Empezado por BuenaOnda

.... sabes me resulta raro lo que dices...

Si pones esto:

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
Label1.Caption:= Edit1.Text;
end;

¿te aparece en el Label lo mismo que en el edit? A mí me sale con una pulsación de retraso.

[BuenaOnda]

okis pero para lo que tu expones yo utilizaria el evento Change del edit..

[Wellnic]

¡Anda, pues es verdad! A veces me complico la vida sin motivo. No había caído en que Key trae la última tecla pulsada. Ahora todo concuerda.

[Neftali [Germán.Estévez]]

Empezado por gatosoft

Este es un paréntesis dentro de este hilo....
Lo que quiero decir es que en "otras circunstancias", los moderadores habrian entrado a este hilo y le habrian "tirado las orejas" a quien inicio el hilo por no poner un titulo mas descriptivo sobre el problema, y lo hubieran remitido a la guia de estilo (sin responder la pregunta)....

Paréntesis bien hecho por cierto....
Personalmente no reo que exista diferencia con otros hilos, simplemente que a veces se nos pasan algunos (como ha sido este el caso).

Relacionado con este yo quiero hacer otro paréntesis...
¿Porqué hay que ser moderador para sugerirle a un usuario que escriba un título descriptivo o revise la Guía de Estilo?
Estamos hablando de sugerir o aconsejar y eso podemos hacerlo todos...
Como muestra dos botones, 1 y 2.

[day_eli]

Gracias...para la proxima tratare de colocar un titulo mas explicativo , lo que pasó fue que en ese momento me sentía mas novata que de costumbre por no saber realizar algo que parece tan sencillo y eso hizo que se me ocurriera colocar un titulo así....
En realidad me han servido de gran ayuda muchachos, muy caballeros todos!!!.