procedure TForm1.Button1Click(Sender: TObject);
var i,j:integer;
begin
randomize;
for i:=0 to 10 do
begin
button2.Left:=random(100);
button2.Top:=random(100);
Application.ProcessMessage
until button2.OnClick;
end;
end;
버튼2가 눌러졌을경우 버튼2의 소스를 실행하구다시 for문으로 돌아오는 소스있니다..
오류가 나네여..
오류내용은 [Error] Unit1.pas(47): '.' expected but ';' found입니다 무슨오류인가여?