Delphiでアクションゲームが作りたい!!
■ このスレッドは過去ログ倉庫に格納されています
0240デフォルトの名無しさん
NGNG>最初はClientHeightとかだけにしてたんだけど、それでできなかったからForm1付けてみたんだよねー。
なるほど。
でも明示的に、「そのフォームのClientHeightが使いたい!」と書くなら、
Self.ClientHeight
って書くべきですな。
あれ、でもWith do ... の中でSelf使うとCanvasと誤認されて、
「ClientHeightなんてproperty無ぇぞゴルァ」ってコンパイラエラーでるかも。
var
Form: TForm1;
begin
Form := Self;
with Canvas do begin
Brush.Color := clWhite;
FillRect(Rect(0, 0, Form.ClientWidth, Form.ClientHeight));
end;
end;
って書くのが一番正当なやりかたなのかな?
■ このスレッドは過去ログ倉庫に格納されています