Tema: 2 cositas a ver si me ayudan
Ver Mensaje Individual
  #3  
Antiguo 13-08-2006
Avatar de vtdeleon
vtdeleon vtdeleon is offline
Miembro
  
Registrado: abr 2004
Ubicación: RD & USA
Posts: 3.236
Reputación: 24
vtdeleon Va por buen camino
2) Anteriormente se trató algo parecido, pero no encuentro el hilo. Por ahora he hecho esto (se puede mejorar).
Código Delphi [-]
var
  n:integer;
  Cadena:string;
begin
  Cadena:=edt1.Text;
  n:=Length(Cadena);
  if (n=0) or (cadena[n]=' ') then
      key:=UpCase(key)
__________________
Van Troi De León
(Not) Guía, Code vB:=Delphi-SQL, ¿Cómo?
Viajar en el tiempo no es teóricamente posible, pues si lo fuera, ya estarían aqui contándonos al respecto!
Responder Con Cita