Danke für deine Antwort.
Nein das versuche ich ganz bestimmt nicht.Da ja variablen u.s.w.keine Sonderzeichen enthalten dürfen.
Code:
procedure TForm1.FormActivate(Sender: TObject);
var
ini: TIniFile;
begin
ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+ 'Einstellungen.ini');
try
prozent:=ini.Readstring('Umsatzbeteiligung','Prozent','15');
farbe:=ini.Readinteger('Farben','Farbe',8388608);
name:=ini.Readstring('Benutzer','Name','Mustermann');
vorname:=ini.Readstring('Benutzer','Vorname','Max');
finally
ini.free;
end;
form1.caption:='Kundenverwaltung v 1.9 registriert auf : '+vorname+' '+name+' copyr. by Schniede';
panel19.color:=farbe;
edit3.text:=prozent;
if name = 'Mustermann' then
MessageDlg('Bitte geben Sie unter EINSTELLUNGEN Ihre Daten an !', mtInformation, [mbok], 0);
end;
Hir mal ein kleiner Auszug,wo diese Fehlermeldung z.B. erscheint.
mfg
schniede