関数の引数の渡し方 (ID:28192)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

その FON という関数はどこでどのように定義しているのでしょうか．
ちょっと考えられないエラーですね．
以下のコードではエラーは発生しません．
動作確認環境  WindowsXP(SP2) Delphi7 Pro

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    CheckBox1: TCheckBox;
    procedure Button1Click(Sender: TObject);
  private
    { Private 宣言 }
    procedure FON(Sender: TObject ; i : Integer);
  public
    { Public 宣言 }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

//  Button1のクリックイベント(これはイベントです)

procedure TForm1.Button1Click(Sender: TObject);
begin
     FON(CheckBox1,1);
end;

//  自前で定義した関数(メソッド)

procedure TForm1.FON(Sender: TObject; i: Integer);
begin
//
end;

end.

>そもそも，Objectと変数は一緒に引数とならないでしょうかね．

そんな制限は全くありません．参考書やネットのコードを見て下さい．
もちろん，イベントには制限があります．イベントの引数の数と型と，その順
序は決まっていて変更できません(初心者の段階ではそう思っていて下さい)．

どのイベントがどのような引数を持つかは，ヘルプで該当イベントを見れはすぐ
わかります．例えばエラーで表示された TNotifyEvent をヘルプで見ると，

procedure (Sender: TObject)

となっていて，TObject だけの引数です．

←解決時は質問者本人がここをチェックしてください。

戻る