Ver Mensaje Individual
  #21  
Antiguo 04-05-2007
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.572
Reputación: 27
egostar Va camino a la fama
Cita:
Empezado por roman
De cualquier forma, es más- en mi opinión -una técnica para cuando estamos apenas probando o diseñando la función, que para el código final
Yo creo que si puede afectar al código final si no tomamos las medidas necesarias.

Veamos este pequeño ejemplo,

Código Delphi [-]
function TForm1.algo(dato:String):Bool;
begin
  If dato = 'e32er433432e' then
     Result := True;
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  If algo('1234') = True then
     ShowMessage('Validado');
end;

Salud OS.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney
Responder Con Cita