Compiliertes Programm läuft nicht auf XP

[Natcree]

Zitat:

HOLY FUCK! 4096 Regions!! Das MSDN sagt nichts darüber, dass die Original-Regions bei CombineRgn() deleted werden. Das heisst, dass du da vermutlich wirklich das System um massig Handles und GDI Ressourcen betrügst. Eventuell mosert XP auch deswegen.

nein das funktioniert habe es ausprobiert ohne video in einem anderen programm

genauso auch die layered geschichte.

naja und zur fingerkloppe grins hast recht wollte nur was auf die schnelle machen. Bin halt noch ein newbeeeeeeeeee

[Medium]

Nichtsdestotrotz solltest du das dringend korrigieren. Und sein Programm künstlich langsamer zu machen als nötig hat auch ein Beginner nicht nötig. Glaub mir, dass kommt bei größeren Projekten ganz von alleine. Sei doch eher froh um schnelle Starts, und freue dich, dass die User ohne viel Umschweife sofot ans "usen" kommen :)

Ich würde als nächstes dann wohl ein frisches Projekt machen, das wirklich nur den Mediaplayer enthält und dein Video abspielt. Komplett schmucklos, ohne Transparenzen und allem anderen. Nur der Mediaplayer und die zwei Events die du für dessen Steuerung nutzt. Ist ja in 2min zusammengeklickert. Wenn das ggf. auf XP dann laufen sollte, nach und nach die anderen Dinge reinbauen, und sobald es knallt, ist der letzte Schritt dein wahrer Übeltäter. Hat man den, wieder ein Testprojekt mit NUR diesem Vorgang. Wenn der alleine auch knallt, dann hat man den Fehler meist schnell gefunden. Wenn nicht, ist es ein komplizierteres kombiniertes Problem. Ab dann können wir hier vermutlich anfangen wirklich zu helfen, weil wir haben weder dein Programm, noch ist das Problem ein allgemein bekanntes.

[Natcree]

okay dann werde ich mich so rann tasten.

[hoika]

Hallo,

lade dir MadExcept runter (ist frei).
Dann bei Projekt/MadExcept Haken setzen,
die Exe mit alle Debug-Optionen und bei den Linker-Optionen externe DebugSymbole und TD32 anklicken.

Danach zeigt dir MadExcept exakt die Zeile an, die fehlschlägt.


Heiko

[Natcree]

So habe jetzt nur noch video zu laufen

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls,shellapi, MPlayer, StdCtrls;

type
  TForm1 = class(TForm)
    Panel1: TPanel;
    MediaPlayer1: TMediaPlayer;
    Timer1: TTimer;
    procedure FormCreate(Sender: TObject);
    procedure MediaPlayer1Notify(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}
procedure Delay(Milliseconds: Integer);
var
  Tick: DWord;
  Event: THandle;
begin
  Event := CreateEvent(nil, False, False, nil);
  try
    Tick := GetTickCount + DWord(Milliseconds);
    while (Milliseconds > 0) and
          (MsgWaitForMultipleObjects(1, Event, False, Milliseconds, QS_ALLINPUT) <> WAIT_TIMEOUT) do
    begin
      Application.ProcessMessages;
      if Application.Terminated then Exit;
      Milliseconds := Tick - GetTickcount;
    end;
  finally
    CloseHandle(Event);
  end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
mediaplayer1.Play;
panel1.Align:=alclient;
borderstyle:=bsnone;
end;

procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
  if mediaplayer1.NotifyValue = nvSuccessful then begin
    mediaplayer1.Play;
  end;
end;

so an dem code schnipsel muss irgendwas sein was xp nicht will

[Natcree]

habe madexcept installiert da ich aber auf win 7 progge und auf dem XP rechner kein delphi ist kann ich madexcept nicht wirklich nutzten.

[Medium]

Dann könnte man noch gucken, ob die bloße Existenz des Mediaplayers Probleme macht. Also das Video mal weder laden noch abspielen. Wenn das geht, mal ein anderes Video nehmen, dass der Windows Mediaplayer auf dem XP System fehlerfrei abspielt, und das im Programm testen. (Auch mal gucken, ob der dein Video abspielen kann, oder evtl. mit einem ähnlichen Fehler abraucht.) Dann ließe sich das Problem potenziell auf den Codec selbst einschränken, in welchem Fall ich vorschlagen würde, das Video mit einem anderen zu transcoden. (Wenn es ein AVI ist, eignet sich VirtualDub prima für sowas.)
Edit: MadExcept wird doch einkompiliert.

[Natcree]

das video welches ich nutze spielt das xp system fehlerfrei ab.

Das madexcept mit einkompiliert wird wusste ich nicht. okay

[jaenicke]

Versuch einfach einmal das Abspielen erst zu starten, wenn das Programm läuft. Ich kann mir durchaus vorstellen, dass es Probleme gibt, wenn man beim Erstellen des Fensters, und damit bevor es sichtbar ist, anfängt ein Video abzuspielen.

[Natcree]

hier ist der bugreport