Mein Kontaktmanager und ich brauchen Hilfe!!!

[dahead]

Morgen,

Was für Fehler meinst du denn? An welcher Stelle?

Delphi-Quellcode:

if Form2.ListBox1.Items.Strings[11] = 'J' then
begin                                               
CheckBox1.Checked := True;
end
else
if Form2.ListBox1.Items.Strings[11] = 'N' then
begin
CheckBox1.Checked := False;
end;

sowas kann man auch abkürzen:

Checkbox1.Checked := Form2.ListBox1.Items.Strings[11] = 'J'; Was machst du wenn strings keine 11 Elemente hat?
Warum haben sämtliche Controls keine vernünftige Namen?
Wie stellst du sicher, dass der Ordner "Speicher" existiert, bzw. dass du darin schreiben kannst?

Warum deklarierst du deine Variablen nicht alle an einer Stelle?

Delphi-Quellcode:

  public
    ID : Integer;
    M  : Integer;  // hier
    procedure LoadDaten;
    ...
  end;

var
  Form1: TForm1;
  Count : Integer= 0; // hier

Warum hast du dir keine Klasse dafür geschrieben? Das wäre wesentlich übersichtlicher und leichter zu pflegen.