AV: Application.BidiMode bdRightToLeft and Panel1.ChildSizing.Layout cclTopToBottomThenLeftToRight
Original Reporter info from Mantis: Michl @michl1
-
Reporter name: Michl
Original Reporter info from Mantis: Michl @michl1
- Reporter name: Michl
Description:
See description
Steps to reproduce:
Two TButtons in a TPanel.
Then:
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.BidiMode := bdRightToLeft;
Panel1.ChildSizing.ControlsPerLine := 2;
Panel1.ChildSizing.Layout := cclTopToBottomThenLeftToRight;
Panel1.AutoSize := True;
end;
Gives a AV after start.
Mantis conversion info:
- Mantis ID: 31966
- Build: r55209
- Version: 1.9 (SVN)
- Fixed in revision: r55213 (#f7785d91)
- Target version: 1.8