Imagelist behält die hinzugefügten Bitmaps nicht

[dot]

danke für die Antworten euch allen, ich habe nun dies gemacht:

jedesmal wenn ich auf meine Imageliste auf dem fdm_fkal_ico zugreife, lade ich diese neu mit:

Delphi-Quellcode:

procedure TDM_FKAL_ICONS.DataModuleCreate(Sender: TObject);
begin
  Laden;
end;

//**************************************************
procedure TDM_FKAL_ICONS.Laden;
var
  FS : TFileStream;
  Filename : String;
  AppPath : String;
begin
  AppPath:=ExtractFilePath(ParamStr(0));
  AppPath:=IncludeTrailingBackSlash(AppPath);
  Filename:=AppPath+'Imageliste.iml';
  FS:=TFileStream.Create(Filename,fmOpenRead);
Try
  FS.ReadComponent(Imageliste1);
Finally
  FS.Free;
end;
end;
//***************************************************
beim Freigeben des DM mache ich dies:

procedure TDM_FKAL_ICONS.DataModuleDestroy(Sender: TObject);
begin
  Speichern;
end;

procedure TDM_FKAL_ICONS.Speichern;
var
  FS : TFileStream;
  Filename : String;
  AppPath : String;
begin
  AppPath:=ExtractFilePath(ParamStr(0));
  AppPath:=IncludeTrailingBackSlash(AppPath);
  Filename:=AppPath+'Imageliste.iml';
  FS:=TFileStream.Create(Filename,fmCreate);
Try
  FS.WriteComponent(Send_lad);
Finally
  FS.Free;
end;
end;

somit ist meine liste immer abgespeichert.

und dann habe ich das mit dem Hinzufügen so gelöst, dass ich nach dem "Hinzufügen" des Bitmap auf dem FO_ICONS sage:

fdm_FKAL_ICO.Speichern

[edit=sakura] [delphi]-Tags. Mfg, sakura[/edit]