프린터 출력시 진행율을 보여주고 싶습니다.
Printer Object 루프가 아닌 프린터 시그날을 받아와서
보여줄 수는 없나요...
글쿠 프린터의 에러 메세지(용지없슴,기타 등등)를 가로채서
사용자 메세지를 보여주고 싶습니다.
방법좀 가르쳐 주세요...
아휴 !! 이거 해결하면 저게 문제고 저거 해결하면 요게 문제고...쩝@_@;
노가다도 중노가다가 따로 없다니깐...
부탁합니다... 이사슬에서 빨리 벗어나고 싶습니다...
질문 읽어줘서 고맙...
WEB SERVER 예제를 보고 따라하고 있는데 막히는 곳이 있더군요
어떤 한HTML에서 버튼을 눌러서(Submit)하면
그 화면에 있는 내용들이 Table로 Append 되면서
그내용들이 보이는 또다른 HTML이 나오게 할려고 하는데
자꾸 버튼만 누르면 화일을 저장하라고 물어오는데 왜 그런가요?
예제 HTML
학회 사전 등록 서버
사전 등록을 하실 분은 다음 폼을 채워 주십시오.
DLL화일 내용
procedure TWebModule1.WebModule1RegistrationAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
Table1.Append;
with Table1 do
begin
FieldByName('Name').AsString := Request.QueryFields.Values['name'];
FieldByName('Address').AsString := Request.QueryFields.Values['address'];
FieldByName('SocName').AsString := Request.QueryFields.Values['socname'];
FieldByName('Member').AsString := Request.QueryFields.Values['member'];
FieldByName('Etc').AsString := Request.QueryFields.Values['etc'];
try
post;
Response.Content := PageProducer1.Content;
except
Response.Content := ''+
'
서버에 에러가 발생하여 등록을 할 수 없습니다.'+
Registration Form
'';
end;
end;
end;
procedure TWebModule1.PageProducer1HTMLTag(Sender: TObject; Tag: TTag;
const TagString: String; TagParams: TStrings; var ReplaceText: String);
begin
ReplaceText := Request.QueryFields.Values[TagString];
end;
그리고 또다른 HTML
학회 사전 등록 서버
다음과 같은 내용으로 등록하였습니다.
이름: <#name>
주소: <#address>
소속: <#socname>
종류: <#member>
기타: <#etc>