---------------------------------------------------------------------------
| 1906 | } |
| 1907 | //--------------------------------------------------------------------------- |
| 1908 | String GetApplicationExeName(void) |
| 1909 | { |
| 1910 | String rv = Application->ExeName; |
| 1911 | // ������ ����� �� ���� ".\" - �� ����������� ���������������� ���������� |
| 1912 | // ������ �� ������ ������� ? |
| 1913 | int pos = rv.Pos("\\.\\"); |
| 1914 | if( pos>0 ) |
| 1915 | rv.Delete(pos, 2); |
| 1916 | return rv; |
| 1917 | } |
| 1918 | //--------------------------------------------------------------------------- |
| 1919 | String DateTimeToISO8601(TDateTime v) |
| 1920 | { |