我有这个函数声明和实现
public
function AddWordReference(wordId,translateId:Longint):Longint;
{***}
function AddWordReference(wordId,translateId:Longint):Longint;
begin
try
if((wordId <> -1) OR (translateId <> -1)) Then
begin
DataModule1.TranslateDictionary.AppendRecord([nil,wordId,translateId]);
DataModule1.TranslateDictionary.Last;
AddWordReference := DataModule1.TranslateDictionary.FieldByName('Id').AsInteger;
end;
Except
ShowMessage('Error wirh adding reference');
AddWordReference := -1;
end;
AddWordReference := -1;
end;
我有这个错误:
[Error] AddFormUnit.pas(34): Unsatisfied forward or external declaration: 'TForm2.AddWordReference'
如何解决此错误?