aboutsummaryrefslogtreecommitdiffstats
path: root/EE3102/Libraries/PIC24/UL_Form.pas
blob: a79f13c08665694db6d12b1a5438083f7705dd6d (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
procedure TUL_Form.BtnFileClick(Sender: TObject);
begin
    If OpenDlg.Execute Then Begin
        TxtFile.Text := OpenDlg.FileName;
    End;
end;

procedure TUL_Form.BtnImportClick(Sender: TObject);
begin
    ImportAscIIData(TxtFile.Text);
    Close;
end;