This message was sent on 100% recyclable electrons.
Ik denk dat het een komt doordat het een post uit 2003 is, waar blijkbaar een oude parser overheen is gegaan. Als ik exact dezelfde code namelijk post, gaat het prima:
Delphi:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| try sIni := TIniFile.Create('C:\ini.ini'); if sIni.SectionExists('EXPORT_LOCATIE') then begin sLijst := TStringList.Create; sIni.ReadSectionValues('EXPORT_LOCATIE',sLijst); sDirectory := Copy(sLijst[0],7,length(sLijst[0])-6); end else begin MessageDlg('Het ini bestand is niet goed. Neem contact op met uw systeembeheerder', mtError, [mbOK], 0); Raise Exception.Create(''); end; except MessageDlg('Het ini bestand is niet goed. Neem contact op met uw systeembeheerder', mtError, [mbOK], 0); Raise Exception.Create(''); end; |
[ Voor 7% gewijzigd door Glabbeek op 09-12-2005 23:21 ]
En zo is het maar net.
Ik denk inderdaad dat het komt doordat het een oude post is en de parser later gefixed is. We reparsen niet voor elk wissewasje alle berichten...
Intentionally left blank
Dit topic is gesloten.
![]()