전 피씨에서 휴대폰으로 문자메세지를 보내는 프로그램을 함 짜보는중입니다..



근데 shellExecute에서 정의가 안됐다구 하네여...정의를 어디다 해야할지 모르겠습니다



고수님들 부탁합니다...



procedure TForm1.Button1Click(Sender: TObject);

var SndString : String;

Callnum, reqnum, reqname, text : string;



begin

callnum := '0112223333';

reqnum := '0114445555';

reqname := '거니';

text := '받니';



SndString := 'http://www3.joins.co.kr/messenger/bin/Telsend.dll?input&' +

'+callnum='+callnum+'&reqnum='+reqnum+'&reqname='+reqname+'&text='+text;



ShellExecute(GetDesktopWindow, 'open', PChar(SndString),nil,nil,SW_SHOWNORMAL);

end;