Nou dacht ik na het lezen van enkele eenvoudige guides over het maken van een mirc dll in delphi er eens eentje zelf te maken.
Nou gebruik ik de volgende code om een inifile uit te lezen (wat werkt in een normaal programma)
(in de uses staat inifiles
)
In CopyR hoort dus de waarde 1 te staan (zoals die ook in de inifile staat)
Nu heb ik dus het volgende in de function staan die de tekst in mirc op het scherm gooit.
Hij voert dus altijd de else uit.
Wanneer ik "if copyR <>1 then" doet dan voor hij alleen de bovenste uit
Mijn conclusie : Hij leest de inifile niet uit
Dus nu ben ik bij het volgende probleem aan gekomen: hoe krijg ik dat dus wel aan de praat ?
Nou gebruik ik de volgende code om een inifile uit te lezen (wat werkt in een normaal programma)
code:
1
2
3
| ifile := Tinifile.Create('test.ini');
CopyR := ifile.readInteger('config','CopyR', CopyR);
ifile.Free; |
(in de uses staat inifiles
In CopyR hoort dus de waarde 1 te staan (zoals die ook in de inifile staat)
Nu heb ik dus het volgende in de function staan die de tekst in mirc op het scherm gooit.
code:
1
2
3
4
5
| if CopyR =1 then
strcopy(data, 'blaat tekst! ¢ Klaas-Bram)
else
strcopy(data, 'blaat tekst!');
result := 3; |
Hij voert dus altijd de else uit.
Wanneer ik "if copyR <>1 then" doet dan voor hij alleen de bovenste uit
Mijn conclusie : Hij leest de inifile niet uit
Dus nu ben ik bij het volgende probleem aan gekomen: hoe krijg ik dat dus wel aan de praat ?
Taal fouten inbegrepen ;)