paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-10-26 15:41:36 +01:00
Code Issues Packages Projects Releases Wiki Activity

win32: remove dumb destroy method in TWin32MemoStrings

Browse Source 
git-svn-id: trunk@53295 -
This commit is contained in:
blikblum 2016-11-04 11:34:58 +00:00
parent f43e1bfde6
commit eb95373456
1 changed files with 0 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lcl/interfaces/win32/win32memostrings.inc
View File

@ -19,7 +19,6 @@ type
procedure SetUpdateState(Updating: Boolean); override; procedure SetUpdateState(Updating: Boolean); override;
public public
constructor Create(Handle: HWND; TheOwner: TWinControl); constructor Create(Handle: HWND; TheOwner: TWinControl);
destructor Destroy; override;
procedure Assign(Source: TPersistent); override; procedure Assign(Source: TPersistent); override;
procedure AddStrings(TheStrings: TStrings); override; procedure AddStrings(TheStrings: TStrings); override;
procedure Clear; override; procedure Clear; override;
@ -93,12 +92,6 @@ begin
FOwner := TheOwner; FOwner := TheOwner;
end; end;
destructor TWin32MemoStrings.Destroy;
begin
// do nothing
inherited Destroy;
end;
procedure TWin32MemoStrings.Assign(Source: TPersistent); procedure TWin32MemoStrings.Assign(Source: TPersistent);
var var
S: TStrings absolute Source; S: TStrings absolute Source;