Проблема с потоком

[Araver]

Организую поток(данные приходят с порта) Выдаёт ошибку:
"Unsatisfied forward or external daclaration:'TObrabotka.UpdateChar' "
вот код модуля:

unit StartThread;
interface
uses
Classes;
type
TObrabotka = class(TThread)
private
i:integer;
procedure UpdateChart;
{ Private declarations }
protected
procedure Execute; override;
end;
implementation

{ TObrabotka }
procedure TObrabotka.Execute;
begin
//Synchronize(UpdateChart);
{ Place thread code here }
end;
end.

Что не так в выделеной строке, или ещё где???

[mihali4]

Процедуру объявили. Ну, и где она? Где сама процедура-то?

[Araver]

Сообщение от mihali4

Процедуру объявили. Ну, и где она? Где сама процедура-то?

unit StartThread;
interface
uses
Classes;
type
TObrabotka = class(TThread)
private
i:integer;
procedure UpdateChart;
{ Private declarations }
protected
procedure Execute; override;
end;
implementation
{ Important: Methods and properties of objects in visual components can only be
used in a method called using Synchronize, for example,
Synchronize(UpdateCaption);
and UpdateCaption could look like,
procedure TObrabotka.UpdateCaption;
begin
Form1.Caption := 'Updated in a thread';
end; }
{ TObrabotka }
procedure TObrabotka.Execute;
begin
Synchronize(UpdateChart);
{ Place thread code here }
end;
procedure UpdateChart;
begin
end;
end.

А если так? Один фиг, не в этом дело. Даже ума не приложу.

[AlDelta]

Что не так в выделеной строке, или ещё где???

Что-то не так в выделеной строке... не так

procedure TObrabotka.UpdateChart;
begin
end;

Пристальное внимание порождает напряжение. (Ишхан Геворгян)

[Araver]

Сообщение от AlDelta

Что-то не так в выделеной строке... не так

procedure TObrabotka.UpdateChart;
begin
end;

Пристальное внимание порождает напряжение. (Ишхан Геворгян)

Огоромный сенкс!!!