Changeset 123 for trunk/UCore.pas

Timestamp:

Mar 16, 2022, 11:35:08 AM (3 years ago)

Author:

chronos

Message:

• Added: QR code image visible in contact others tab. It can be saved as image to file.

File:

• trunk/UCore.pas (modified) (3 diffs)

trunk/UCore.pas

@@ -90 +90 @@
     LastCompareFileName: string;
     LastPhotoFileName: string;
+    LastQrCodeFileName: string;
     LastPropertyValueFileName: string;
     MapUrl: string;
@@ -526 +527 @@
     MapUrl := ReadStringWithDefault('MapUrl', 'https://www.openstreetmap.org/search?query=');
     LastPhotoFileName := ReadStringWithDefault('LastPhotoFileName', '');
+    LastQrCodeFileName := ReadStringWithDefault('LastQrCodeFileName', '');
     LastCompareFileName := ReadStringWithDefault('LastCompareFileName', '');
   finally
@@ -553 +555 @@
     WriteString('MapUrl', MapUrl);
     WriteString('LastPhotoFileName', LastPhotoFileName);
+    WriteString('LastQrCodeFileName', LastQrCodeFileName);
     WriteString('LastCompareFileName', LastCompareFileName);
   finally