mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-16 18:10:39 +02:00
lcl: splash: use invalidate instead of paint
git-svn-id: trunk@38805 -
This commit is contained in:
parent
066a74ddf6
commit
bc0f56fefe
@ -2183,7 +2183,7 @@ begin
|
||||
begin
|
||||
// show the splash form and handle the paint message
|
||||
AForm.Show;
|
||||
AForm.Paint;
|
||||
AForm.Invalidate;
|
||||
ProcessMessages;
|
||||
end;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user