paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 05:59:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

cocoa: removing unused field of ForcedLineBreak

Browse Source 
git-svn-id: trunk@61568 -
This commit is contained in:
dmitry 2019-07-11 14:01:57 +00:00
parent 22ca7c1214
commit b1fd62aab4
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/cocoa/cocoawsstdctrls.pas
View File

@ -172,7 +172,6 @@ type
function GetCount: Integer; override; function GetCount: Integer; override;
function Get(Index: Integer): string; override; function Get(Index: Integer): string; override;
public public
ForcedLineBreak: String;
constructor Create(ATextView: TCocoaTextView); constructor Create(ATextView: TCocoaTextView);
procedure Clear; override; procedure Clear; override;
procedure Delete(Index: Integer); override; procedure Delete(Index: Integer); override;
@ -1133,7 +1132,6 @@ end;
constructor TCocoaMemoStrings.Create(ATextView: TCocoaTextView); constructor TCocoaMemoStrings.Create(ATextView: TCocoaTextView);
begin begin
inherited Create; inherited Create;
ForcedLineBreak := LineBreak;
FTextView := ATextView; FTextView := ATextView;
end; end;