cards32.dll einbinden?

[neolithos]

Ich hab mal ein kleine Klasse entworfen.

Änderungswünsche (mit Änderung) bitte hier posten.


P.S.: Rein theoretisch kann man auch andere Karten-Dll's bauen und damit rufen. Sie müssen halt nur aufgebaut sein wie das Origninal.

Falls es jemand schafft ein echt Deutsches Blatt (Schell, Herz, Grün, Eichel) zu kreiren dann bitte Posten. Ich Spiele Skat und das geht bei mir nicht mit einem Französichen.

[Moyyer]

Erst Mal zum Problem!

Code:

Success := cdtInit(x,y);

Wenn ich es so eingeben, wie du es gesagt hast kommt als fehlermeldung
"Undefinierter Bezeichner (Success)". Was muss ich noch machen, damit es funktioniert.
(Bin noch neu und hab nich so viel ahnung)

Zu deinen "echten" Deutschen Blatt! Ich kann dir die Karten einscannen aber in eine DLL einbinden kann ich nicht? Vielleicht nützt es dir ja was!

Mfg Moyyer

[neolithos]

Eingeskannt sieht meist besch***** aus durch den Drack auf dem Scanner und der Karte.

Wenn aber gleichgroße (am besten so groß wie die in der Cards.dll) und saubere Bitmap's vorliegen ist das kein Problem die Card's-Dll zu manipuliren.

[teebee]

Zitat von Moyyer:

Code:

Success := cdtInit(x,y);

Wenn ich es so eingeben, wie du es gesagt hast kommt als fehlermeldung
"Undefinierter Bezeichner (Success)". Was muss ich noch machen, damit es funktioniert.
(Bin noch neu und hab nich so viel ahnung)

Du musst Success natürlich auch noch deklarieren:
Var Success: Integer; Nix für ungut, aber vielleicht solltest Du erstmal mit einfacheren Sachen anfangen und ein paar Tutorials durcharbeiten, bevor Du Dich an ein Kartenspiel wagst. Könnte sonst ziemlich demotivierend werden...

Gruß, teebee

[Moyyer]

Also ein bisschen Programmieren kann ich auch noch

Ich hab auch vorher das mit Sucess Deklarieren probiert aber rausgekommen ist das (siehe anhang).

Diese Fehlermeldung Plagt mich schon die ganze Zeit!

[neolithos]

Erste Frage wo hast du das Theme her.

Zweite Frage: Mit meiner Klasse passiert der Fehler offentlich nicht!
Sie wurde nur in XP getestet.

Drittens: Das ist ein Speicherfehlgriff (so sag ich's).
Es gibt irgentwo einen Zeiger der nicht mehr exisiert. Aber inherhalb der Dll wird darauf zugegriffen.

[Moyyer]

wäre jem. von euch so nett und schreibt für mich eine oncreate Prozedur, wo es endlich funktioniert. Ich sitze schon seit tagen daran, aber immerwieder kommt die Fehlermeldung. Und so gut bin ich noch nich um diese zu verstehen. Viele Bsp sind in Visual Basic programmiert.
Die hab ich mir angeschaut und sehen eigendlich recht einfach aus.
Aber Mein Delphi sieht das scheibar anders.

Leider gibt es für Delphi keinen Source wo jemand schon mal ein Kartenspiel programmiert hat. Sonst würde ich best. schon weiter sein.
Und mir auch ein paar Ideen holen.

[teebee]

Delphi-Quellcode:

 Uses ..,Cards32;

procedure TForm1.FormCreate(Sender: TObject);
begin
 MyCards := TCards.Create;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 MyCards.DrawCard(Canvas.Handle,Point(10,10),suitClubs,faceKing,False);
end;

Das funktioniert ohne Fehlermeldung, es erscheint allerdings die falsche Karte bei mir. Mit 'True' am Schluss (invertiert) erscheint die richtige Karte.
@neolithos: scheint noch ein Problem in der Klasse zu sein?

btw: Hatte vorher nicht geblickt, dass neolithos eine richtige Klasse gemacht hat, dachte er hat nur die API-Aufrufe konvertiert. So muss man ja nix mehr machen, nur noch createn...

Gruss, teebee

[Moyyer]

was ist Mycard für eine variable? (" Undefinierter Bezeichner")

[teebee]

Zitat von Moyyer:

was ist Mycard für eine variable? (" Undefinierter Bezeichner")

Hatte ich vergessen zu posten:
Var MyCards: TCards; Aber ein Blick in den Quelltext von Cards32.pas hätte Dir das verraten...

Gruß, teebee