Non-Vcl Tut von Assarbad

[shareholder]

http://www.delphi-source.de/tutorials/nonvcl/?page=5

Delphi-Quellcode:

begin
  Result := 0;
  case uMsg of
    WM_CREATE:
      begin
        result := DefWindowProc(hWnd, uMsg, wParam, lParam);
        HLcursor := LoadCursor(hInstance, 'HandCursor'); // <-- FEHLER !!!
        DC := GetWindowDC(hWnd);
        inactivefont := fixfont(DC, 8, FW_NORMAL, FALSE);
        activefont := fixfont(DC, 8, FW_BOLD, TRUE);
        ReleaseDC(hWnd, DC);
        inactivecolor := rgb($0, $0, $0);
        activecolor := rgb($0, $0, $FF);
        SendMessage(hWnd, WM_CAPTURECHANGED, 0, 0);
      end;
    WM_RBUTTONUP,
      WM_LBUTTONUP:
      begin
      ...

der compiler gibt die meldung:
"Der linken Seite kann nix zuegwiesen werden"
aus. :(

Kann jmd. helfen ? Danke ! :)

[Christian Seehase]

Moin Shareholder,

zwei Möglichkeiten:

1. Du verschiebst die Deklaration von HLcursor von const nach var
2. Du aktivierst in den Projektoptionen (Projekt\Optionen) auf dem TabSheet Compiler die CheckBox "Zuweisbare typisierte Konstanten"

Ich bevorzuge die 1. Variante, da für mich eine Konstante auch konstant bleiben sollte.

[shareholder]

Zitat:

Zitat von Christian Seehase

Moin Shareholder,
Ich bevorzuge die 1. Variante, da für mich eine Konstante auch konstant bleiben sollte.

Wenn ich aber die "Noch-Konstante" als Var deklariere ist sie ja nicht mehr konstant.
Du verwirrst mich! ;-)

Btw.: Wenn Ich sie als dekl. dann kommt die Meldung:

...HLinkTest.exe' konnte nicht erstellt werden

kannst du das bei dir evtl. nochmal testen?

[Christian Seehase]

Moin Shareholder,

Zitat:

Zitat von shareholder

Wenn ich aber die "Noch-Konstante" als Var deklariere ist sie ja nicht mehr konstant.

stimmt, und in dem Programm wird die Konstante ja auch als Variable verwendet ;-)

[shareholder]

kann es sein, das die main.res und handcurser.res fehlt ?

[Luckie]

Zitat:

Zitat von shareholder

kann es sein, das die main.res und handcurser.res fehlt ?

Das wirst wohl nur du uns beantworten können. ;)

[shareholder]

ne, ich habe doch den link oben gepostet

und die datei hlinktest.zip enthält die nicht.

vllt. habe ich aber auch was übersehen! :(

[Luckie]

Wieso sind doch alle da: handcursor.rc und main.rc. Du musst sie natürlich vorher kompilieren. Aber extra dazu liegt dich eine resbuild.bat bei.

[shareholder]

aber wenn ich versuche zu batchen, dann kommt die meldung:

Der Befehl "brcc32" ist entweder falsch geschrieben oder konnte nicht gefunden werden.

woran kann das liegen ? :gruebel:

[Chewie]

Dein Delphi\bin-Verzeichnis ist nicht in der Pfad-Umgebungsvariable registriert. Wenn du Win 2000/XP hast, mach folgendes: Rechtsklick auf Arbeitsplatz -> Eigenschaften -> Erweitert -> Umgebungsvariablen. Dort fügst du dieses Verzeichnis zur Variablen path hinzu.

[shareholder]

danköö, werde das morgen gleich mal testen :) :dancer:

[shareholder]

hallo chewie,

leider funktioniert das immer noch nicht. :(

habe hemacht was du gesagt hast. :(

[Chewie]

Dann kuck mal nach, ob die Datei da überhaupt drinnen ist.
Oder gib den kompletten Pfad an.

[shareholder]

http://www.chip.de/forum/thread.html?bwthreadid=615855

die datei liegt also auf der cd und ich hab nur die enterprise trial.

kann mir die jmd. zukommen lassen ?

ich ruf erstmal beim borland support an.

glaube aber kaum, das die mir jmd. von den schickt.

danke

[shareholder]

mh...

der aw meint, von montag-donnerstag 8-18 uhr und freitag 8-17 uhr.

wäre also, nett, wenn mir die jmd. zukommenlässt. danke!

[e-mail]

[CalganX]

Hi,
afaik ist es illegal die Datei einzeln dir zu schicken. Wenn die Datei bei deinem Delphi 7 nicht dabei bist, dann hast du halt Pech gehabt und musst auf eine andere Version umsteigen (zumal deine Trial ja nach 30 Tagen eh zu Ende ist). Generell befindet sich die Datei jedoch - wie Chewie schon gesagt hat - in deinem Delphi-Verzeichnis. Ansonsten ist es nicht installiert.
In diesem Fall befindet sich die Datei in dem Ordner, aus dem installiert wird, wenn du die Trial heruntergeladen hast.

Chris

[shareholder]

danke, hab die datei von der englischen delphi 6 cd genommen, funzt einwandfrei :)

[Luckie]

Sie ist unter Garantie dabei.

[shareholder]

nein, ist sie nicht. hab meine ganze festplatte durchsucht!