Schiffe versenken (zum XX-ten Mal :3 )

[Popov]

@Grayknife

40 MB gepackt? Wie groß ist noch mal Office 2013? Viel größer kann es nicht sein.

Entpackt macht die Exe 49 MB. Entfernt man die Wavs, macht das etwas über 3 MB große Datei. Ich denke alleine 40 MB macht die gewaltige Eröffnungsmelodie.

Auch ist es nicht nötig Bitmaps als Hintergrund zu nehmen. Warum keine Jpegs? Die machen etwa 2% der Größe aus. Die Konvertierung ist ein Kinderspiel. Beispiel (aus dem Kopf):

Delphi-Quellcode:

uses
  Jpeg;

procedure LoadJpegToBitmap(const FileName: String; Bitmap: TBitmap);
var
  Jpg: TJPEGImage;
begin
  Jpg := TJPEGImage.Create;
  try
    Jpg.LoadFromFile(FileName);
    Bitmap.Assign(Jpg);
  finally
    Jpg.Free;
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  Bmp: TBitmap;
begin
  Bmp := TBitmap.Create;
  try
    //Bmp.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'Bild1.bmp');
    LoadJpegToBitmap(ExtractFilePath(ParamStr(0)) + 'Bild1.jpg', Bmp);
    Canvas.Draw(0, 0, Bmp);
  finally
    Bmp.Free;
  end;
end;

Dann die Sache mit dem Passwort. Das scheint dir ganz wichtig zu sein. Ok, meinetwegen. Aber du wurdest mehrmals drauf hingewiesen ein Ausstieg aus der Passwortabfrage zu liefern. Jeder macht es. Dein Programm muss man mit dem Taskmanager abschießen wenn man das Passwort nicht mehr weiß.

Und noch was ist mir in der einen Minute aufgefallen: man weiß nie wer gerade dran ist. Wie wäre es mit einem Hinweis?

[Grayknife]

Okey, also Jpeg Bilder verwenden (y).

Hinweis einblenden, wer dran ist, gute Idee (y).

Zur Not kann man doch einfach Alt+F4 drücken, um aus der Passwortabfrage zu kommen. Oder ist das nicht legitim? :?

Kann ich auch die WAVE-Dateien verkleinern?

@Sherlock, wie kann ich das erreichen? Quellen: Grayknife? ^^