No.2ベストアンサー
- 回答日時:
Senderの型をキャストしましたか?
例えば、
if Sender is TButton then begin
ShowMessage(ColorToString((Sender as TButton).Font.Color));
end;
というクリックイベントを、ボタンと、ビットボタンとスピードボタンのonClick に設定してやると、ボタンとビットボタンの時のみ表示されます。
これを応用して、クリックするのがサブクラスであれば、そのサブクラスにキャストしてやれば読めるはずですよ。
type TMyButton=object(TButton)
public
TestParameter:string;
end;
だとし、そのボタンを配置し、押された場合、onclickイベントで、
ローカル変数
var Data:string;
として
if sender is TMyButton then begin
Data:=(sender as TMyButton).TestParameter;
~Dataに対する処理
end;
で、読めるはずです。
参考URL:http://fdelphi.nifty.com/
No.1
- 回答日時:
詳しく説明出来るほどの知識はないですが、、、
自分で作成した手続きなら渡せるのでは無いでしょうか?
procedure TForm1.Button1Click(Sender: TObject);
var cnt : integer;
begin
cnt := 1;
ShowMessage('cnt は' + IntToStr(Cnt));
func_A(Sender,cnt);
ShowMessage('cnt は' + IntToStr(Cnt));
end;
procedure TForm1.func_A(Sender: TObject; var i:integer );
begin
ShowMessage(TButton(Sender).Caption + 'から' + IntToStr(i) +
'が渡されました' + #13#10 + '1を足します');
Inc(i);
end;
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(プログラミング・Web制作) pythonのグローバル変数 2 2022/11/25 18:02
- JavaScript カラーミーショップのsectionループ内で、[引数][戻り値]ありの関数的な処理を行いたいです。 1 2022/05/07 19:39
- C言語・C++・C# C言語初心者 ポインタについて、お助けください、、 2 2023/03/15 23:50
- C言語・C++・C# C言語のwhileを含む関数について 2 2022/12/16 12:28
- C言語・C++・C# C# DatagridviewにExcelシートを反映するとエラーが出る 2 2023/05/06 17:12
- Excel(エクセル) エクセルの自動更新のタイミングについて 1 2022/07/20 16:12
- FTTH・光回線 グローバルIPアドレスの変更について 1 2022/04/23 05:32
- HTML・CSS HTMLタグのあるCSVファイルを利用する方法 4 2023/03/19 14:41
- 英語 数字の単位について教えてください 6 2022/11/10 08:25
- メディア・マスコミ ドコモ 最大529万件の情報流出か なんか毎年のようにある流出。誰が悪いの? 9 2023/03/31 17:30
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBA(エクセル)で自動的にボタン...
-
バックスペース機能の作り方
-
C♯初心者で、四則演算の電卓を...
-
フォームの再読み込み
-
Vba 電卓 一文字消すボタン
-
ユーザーフォームに別シートか...
-
VB6コントロール配列をパラメー...
-
VBA CommandButtonの文字ずれ
-
C#プログラムで、ボタンをショ...
-
ボタンの状態
-
TextBoxでEnterキーを押すと、...
-
フォームの×ボタンを無効にする...
-
C#でFormのタイトルバーにボタ...
-
VBAのボタンの位置が変わって困...
-
閉じると「+」になり開くと「-...
-
VB.NETで起動したEXCELのシート...
-
最大化ボタンを非表示にしたい...
-
[Excel VBA]コマンドボタンの入...
-
ユーザーフォーム中の入力順番...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA シートのボタン名を変更し...
-
VBA(エクセル)で自動的にボタン...
-
フォームの再読み込み
-
ユーザーフォームに別シートか...
-
VBA CommandButtonの文字ずれ
-
セルをマクロのボタンにしたい。
-
Excel VBA Application.caller...
-
コマンドボタンやイメージにマ...
-
Access VBA でデータペーストを...
-
VBAのボタンの位置が変わって困...
-
ボタンをマウスで押し続けたと...
-
ボタン
-
C#プログラムで、ボタンをショ...
-
VBA でのボタンの移動について
-
閉じると「+」になり開くと「-...
-
ダウンロードダイアログをVB...
-
[Excel VBA]コマンドボタンの入...
-
ASP.Net ラベルの内容をすぐに...
-
プロシージャからイベントをコ...
-
CommandButtonのCaptionを変化...
おすすめ情報