Это кусок кода для работы с классами. Т.е. создал класс Tso и описал процедуры.
[DCC Error] Unit2.pas(68): E2065 Unsatisfied forward or external declaration: 'Tso.Eat'
Проблема в том, что я не описал процедуру, но её же пока не нужно описывать?
unit Unit2;
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls;
type
Ts=record
Eat: string[20];
Name: string[30];
Year: string[5];
end;
type
TForm2 = class(TForm)
GroupBox1: TGroupBox;
Label1: TLabel;
.....
Button2: TButton;
Button3: TButton;
procedure Button3Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
type
TSo=class
procedure Eat;
end;
var
Form2: TForm2;
my: TSo;
f: file of Ts;
implementation
{$R *.dfm}
end.