bmp2jpeg

[faux]

Bis auf Dialogs brauch ich alles.

Delphi-Quellcode:

program bmp2jpeg;

uses
  Forms, SysUtils, Jpeg, ExtCtrls;

{$R *.res}

var
  jpg: TJpegImage;
  img: TImage; //ExtCtrls
  i: Integer;
  temp: string;
begin
  Application.Initialize; //Hierfür die Forms (klar)
  if (FileExists(ParamStr(1))) and (ExtractFileExt(ParamStr(1)) = '.bmp') then //ParamStr ist in SysUtils
  try
    temp := '';
    for i := 1 to Length(ExtractFileName(ParamStr(1))) - Length(ExtractFileExt(ParamStr(1))) do
      temp := temp + ExtractFileName(ParamStr(1))[i];
    img := TImage.Create(Application); //Hier brauch ich einen Owner
    img.Picture.LoadFromFile(ParamStr(1));
    jpg := TJpegImage.Create;
    jpg.Assign(img.Picture.Bitmap);
    jpg.SaveToFile(ExtractFileDir(ParamStr(1))+'\'+temp+'.jpg');
  except
  end;
  Application.Run;
end.

Ich weiß nicht wie das ohne den Standard-Komponenten von Delphi geht (also ohne ParamStr zB).
Geht das ohne ParamStr überhaupt?