Gemme og hente en inifil på harddisken
Delphi har en af verdens bedste indbyggede hjælpefunktioner, men det er ikke alt man kan finde hjælp til der.Jeg er i gang med et projekt med serienummerering af billeder.
Kunden kommer med et billede, hvor der skal trykkes måske 1000 eksemplarer med forskellig serienummer.
En måned senere ringer kunden og bestiller 1000 mere.
Så i stedet for at skulle indtaste alle oplysninger igen, så var det jo smart at kunne gemme dem i en fil på harddisken/serveren.
Jeg har valgt at gemme indstillingerne i en ini fil.
Ini := TIniFile.Create('Settings.Ini' );
try
Ini.WriteString( 'Settings', 'Picture', Billednavn);
Ini.WriteInteger('Settings', 'Width', StrToInt(Bredde.Text));
Ini.WriteInteger('Settings', 'Height', StrToInt(Hojde.Caption));
Ini.WriteInteger('Settings', 'Vandret', StrToInt(Vandret.Caption));
Ini.WriteInteger('Settings', 'Lodret', StrToInt(Lodret.Text));
Ini.WriteString( 'Settings', 'FontName', SnLabel.Font.Name );
Ini.WriteInteger('Settings', 'FontSize', SnLabel.Font.Size);
Ini.WriteInteger('Settings', 'FontColor', SnLabel.Font.Color);
Ini.WriteInteger('Settings', 'SnLeft', StrToInt(SnLeft.Text));
Ini.WriteInteger('Settings', 'SnTop', StrToInt(SnTop.Text));
Ini.WriteInteger('Settings', 'SnStart', StrToInt(SnStart.Text));
Ini.WriteString( 'Settings', 'SnPrefix', Prefix.Text);
finally
Ini.Free;
De indbyggede funktioner finder selv gruppe, key og value.
Jeg kunne også gemme indstillingerne i en ganske almindelig tekst fil, og så selv lave de routiner som skal finde gruppe, key og value.
Men ini filen finder dem jo selv.
Så kommer det som jeg ikke kan læse mig frem til, ej heller med Google.
Hvordan gemmer man denne inifil på harddisken, og henter den igen.