아래보면 type이 틀리지요..

function MessageBox(const Text, Caption: PChar; Flags: Longint): Integer;

procedure ShowMessage(const Msg: string);



//이렇게 하시면 됩니다../////////////////////////



procedure TForm1.Button1Click(Sender: TObject);

var hahaha:string;

begin

hahaha := '하하하';

application.MessageBox(pchar(hahaha), '정보',MB_OKCANCEL);

end;





델피초보 wrote:

> 다음의 에러 이유를 잘모르겠습니다!

> 프로시저~~

> var c_test:integer;

> var hahaha:string;

> begin

> showmessage(hahaha); => 에러발생하지 않음

> 아래문장에서 에러발생

> c_test=application.messagebox(hahaha,'테스트',mb_ok);

> hahaha변수사용부분의 데이터 타입이 잘못되었다나 뭐래나

> 위의 문장은 잘실행 되는데

> 아래의 문장에서 에러가 발생하는 이유를 모르겠습니다.

> 똑같은 문자형 변수를 사용했는데

> 왜 에러가 날까요?

> 답변해주시변 감사하겠습니다.

>

> end

> end