Hola,
Cita:
|
Empezado por bothy
el codigo
Label1.Caption := IntToStr( StrLen( Edit1.Text) + StrLen( Edit2.Text ) );
no me funciona noce porke .. tengo delphi 2009
|
Si no funciona algo debe ocurrir, como algún error a la hora de compilar. ¿Qué error? Eso es lo que deberías poder decir aquí para mejor ayudarte. Por lo demás, moveré este hilo a "varios", puesto que no se trata de Lazarus, Kylix, etc.
Dicho esto, he probado el código (que escribí "de memoria") y he podido ver que el error es este:
Cita:
|
[DCC Error] Unit2.pas(31): E2250 There is no overloaded version of 'StrLen' that can be called with these arguments
|
Esto es porque "StrLen()" espera un "PChar" y no un "String", así que una posible solución podría ser:
Código Delphi
[-]
procedure TForm2.Button1Click(Sender: TObject);
begin
Label1.Caption := IntToStr( StrLen( PChar(Edit1.Text) ) + StrLen( PChar(Edit2.Text) ) );
end;