Ver Mensaje Individual
  #4  
Antiguo 31-10-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Hola Emiwolf, yo creo que lo has borrado el codigo que te genera el Ide y has cambiado por el que pones y por eso te da el error, tienes que respetar el codigo que se genera y sobre ello ir aumentando codigo.

Ahora si quieres aumentar un procedimiento, lo puedes hacer tanto en la parte private como en la public.

Código Delphi [-]
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;
type
  TForm1 = class(TForm)
  private
    { Private declarations}
  public
    { Public declarations}
    procedure Blanco;
  end;
var
  Form2: TForm2;
implementation
{$R *.dfm}
procedure TForm2.Blanco;
begin
 showmessage ('Hola ');  
end;
 
end.

Ahora puedes añadir un boton a tu formulario y llamar a esa función.

Código Delphi [-]
procedure TForm2.Button1Click(Sender: TObject);
begin
 Blanco;
end;

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita