mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-30 05:43:51 +02:00
* fixed resize helptext
This commit is contained in:
parent
dc5a88c813
commit
2e6f9ff2a0
@ -294,9 +294,11 @@ begin
|
||||
V_Used : ClassS:=msg_class_used;
|
||||
V_Tried : ClassS:=msg_class_tried;
|
||||
V_Debug : ClassS:=msg_class_debug;
|
||||
{$endif}
|
||||
else
|
||||
ClassS:='???';
|
||||
{$endif}
|
||||
else
|
||||
ClassS:='';
|
||||
end;
|
||||
if ClassS<>'' then
|
||||
ClassS:=RExpand(ClassS,0)+': ';
|
||||
@ -1294,7 +1296,10 @@ end;
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.27 2004-11-06 17:22:52 peter
|
||||
Revision 1.28 2004-11-06 22:02:48 peter
|
||||
* fixed resize helptext
|
||||
|
||||
Revision 1.27 2004/11/06 17:22:52 peter
|
||||
* fixes for new fv
|
||||
|
||||
Revision 1.26 2004/11/05 00:00:33 peter
|
||||
|
@ -491,9 +491,9 @@ begin
|
||||
NewStatusDef(hcDragging, hcDragging,
|
||||
NewStatusKey(status_help, kbF1, cmHelp,
|
||||
StdStatusKeys(
|
||||
NewStatusKey('~'#24#25#26#27+'~ Move', kbNoKey, 65535,
|
||||
NewStatusKey('~Shift+'#24#25#26#27+'~ Size', kbNoKey, 65535,
|
||||
NewStatusKey('~'#17+'ÄŮ~ Done', kbNoKey, 65535,
|
||||
NewStatusKey('~Cursor~ Move', kbNoKey, 65535,
|
||||
NewStatusKey('~Shift+Cursor~ Size', kbNoKey, 65535,
|
||||
NewStatusKey('~<ÄÙ~ Done', kbNoKey, 65535,
|
||||
NewStatusKey('~Esc~ Cancel', kbNoKey, 65535,
|
||||
nil)))))),
|
||||
NewStatusDef(hcStackWindow, hcStackWindow,
|
||||
@ -1248,7 +1248,10 @@ end;
|
||||
END.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.28 2004-11-04 20:57:59 peter
|
||||
Revision 1.29 2004-11-06 22:02:49 peter
|
||||
* fixed resize helptext
|
||||
|
||||
Revision 1.28 2004/11/04 20:57:59 peter
|
||||
sysmsgs is always available
|
||||
|
||||
Revision 1.27 2004/11/02 23:53:19 peter
|
||||
|
@ -27,8 +27,8 @@ end;
|
||||
|
||||
procedure TIDEApp.ResizeApplication(x, y : longint);
|
||||
var
|
||||
OldR, R : TRect;
|
||||
Mode: TVideoMode;
|
||||
OldR : TRect;
|
||||
Mode : TVideoMode;
|
||||
begin
|
||||
GetBounds(OldR);
|
||||
{ adapt to new size }
|
||||
@ -259,7 +259,10 @@ end;
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.4 2002-09-07 15:40:44 peter
|
||||
Revision 1.5 2004-11-06 22:02:49 peter
|
||||
* fixed resize helptext
|
||||
|
||||
Revision 1.4 2002/09/07 15:40:44 peter
|
||||
* old logs removed and tabs fixed
|
||||
|
||||
Revision 1.3 2002/06/07 14:09:56 pierre
|
||||
|
Loading…
Reference in New Issue
Block a user