blazingrobin
2012-04-24 06:16:39
If anyone could create an update form creation tutorial i would be extremely grateful. The only tutorials i have been able to find are on Scar and are very outdated.
2012-04-24 06:16:39
2012-04-24 09:50:52
{$i srl/srl.simba}
var
Form: TForm;
procedure InitForm;
begin
Form := TForm.Create(nil);
end;
procedure SafeInitForm;
var
TVA: TVariantArray;
begin
SetLength(TVA, 0);
ThreadSafeCall('InitForm', TVA);
end;
procedure ShowModal;
begin
Form.ShowModal;
end;
procedure SafeShowModal;
var
TVA: TVariantArray;
begin
SetLength(TVA, 0);
ThreadSafeCall('ShowModal', TVA);
end;
begin
SafeInitForm;
SafeShowModal;
end.
2012-04-24 11:15:26
2012-04-24 19:34:06
2012-04-24 19:37:04
2012-04-24 19:38:40
From: Blumblebee
I would also suggest just reading code from other people's forms. It's one of the best ways to understand how they work.