Changeset 63 for trunk/Forms
- Timestamp:
- Dec 9, 2021, 11:17:22 PM (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/UFormContacts.pas
r61 r63 414 414 end; 415 415 SaveDialog1.InitialDir := ExtractFileDir(Core.LastContactFileName); 416 SaveDialog1.FileName := TContact(ListView1.Selected.Data).F ields[cfFullName]+416 SaveDialog1.FileName := TContact(ListView1.Selected.Data).FullNameToFileName + 417 417 VCardFileExt; 418 418 if SaveDialog1.Execute then begin
Note:
See TracChangeset
for help on using the changeset viewer.