掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TStringGridで内容を変更するには・・・ (ID：28615)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
はじめまして。 いつも拝見させていただいております。 Delphiをやり始めて２ヶ月の初心者です。 初歩的な質問かと思いますが、ご教授いただきたく、投稿しました。 よろしくお願い致します。 環境はDelphi7、WindowsXPです。 内容は、TStringGridの１列目に関してなのですが、 ここに入れる項目は、設定不要・設定する・設定しない、のどれかが必ず入るようになっています。 設定不要と書いてある場合は、編集不可。 設定する・設定しないと書いてある場合は、編集可能で、 かつ、そのセルをダブルクリックするたびに、 設定する・設定しないが、交互に入れ替わるようにしたいです。 resourcestring NOT_PRT_WORD = '設定しない'; PRT_WORD = '設定する'; NOT_WORD = '設定不要'; procedure TForm1.TStringGrid1DblClick(Sender: TObject); begin with TStringGrid1 do begin if Col = 1 then begin if TStringGrid1.Cells[1,Row] := NOT_WORD then begin TStringGrid1.Options := TStringGrid1.Options - [goEditing]; end else begin PRT_WORD := not PRT_WORD; //ここでエラーが出ます NOT_PRT_WORD := not NOT_PRT_WORD; //ここもエラーが出ます end; end; end; end; どなたか、方法をご存知の方がいらっしゃいましたら、 ご教授いただけないでしょうか？ よろしくお願い致します。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.