Q&A

  • WINEXEC에서..(고맙습니다^^)
이용남님 답변대로 하니 긍방 되네요..
제가 Pchar(Edit1.text)를 더해서 안됐나봐요 ^-^
고맙습니다..

-----------------------

WINEXEC('notepad ____', SW_SHOWNORMAL)

여기에서 ____부분에 Edit1.text같이 컴포넌트의 텍스트를 넣으려고 합니다. 그런데 Eidt1.text는 속성이 String이라서 PAnsiChar와 다르다고 하네요..
PAnsiChar는 Null이 제거된 String이라는데 Edit1.text에서 Null을 잘라낼 수 있는 방법이나 저곳에 넣을 수 있는 방법은 없을까요?
1  COMMENTS
  • Profile
    이용남 2004.02.10 00:56
    procedure TForm1.Button1Click(Sender: TObject);
    var
      TmpCmd : String;
    begin
      TmpCmd := 'notepad ' + Edit1.Text;
      WINEXEC(PChar(TmpCmd), SW_SHOWNORMAL);
    end;

    이렇게 해보세요.