[lazarus] a patch about propedits.pp!
GongYu
425009 at sina.com
Sat Nov 8 02:36:24 EST 2003
hello everyone!
i modified the propedits.pp TMethodPropertyEditor.GetTrimmedEventName procedure
now when you double click on property event page ,the procduced procedure name now like delphi
for example:
before modify
when you dubleclick on form1 ,it show Form1CREATE
after modify
when you dubleclick on form1 ,it show Form1Create
sorry for pool english!
ps :
anyone can tell me how to use diff?
function TMethodPropertyEditor.GetTrimmedEventName: shortstring;
var
tmp:string;
begin
Result:=LowerCase(GetName);
if (Length(Result) >= 2)
and (Result[1] in ['o']) and (Result[2] in ['n'])
then
System.Delete(Result,1,2);
tmp:=leftstr(result,1);
System.Delete(Result,1,1);
Result:=Uppercase(tmp)+Result;
end;
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡GongYu
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡425009 at sina.com
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡2003-11-08
More information about the Lazarus
mailing list