ct-ac-to-dc/ul_LM324MX-NOPB/AltiumDesigner/UL_Form.pas

15 lines
258 B
Plaintext

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;