Save Code is missing in uSaveUnitForm.pas

[SkybuckFlying]

So I added some save code:

procedure TSaveUnitForm.btnSaveClick(Sender: TObject);
begin
if SaveDialog1.Execute then
begin
Memo1.Lines.SaveToFile(SaveDialog1.FileName);
end;
end;

I change sd to SaveDialog1. Change it back if you just want to plug and play or use the code below :)

So then this code would look like:

if sd.Execute then
begin
Memo1.Lines.SaveToFile(sd.FileName);
end;

Bye,
Skybuck.