проблемы, определяющие методы

Question

Я пытаюсь определить частный метод у меня есть:

unit FormENP; 

interface 

uses 
    .... 

type 
    TENPDataEntry = class(TForm) 
    ........ 
    private 
    { Private declarations } 
    function getLastIdMuestra(): integer; 

    public 
    { Public declarations } 
    end; 

var 
    ENPDataEntry: TENPDataEntry; 

implementation 

{$R *.dfm} 
{ Devuelve el id de la última muestra insertada en <MUESTRA> } 
function getLastIdMuestra(): integer; 
var 
    query: TIBQuery; 
    id: integer; 
begin 
    query := TIBQuery.Create(nil); 
    .... 
    id := query.Fields[0].AsInteger; 
    query.Destroy; 
    getLastIdMuestra := id; 
end; 
... 
End. 

Но компилятор говорит:

[DCC Error] FormENP.pas (30): E2065 Неудовлетворенный вперед или внешний объявление: 'TENPDataEntry.getLastIdMuestra'

строка 30 является метод подписи:

функция getLastIdMuestra(): integer;

Im новичок в Delphi, любые идеи?. Я думаю, что код хорошо ...

Answer 1

Вы пропустили имя класса в определении метода, попробуйте

function TENPDataEntry.getLastIdMuestra(): integer;