paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-01-04 18:26:08 +01:00
Code Issues Packages Projects Releases Wiki Activity

* HideCursor and ShowCursor are now public methods

Browse Source
This commit is contained in:
sg 2000-02-19 19:06:17 +00:00
parent b425619014
commit 8244a745ac
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
fcl/shedit/shedit.pp
View File

@ -173,8 +173,6 @@ type
function CalcSHFlags(FlagsIn: Byte; source: String): Byte;
procedure HideCursor;
procedure ShowCursor;
procedure ChangeInLine(line: Integer); // Redraws screen where necessary
procedure AddUndoInfo(AInfo: TUndoInfo; CanMerge: Boolean);
@ -237,6 +235,8 @@ type
AAction: TKeyboardActionDescr): TShortcut;
procedure AddKeyDef(AMethod: TKeyboardActionProc; ASelectionAction:TSelectionAction; ADescr: String; AKeyCode: Integer; AShiftState: TShiftState);
procedure HideCursor;
procedure ShowCursor;
procedure FocusIn;
procedure FocusOut;
procedure DrawContent(x, y, w, h: Integer);
@ -513,7 +513,10 @@ end.
{
$Log$
Revision 1.16 2000-01-31 19:28:12 sg
Revision 1.17 2000-02-19 19:06:17 sg
* HideCursor and ShowCursor are now public methods
Revision 1.16 2000/01/31 19:28:12 sg
* Forgot some debug code ;)
Revision 1.15 2000/01/31 19:23:37 sg