For form checkboxes you don't have to put in cbChecked or whatever. Just use this...
Code:
if(CheckBox1.Checked)then
WriteLn('CheckBox one is checked!');
fyi to make 1 command if statements with else statements without begin/ends, you have to get rid of the semicolon.
Example of working code without semicolons:
Code:
program WorkingOneLineIfStatementWithElsesWithoutBeginAndEnds;
var
Number : Integer;
begin
ClearDebug;
Number := Random(5);
if(Number = 0)then
WriteLn('Number equals Zero!')
else if(Number = 1)then
WriteLn('Number equals One!')
else if(Number = 2)then
WriteLn('Number equals Two!')
else if(Number = 3)then
WriteLn('Number equals Three!')
else if(Number = 4)then
WriteLn('Number equals Four!')
end.
Example of not working code with semicolons.
Code:
program NotWorkingOneLineIfStatementWithElsesWithoutBeginAndEnds;
var
Number : Integer;
begin
ClearDebug;
Number := Random(5);
if(Number = 0)then
WriteLn('Number equals Zero!');
else if(Number = 1)then
WriteLn('Number equals One!');
else if(Number = 2)then
WriteLn('Number equals Two!');
else if(Number = 3)then
WriteLn('Number equals Three!');
else if(Number = 4)then
WriteLn('Number equals Four!');
end.
~Ron