Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
1. Jul 2008
Hast Du fixe Werte in Deiner Ini oder weißt Du zur Laufzeit nicht, wie die Idents heißen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
6. Jun 2008
Der finally-Block wird auf jeden Fall angesprungen. Nimmst Du nun das Erzeugen der Ini mit in den try-Block und das geht schief, wird anschließend versucht, ein Objekt freizugeben, das gar nicht existiert -> Folgefehler.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
6. Jun 2008
Versteh ich jetzt nicht. Versuch doch mal, ob die Schleife zum Speichern im OnClose funktioniert (sollte sie eigentlich).
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
6. Jun 2008
Von wem wurde Dir das vorgeschlagen? Gestern hattest Du noch gefragt, ob FormCreate und FormDestroy die passenden Events seien. Diesen Post hast Du ja mittlerweile editiert.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
6. Jun 2008
*Oops*, dann bleibt wohl nur, ReadSectionValues auf eine temporäre Stringliste anzuwenden und dort je Zeile alles bis zum Gleichheitszeichen rauszulöschen. Anschließend den Items zuweisen. Wenn jemand einen besseren Vorschlag hat, immer her damit, mir gefällt das so nämlich auch nicht, hab aber heute irgendwie ein Brett vor dem Kopf.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
6. Jun 2008
Versuch es mal mitprocedure TfrmMain.FormCreate(Sender: TObject);
var ini : TiniFile;
begin
ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+'config.ini');
try
Ini.ReadSectionValues('TimeZone',cbox1.Items);
finally
ini.Free;
end;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
5. Jun 2008
Die "Ini-Schleife" könnte z.B. so aussehen:for i := 0 to ComboBox.Items.Count - 1 do
Ini.WriteString('Items',IntToStr(i),ComboBox.Items);
Die Ini hätte dann beispielsweise folgendes Aussehen:
0=UT
1=MESZ
2=MEZ
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
4. Jun 2008
Durch den Style csDropDown bleibt der String einfach stehen :zwinker:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
4. Jun 2008
Ich habe hier eine ComboBox mit Style csDropDown. In deren OnKeyDown habe ich Folgendes:procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_RETURN then
begin
if ComboBox1.Items.IndexOf(ComboBox1.Text) < 0 then
ComboBox1.Items.Add(ComboBox1.Text);
end;
end;