Advertisement
Skygen

qwert

Oct 25th, 2013
51
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.10 KB | None | 0 0
  1. Memo1.Clear;
  2. for i := 0 to SpinEdit1.Value do
  3. if (i mod 3 <> 0) then Memo1.Lines.Add(IntToStr(i));
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement