Vereinfachen oder Verkürzen

[fkerber]

Hi!

Warum nicht einfach so?

Delphi-Quellcode:

if CB1.Checked then
      ShellExecute(Handle, nil, PChar(f1), nil, nil, SW_SHOW);
if CB2.Checked then
      ShellExecute(Handle, nil, PChar(f2), nil, nil, SW_SHOW);
if CB3.Checked then
      ShellExecute(Handle, nil, PChar(f3), nil, nil, SW_SHOW);

Ciao Frederic