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

initialize function result

Browse Source 
git-svn-id: trunk@6228 -
This commit is contained in:
vincents 2004-11-11 08:33:30 +00:00
parent 3ec726878e
commit b406ab0f6e
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ideintf/propedits.pp
View File

@ -1710,6 +1710,7 @@ var
P,C:PPropertyClassRec; P,C:PPropertyClassRec;
I:Integer; I:Integer;
begin begin
Result := nil;
if PropertyEditorMapperList<>nil then begin if PropertyEditorMapperList<>nil then begin
for I:=0 to PropertyEditorMapperList.Count-1 do begin for I:=0 to PropertyEditorMapperList.Count-1 do begin
with PPropertyEditorMapperRec(PropertyEditorMapperList[I])^ do begin with PPropertyEditorMapperRec(PropertyEditorMapperList[I])^ do begin