|
|
 |
 |
|
Paypal | |
|
FTP | |
|
CCD | |
|
Buscar | |
|
Trucos | |
|
Trabajo | |
|
Foros | |
|
#2
07-10-2003
|
|||
|
|||
|
Puedes probar algo así
Código:
procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
begin
if Memo1.Lines.Count > 1 then
Key := #0;
end;
|
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
 |
|
Modo Hilado