DGL • Thema anzeigen - Problem mit: uses classes

Problem mit: uses classes

Moderator: DGL-Team

Seite 1 von 1

[ 5 Beiträge ]

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

Michael

Betreff des Beitrags: Problem mit: uses classes

Verfasst: Sa Feb 05, 2005 13:50

DGL Member

Registriert: Mi Feb 02, 2005 14:22
Beiträge: 81

Hallo Forum,

ich bin gerade mal wieder dabei mich mit OpenGL zu beschäftigen.
Ich möchte aus einer Textdatei Daten für die 3D Umgebung laden. In einer kleinen Demo, die sonst nichts macht, funktioniert alles wunderbar. Kopiere ich den Quelltext in mein OpenGL Projekt, löst classes einen Fehler im folgendem Code aus:

Code:

// Attempts to unregister the window class
  if (not UnRegisterClass('OpenGL', hInstance)) then
  begin
    MessageBox(0, 'Unable to unregister window class!', 'Error', MB_OK or MB_ICONERROR);
    hInstance := 0;
  end;
 

Der Fehler tritt hier auf:

Code:

if (not UnRegisterClass('OpenGL', hInstance)) then

Dieser Quelltext ist wohl bekannt :wink:

Classes brauche ich übrigens (denke ich zumindest :cry:

), weil ich in der Textdatei alle Daten jeweils durch ein Komma getrennt abgespeichert habe. Um die Daten wieder korrekt einlesen zu können verwende ich folgende Funktion die ich im I-Net gefunden habe:

Code:

function Explode(const AText: String; ADelimiter: Char): TStringDynArray;
var
  I: Integer;
begin
  with TStringList.Create do
  begin
    try
      Delimiter := ADelimiter;
      DelimitedText := AText;
      SetLength(Result, Count);
      for I := 0 to Count - 1 do
        Result[I] := Strings[I];
    finally
      Free;
    end;
  end;
end;
 

Vielleicht habt ihr auch eine Idee, wie ich auf diese Funktion und damit wohl auch auch Classes verzichten kann?

Nach oben

LarsMiddendorf

Betreff des Beitrags:

Verfasst: Sa Feb 05, 2005 13:53

DGL Member

Registriert: Sa Dez 28, 2002 11:13
Beiträge: 2244

UnRegisterClass gibt es einmal in der Unit classes und in der Unit windows.
Veränder die uses Reihenfolge so, daß die unit windows nach der unit classes eingebunden wird.

uses classes, ..., windows, ... ;

Oder schreibt den Unitnamen vor den Aufruf:

Code:

if (not Windows.UnRegisterClass('OpenGL', hInstance)) then

Nach oben

Michael

Betreff des Beitrags:

Verfasst: Sa Feb 05, 2005 13:56

DGL Member

Registriert: Mi Feb 02, 2005 14:22
Beiträge: 81

Kaum zu glauben aber wahr :!:

Vielen Dank für die Info! Tja, ich muss halt noch eine ganze Menge lernen...

Wieso verlangt Delphi denn in diesem Fall diese Reihenfolge?
Ich verstehe denn Sinn nicht so ganz.

Nach oben

LarsMiddendorf

Betreff des Beitrags:

Verfasst: Sa Feb 05, 2005 14:01

DGL Member

Registriert: Sa Dez 28, 2002 11:13
Beiträge: 2244

Die Funktion gibt's zweimal und sie ist nicht überladen worden, so daß anhand der Paramterliste unterschieden würde. Delphi sucht dann nach dem Namen in den eingebundenen Units und die Funktion wurde dann zuerst in der Unit classes gefunden. Da die Parameter nicht passen, gibt's dann eben einen Fehler.

Nach oben

Flash

Betreff des Beitrags:

Verfasst: Sa Feb 05, 2005 18:07

Guitar Hero

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7810
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)

Fairerweise muss man sagen, dass dieses Verhalten net so ganz schick is, aber das is nunmalso von seiten Borlands gemacht worden. Da hilft alles wundern nix. Allerdings wäre ich wohl auch erstmal ordentlich ins knobeln gekommen.

_________________
Blog: kevin-fleischer.de und fbaingermany.com

Nach oben

Seite 1 von 1

[ 5 Beiträge ]

Foren-Übersicht » Programmierung » Allgemein

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 6 Gäste

Du darfst keine neuen Themen in diesem Forum erstellen.
Du darfst keine Antworten zu Themen in diesem Forum erstellen.
Du darfst deine Beiträge in diesem Forum nicht ändern.
Du darfst deine Beiträge in diesem Forum nicht löschen.
Du darfst keine Dateianhänge in diesem Forum erstellen.