paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-04 17:18:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

Cocoa: add NSSTR_ATTACHMENT_CHARACTER to CocoaConst

Browse Source
This commit is contained in:
rich2014 2024-09-23 20:48:00 +08:00
parent 60f7e4e9eb
commit e60a16cda5
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
lcl/interfaces/cocoa/cocoaconst.pas
View File

@ -29,6 +29,8 @@ function NSSTR_KEY_ESC: NSString;
function NSSTR_KEY_EQUALS: NSString;
function NSSTR_KEY_PLUS: NSString;
function NSSTR_ATTACHMENT_CHARACTER: NSString;
function NSSTR_TABCONTROL_PREV_ARROW: NSSTRING;
function NSSTR_TABCONTROL_NEXT_ARROW: NSSTRING;
@ -71,6 +73,8 @@ var
_NSSTR_KEY_EQUALS: NSString;
_NSSTR_KEY_PLUS: NSString;
_NSSTR_ATTACHMENT_CHARACTER: NSSTRING;
_NSSTR_TABCONTROL_PREV_ARROW: NSSTRING;
_NSSTR_TABCONTROL_NEXT_ARROW: NSSTRING;
@ -139,6 +143,10 @@ begin
Result:= _NSSTR_KEY_PLUS;
end;
function NSSTR_ATTACHMENT_CHARACTER: NSString;
begin
Result:= _NSSTR_ATTACHMENT_CHARACTER;
end;
function NSSTR_TABCONTROL_PREV_ARROW: NSSTRING;
begin
@ -274,6 +282,8 @@ initialization
_NSSTR_KEY_EQUALS:= NSSTR('=');
_NSSTR_KEY_PLUS:= NSSTR('+');
_NSSTR_ATTACHMENT_CHARACTER:= StringToNSString( #$EF#$BF#$BC );
_NSSTR_TABCONTROL_PREV_ARROW:= StringToNSString('◀');
_NSSTR_TABCONTROL_NEXT_ARROW:= StringToNSString('▶');
@ -281,6 +291,8 @@ finalization;
_NSSTR_LINE_SEPARATOR.release;
_NSSTR_PARAGRAPH_SEPARATOR.release;
_NSSTR_ATTACHMENT_CHARACTER.release;
_NSSTR_TABCONTROL_PREV_ARROW.release;
_NSSTR_TABCONTROL_NEXT_ARROW.release;
@ -293,4 +305,3 @@ finalization;
_NSSTR_EDIT_MENU_SELECTALL.release;
end.