>>207
こういう方法もあるよ。
http://members.jcom.home.ne.jp/monazilla/document/directwrite.html

>>209
forでは無理
俺はこうしてる。
i := 0;
while i < 10 do
begin
//処理
Inc(i, 2);
end;