폼show 부분을 주석처리하니까 실행되는 걸로봐서
코딩이 잘못되었는지 의심이 가는데요
잘모르겠습니다!
위도우2000에서는 잘돌아가는데 왜 윈도98 , 윈도me에서는 에러가 날까요?

unit UPath;

interface

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

type
  Tfrmpath = class(TForm)
    btnSave: TBitBtn;
    btnClose: TBitBtn;
    pnlpath: TPanel;
    drvcbo: TDriveComboBox;
    dirlst: TDirectoryListBox;
    filelst: TFileListBox;
    procedure btnCloseClick(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
    procedure filelstChange(Sender: TObject);
    procedure FormShow(Sender: TObject);
    procedure btnSaveClick(Sender: TObject);
    procedure drvcboChange(Sender: TObject);


  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  frmpath: Tfrmpath;

implementation

uses IniFiles;

{$R *.dfm}  

procedure Tfrmpath.btnCloseClick(Sender: TObject);
begin
  close;
end;

procedure Tfrmpath.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  action := cafree;
end;

procedure Tfrmpath.filelstChange(Sender: TObject);
begin
  pnlpath.Caption := ' 경로 : ' + filelst.FileName;
end;

procedure Tfrmpath.FormShow(Sender: TObject);
var
  p_ini : TiniFile;
  ls_filename, ls_path : String;
begin
  p_ini := TiniFile.Create('ITACADEMY.ini');
  ls_filename := p_ini.ReadString('System','Dbname',' 경로 : ');
  pnlpath.Caption := ls_filename;
  ls_path := p_ini.ReadString('System','Path',' 경로 : ');
  p_ini.Free;
  if trim(pnlpath.Caption) <> '경로 :' then
    begin
      drvcbo.Drive := ls_path[1];
      dirlst.Directory := ls_path;
      filelst.FileName := ls_filename;
    end;
end;

procedure Tfrmpath.btnSaveClick(Sender: TObject);
var
  p_ini : TiniFile;
  ls_path : String;
begin
  p_ini := TiniFile.Create('ITACADEMY.ini');
  ls_path := dirlst.Directory;
  p_ini.WriteString('System','Path',ls_path);
  p_ini.WriteString('System','Dbname',filelst.FileName);
  p_ini.Free;
end;

procedure Tfrmpath.drvcboChange(Sender: TObject);
begin
  dirlst.SetFocus;
end;

end.

답변부탁드리겠습니다.