last trial
I have form with tree and options panel. On options panel I show different frames which depends on selected node. I crated CustomFrame and several another frames inherited from custom. When I try to create frame I get error https://www.screencast.com/t/2gHWz5Mw35z
code:
procedure TfrmQuadMagic.SetTaskFrame;
var
task_code: string;
begin
task_code := quTask.FieldByName('rtl_task_code').AsString;
if Assigned(FOptionsFrame) then
FOptionsFrame.Free;
if task_code = 'PRODIMP' then
FOptionsFrame := TQMImportProductOptionFrame.Create(pnlOptions); <-- error here
if Assigned(FOptionsFrame) then
FOptionsFrame.SetOptions(quTask.FieldByName('rtl_options').AsString)
else
FOptionsFrame := TQMCustomOptionFrame.Create(pnlFrameOptions);
end;
This happened only when TuniCombobox at frame. When I deleted it and added only TuniMemo - frame created without error, but it doesn't show....
FOptionsFrame := TQMImportProductOptionFrame.Create(pnlFrameOptions);
FOptionsFrame.Show;
not visible after that