mam problem z kodem do uruchamiania okna modalnego... gdy jest
SendMail:=TSendMail.Create(AOwner);
Result:=SendMail.ShowModal;
SendMail.Free;
wszystko jest niby wporządku, działa jak nalerzy itp... ale gdy zmienie na:
SendMail:=TSendMail.CreateMailer(AOwner, MailInfo, Lines);
Result:=SendMail.ShowModal;
SendMail.Free;
pokazuje się "Cannot make visible window modal". oto kod do CreateMailer:
constructor CreateMailer(AOwner: TComponent; MailInfo: THMailInfo;
Lines: TStrings);overload;
{....}
constructor TSendMail.CreateMailer(AOwner: TComponent; MailInfo: THMailInfo;
Lines: TStrings);
begin
inherited;
FMailInfo:=MailInfo;
FLines:=TStringList.Create;
if Assigned(Lines) then
FLines.Assign(Lines)
else
raise Exception.Create('Argument "Lines" not initiated!');
end;
O co tu chodzi? nie mam pojęcia jak to naprawić... pomocy...