Joined: 11 Oct 2007 Posts: 231 Location: I have alzheimer's.
Posted: Sat Mar 29, 2008 6:28 pm Post subject: [Help - Delphi] What is this?
Quote:
procedure TAutoClick.Timer1Timer(Sender: TObject);
begin
if Odd(GetAsyncKeyState(VK_F8)) then
begin
Inc(Int1); //here
if odd(Int1) then //here
begin
AutoClickCheckBox.Checked:=true;
AcTimer.Enabled:=True;
end
else
begin
AutoClickCheckBox.Checked:=False;
AcTimer.Enabled:=False;
end;
end;
begin
if Odd(GetAsyncKeyState(VK_F9)) then
application.Terminate;
end;
begin
if odd(GetAsyncKeyState(VK_F10)) then
MessageBoxA(Handle,'Made by Anden100'
+#13 + #10 +
'Thanks to Sponge for hookHop.dll'
,'Notes',0);
end;
if Odd(GetAsyncKeyState(VK_F11)) then
begin
Inc(Int1);
if odd(Int1) then//If on
begin
AutoClickCheckBox.Font.Color:=clWhite;
Label1.Font.Color:=clWhite;
Label2.Font.Color:=clWhite;
end
else//If off
begin
AutoClickCheckBox.Font.Color:=clBlack;
Label1.Font.Color:=clBlack;
Label2.Font.Color:=clBlack;
end;
end;
end;
What is it? I keep trying to compile it but it says undeclared identifier. Could someone explain it to me please?
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum You cannot attach files in this forum You can download files in this forum