Ver Mensaje Individual
  #1  
Antiguo 17-09-2006
astut astut is offline
Miembro
 
Registrado: sep 2006
Posts: 19
Reputación: 0
astut Va por buen camino
Lightbulb Error con funcion

Hola a todos, estoy haciendo una funcion para una cosa, y me dice que "Edt_1,text" no ha sido declarado, cuando si esta declarado o.o:
Código Delphi [-]
unit formulario1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TFrm_pl = class(TForm)
    Edt_1: TEdit;
    Btn_n1: TButton;
    Btn_n3: TButton;
    Btn_o1: TButton;
    Btn_n2: TButton;
    Btn_n4: TButton;
    Btn_n7: TButton;
    Btn_n8: TButton;
    Btn_n5: TButton;
    Btn_n6: TButton;
    Btn_n9: TButton;
    Btn_o2: TButton;
    Btn_o3: TButton;
    Btn_n0: TButton;
    Btn_o4: TButton;
    Btn_o6: TButton;
    Btn_o5: TButton;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
 Frm_pl: TFrm_pl;

implementation
 {$R *.dfm}
 var usado: integer;
 function insertar(numero: string): integer;
 begin
  if (usado= 0) then
  begin
   Edt_1.Text:= '';
   usado:= 1;
  end;
  Edt_1.text:= Edt_1.text + numero;
 end;

end.
¿Que he hecho mal?, seguramente no habre puesto la funcion donde debia, o hay solo se ponian prototipos si es asi, donde se pone la definicion, bueno, espero que puedan sorventar mis dudas ^^ thanks
Responder Con Cita