type
TMyThread = class(TThread)
private
Msg: String;
procedure View;
public
procedure Execute; override;
end;
이렇게 선언하구...........
procedure TMyThread.View;
begin
tc.Memo1.Lines.Add(Msg);
end;
procedure TMyThread.Execute;
begin
while not Terminated do
begin
try
Msg := tc.IdTCPClient1.ReadLn;
Synchronize(View);
except
Terminate;
end;
end;
end;
이렇게 작성하면 에러가납니다.........
에러는
missing operator semicolon
method identifier expected라는 에러가 납니다.......제발좀 도와주세여...
> type
> TMyThread = class(TThread)
> private
> Msg: String;
> procedure View;
> public
> procedure Execute; override;
> end;
>
>
> 이렇게 선언하구...........
> procedure TMyThread.View;
>
> begin
> tc.Memo1.Lines.Add(Msg);
> end;
>
> procedure TMyThread.Execute;
> begin
> while not Terminated do
> begin
> try
> Msg := tc.IdTCPClient1.ReadLn;
> Synchronize(View);
> except
> Terminate;
> end;
> end;
> end;
> 이렇게 작성하면 에러가납니다.........
> 에러는
> missing operator semicolon
> method identifier expected라는 에러가 납니다.......제발좀 도와주세여...
세미콜론이 없다네요..
메소드가 있어야한다구 하네요..
어느줄에서 에러가 났는지 확인해보세요..
이상..영원한 초보 어린왕자였습다.