Update for TRUNK
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5650 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
parent
4e898d8dc5
commit
69c2a39d6e
Binary file not shown.
@ -6,8 +6,8 @@
|
||||
},
|
||||
"UpdatePackageFiles" : [
|
||||
{
|
||||
"ForceNotify" : false,
|
||||
"InternalVersion" : 1,
|
||||
"ForceNotify" : true,
|
||||
"InternalVersion" : 2,
|
||||
"Name" : "poweredby.lpk",
|
||||
"Version" : "1.0.4.0"
|
||||
}
|
||||
|
@ -98,6 +98,7 @@ type
|
||||
procedure Register;
|
||||
|
||||
implementation
|
||||
Uses {$IF (lcl_major > 0) and (lcl_minor > 6)}LCLPlatformDef {$ENDIF};
|
||||
|
||||
procedure Register;
|
||||
begin
|
||||
@ -211,11 +212,14 @@ Choices are:
|
||||
lpCustomDrawn
|
||||
}
|
||||
begin
|
||||
Result:=FALSE;
|
||||
{
|
||||
case WidgetSet.LCLPlatform of
|
||||
lpWin32, lpQT: Result := True;
|
||||
else
|
||||
Result := False;
|
||||
end;
|
||||
}
|
||||
end;
|
||||
|
||||
procedure TPoweredby.ShowPoweredByForm;
|
||||
|
Loading…
Reference in New Issue
Block a user