Kann man an eine Bitmap Informationen anhängen?

[Popov]

Ich glaube ich bin falsch verstanden worden. Ich will nichts verstecken, sondern Informationen mitschicken. Welche Informationen ist egal, z. B. Beschreibung, ein kleines Symbolbild usw. Also nichts womit andere Programme etwas anfangen können, aber das eigene schon. Ich will einfach die Möglichkeiten erweitern, aber kein neues Format erstellen. Im Zweifelsfall soll jedes Programm es als Bitmap laden können.

@Luckie

Also wenn du mit "mal hinten anhängen" meinst, dass das geht, dann wäre damit schon die Frage beantwortet. Ist das also ein bewusstes ja oder eventuell?

@Aphton

""Anhängen" an sich kannste Daten an alle Daten."

Nicht unbedingt. Es gibt auch Daten die sozusagen ihre Header am ende haben. Frag mich jetzt nicht welche Dateien es sind, aber ich kenne einige Dateien dessen letzten zwei Bytes die Dateigröße angeben und eine andere die die Adresse zum Header als letztes Byte speichert.

[Aphton]

Hast recht, bei mp3 z.B können die Tags vorne oder hinten sein.
Aber bei Bitmaps (.bmp) ist das imho nicht der Fall.

[Bernhard Geyer]

Muss es den BMP sein? JPEG, TIFF und AFAIK auch PNG können sowas. Sind auch verglichen mit BMP viel kleiner

[Popov]

Ich gucke mal im ersten Betrag nach... ja, es geht um Bitmap. Sorry, nicht bös gemeint

Es geht hier wirklich um Bitmap.

[Popov]

Kleiner schneller Test:

Delphi-Quellcode:

function LoadStringFromFile(sInFile: String; var sFileString: String): Boolean;
var
  FileStream: TFileStream;
begin
  Result := False;
  if not FileExists(sInFile) then Exit;
  FileStream := TFileStream.Create(sInFile, fmOpenRead);
  try
    if FileStream.Size <> 0 then begin
      SetLength(sFileString, FileStream.Size);
      FileStream.Read(sFileString[1], FileStream.Size);
      Result := True;
    end;
  finally FileStream.Free end;
end;

function SaveStringToFile(sOutFile: String; sFileString: String): Boolean;
var
  FileStream: TFileStream;
begin
  Result := False;
  FileStream := TFileStream.Create(sOutFile, fmCreate);
  try
    if Length(sFileString) <> 0 then begin
      FileStream.Write(sFileString[1], Length(sFileString));
      Result := True;
    end;
  finally FileStream.Free end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  Path: String;
  Bitmap: String;
begin
  Path := ExtractFilePath(ParamStr(0)) + 'Cover.bmp';
  LoadStringFromFile(Path, Bitmap);
  Bitmap := Bitmap + 'Hallo Welt';
  SaveStringToFile(Path, Bitmap);

  Image1.Picture.Bitmap.LoadFromFile(Path);
end;

Ja, es klappt. Zumindest gibt es keine Fehlermeldungen. Allerdings weiß ich immer noch nicht ob zufällig oder auch sonst nicht. Anscheinend endet jede Bitmap mit einer Null. Ob das wichtig ist?

[Sir Rufo]

Zitat von Popov:

Anscheinend endet jede Bitmap mit einer Null. Ob das wichtig ist?

Hmmm, bei so einer Frage, frage ich mich, ob du dich mit dem Bitmap Format auseinander gesetzt (lesen der Dokumentation) hast, oder ob du möchtest, dass wir das für dich machen?

[Popov]

@Sir Rufo

Nein, ich hab mich mit dem Bitmap Format nicht auseinander gesetzt und habe es auch nicht vor. Es interessiert mich schlicht und einfach nicht. Zumindest zu diesem Zeitpunkt und zu diesem Problem nicht. Später vielleicht, jetzt nicht. Wenn ich ein Auto fahren will, dann lese ich mir auch nicht zuerst die Dokumentation über die Einspritzpumpe durch. Auch erwarte ich nicht, dass irgendwer es für mich macht. Ich hab auch keinen gebeten sich die Dokumentation zum Bitmap Format für mich durchzulesen. Ich hab einfach in einem Diskussionsforum eine Frage gestellt ob sich irgendwer bereits damit auskennt. Als Beweis füge ich den ersten Satz meines Eingangspostings ein: "Kennt sich einer mit dem Bitmap-Format einigermaßen aus". Soll bedeuten: kennt sich einer mit dem Bitmap-Format einigermaßen aus? Eine simple Frage, vergleichbar mit: "Entschuldigen Sie bitte, können Sie mit bitte die Uhrzeit sagen?". Als Antwort gäbe es da: "Ja", "Nein", aber auch "ich habe mir die Uhr gekauft um selbst die Uhrzeit zu kennen; wenn sie die Uhrzeit wissen wollen, dann kaufen sie sich gefälligst ihre eigene Uhr". Zurück zum Thema. Der Sinn eines Diskussionsforums ist geballtes Wissen in einem Forum zu sammel, so dass nicht jedes Mal das Rad neu erfunden werden muss. Weiß einer nicht wie man eine StringList sortiert, kann er im Forum fragen. Wenn er Glück hat antwortet einer, ob mit Code oder einen Begriff, wie zum Beispiel "Bubblesort" oder anderen Fachbegriffen, so dass man über die Suche schnelle einen Code finden kann. Auf diese Weise kann sich der Frager die lange Erfindung eines eigenen Sortierverfahrens sparen. Diskussionsforen haben also den Vorteil, dass das Rad nicht immer aufs neue erfunden werden muss, sondern man auf die Erfahrung anderer zurückgreifen kann. Es ist ein geben und nehmen. Hat man eine Frage, stellt man sie, hat jemand anders eine Frage, beantwortet man sie. Das ist sehr effizient und so können viele User ihre persönlichen Erfahrungen miteinander teilen so draus ein breites Allgemeinwissen zu machen. Das hat auch schon in der Geschichte gut funktioniert. Städte in der Antike die an stark frequentierten Stellen standen, profitierten von dem Wissen der Durchreisenden, gaben ihrerseits ihr Wissen weiter, das in die Welt getragen wurde. So entwickelten sich einige Gegenden zu Metropolen, während man anderenorts noch auf Bäumen wohnte. Das Wissen miteinander Teilen, nicht alles neu erfinden müssen oder durch Versuch und Irtum lernen zu müssen. Später, als Bücher erfunden wurden, gab man so sein Wissen weiter. In meinem Fall habe ich keinen gebeten sich die Arbeit zu machen für mich eine Dokumentation durchzulesen, sondern nur die angesprochen die es schon mal gemacht haben. Deshalb auch die Eingangsfrage: "Kennt sich einer mit dem Bitmap-Format einigermaßen aus?". Damit waren nur die gemeint die sich damit auseinander kennen und die Frage mit einem Ja oder Nein beantworten. Damit hoffte ich von der Erfahrung eines anderen Nutzers klein wenig zu profitieren. Auf jeden Fall bin ich nicht der Meinung, dass ich jemand damit beauftragt habe etwas für mich zu erledigen, auch wenn ich dich Eingangsfrage um einen Punkt erweitert haben, die der Null am Ende. Ich hoffe ich hab mit dem Statement nun genügend meinen Standpunkt zu Diskussionsfohren dargelegt zu haben. Ist damit deine Frage beantwortet?