初期化

解決


あーくん  2015-04-28 17:31:45  No: 47226  IP: 192.*.*.*

こんにちは。
Delphi7初心者です。
フォーム上にStringGridをセットし
それに書き込んだ後、
フォームを最初に開いた時の状態に戻すには
どのような関数をコーディングすればよいのでしょうか。さらに

編集 削除
igy  2015-04-28 21:25:32  No: 47227  IP: 192.*.*.*

こんな感じでしょうか?

with StringGrid1 do
    for i := FixedCols to ColCount - 1 do
        for j := FixedRows to RowCount - 1 do
            Cells[i, j] := '';

編集 削除
あーくん  2015-04-29 18:26:58  No: 47228  IP: 192.*.*.*

igyさん、お返事ありがとうございました。
StringGridをCrearにするだけではなく、
フォーム全体を開いた時の状態にしたいのですが、
難しいでしょうか。

編集 削除
igy  2015-04-29 18:42:44  No: 47229  IP: 192.*.*.*

>フォームを最初に開いた時の状態に戻す

>フォーム全体を開いた時の状態

というのは、具体的に、どういうことでしょうか?

フォーム上の他のコンポーネントの初期値もクリアしたいということですか?

編集 削除
あーくん  2015-04-29 19:16:02  No: 47230  IP: 192.*.*.*

igyさん、お返事ありがとうございます。
フォームをオープンした時の各コンポーネントが初期の状態に
出来たらと思っています。

編集 削除
igy  2015-04-29 19:28:16  No: 47231  IP: 192.*.*.*

>フォームをオープンした時の各コンポーネントが初期の状態に

それなら、各コンポーネントの値を初期の状態と同じ値を格納する
しかないと思います。

編集 削除
あーくん  2015-04-29 20:10:16  No: 47232  IP: 192.*.*.*

igyさん、アドバイスありがとうございます。
了解しました。
一つづつ初期値に戻します。

編集 削除