델 가족 여러분 안녕 하십니까

약 한달전에 질문을 했던 내용 입니다.

폼에 스타터스바를 한개 갔다 놓고 주물럭 주물럭 설정하고

F11키를 누르면 스타터스바에 힌트를 나타내게 하려고 합니다.



procedure TFm102.FormKeyPress(Sender: TObject; var Key: Char);

begin

if key = #122 then begin

if sbar1.Visible = false then begin

sbar1.Visible := true;

ac_year.Hint := ' 현재의 폼에서는 입력단위가 년도 이기 때문에'+ #13+

' 년도를 반드시입력 해야 합니다..';



ac_tmcd.Hint := ' 팀코드를 알고 있다면 팀코드 숫자 4자리를 입력 해 주

시고+ #13+

'팀코드를 모른다면 커서가 위치된 상태에서 Enter Key를 누

릅니다.';

ac_crcd.Hint := ' 클라이언트코드를 알고 있다면 직접 입력 해 주시고'+ #13+

'모른다면 커서가 위치된 상태에서 Enter Key를 누릅니다.';

ac_mekb.Hint := ' 매체종류를 선택 합니다. 13가지가 있습니다.'+ #13+

'키보드의 방향 키로 선택을 합니다.';

ac_bncd.Hint := ' 본부코드를 나타 냅니다. 팀을 입력하면 자동으로 타타납니

다.'+ #13+

'궂이 입력 할 필요가 없습니다.';

ac_nmcd.Hint := ' 제품코드를 알고 있다면 코드 숫자 3자리를 입력 해 주시

고'+ #13+

'코드를 모른다면 커서가 위치된 상태에서 Enter Key를 누릅

니다.';

end else

sbar1.Visible := false;

end;

end;



요렇게 해서 어플을 실행하구 F11을 누르면 스타터스바가 보이고 다시 F11을

누르면 스타터스바가 숨죠.

이처럼 스타터스바가 Visible := True 이면

폼의 Edit나 Buttion에 커서가 위치하면 힌트 내용이 상태바에 나타납니다.

근데 힌트는 '굳세어라 금순아' 라서 오로지 한줄로만 나타납니다. 음... 짤리죠

제가 원 하는것은 위 힌트내용처럼 두줄이면 상태바에도 두줄, 세줄이면 세줄

한줄이면 한줄 이렇게 나타내 주고싶거든요.

고수님들 그리고 델가족 여러분 도움 부탁드립니다.

추신)위의 key = #122 가 말을 않듣네요 패줄수도 없고....

근데 Key = #27은 말을 잘 들어요 왜 그렇죠?...