operator is und as

[Rumpi]

Hi,

versuche doch

Delphi-Quellcode:

procedure FormC.SetBLABLA( Sender: TObject; xxxx ? );
begin
  if Sender is FormA then
  begin
    with Sender as FormA do
    begin



    end;
  end
  else if Sender is FormB then
    with Sender as FormB do
    begin



    end;
end;

du musst schon den Sender übergeben.

Delphi-Quellcode:

FormA ...
   FormC.SetBLABLA( Self, xxxx ?

Ich hoffe es Hilft.

mfg Rumpi