Q&A

  • readme.txt 파일을 열수있는 방법에 대한 질문입니다.
안녕하세요?,,,,,

여러분들 하시는 일 모두 평안하시기를 바랍니다.

프로그램을 만들다가,,,

궁금한 점이있어서,,,적어봅니다.

제가 제작중인 프로그램은 업그레이드를 진행한 이후,,,,

readme.txt 파일을 자동으로 열어 볼려구 하는데요,,,,

어찌해야할지,,, 제가 허접한 초보라 ..

잘 모르겠습니다.

프로그램은 웹에서 파일을 다운로드 받어서,,, 자동 업그레이드를

실행하는 것인데요,,,,

업그레이드를 진행할 때.. readme.txt파일도 함께 다운 받을 생각입니다.

자동으로 readme.txt 파일을 열 수잇는 방법에 관해,,,,

조언 부탁드립니다,,,,,,
1  COMMENTS
  • Profile
    머슴 2002.10.25 22:58
      readme.txt 파일을 어떻게 보여줄것인지에 따라서 방법이
      다를것 같습니다..

          업그레이드를 진행한 이후  ReadMe_Run함수를 호출
         (실행화일과  같은 경로면 경로는 생략가능)
           ReadMe_Run('C:a.txt');


       1) notepad로 직접 보여줌...
        
             procedure TForm1.ReadMe_Run(Const FileName :String);
             var
               s_ExeWithParams : array[0..30] of char;
             begin
              
                StrPCopy(s_ExeWithParams,'NOTEPAD.EXE '+ FileName);
                 if FileExists(FileName) then
                  WinExec(s_ExeWithParams, SW_MAXIMIZE);
             end;

        2) 현재프로그램에서 보여줌

            2-1) RichEdit나 메모로 보여줌(폼을 새로 열어서)
          
           procedure TForm1.ReadMe_Run(Const FileName :String);
           begin
              try
                Form2 := TForm2.Create(Self);
                Form2.RichEdit1.Lines.LoadFromFile(FileName);
                Form2.showmodal;  
             finally
                Form2.Free;
             end;
           end;

            2-2) 메세지박스로 보여줌

              procedure TForm1.ReadMe_Run(Const FileName :String);
               Var
                   Str : TStringList;
               begin
                    Str:= TStringList.Create;
                    Str.LoadFromFile(FileName);
                    Showmessage(Str.Text);
               end;