Dein Fehler liegt hier...:

am2pm hat folgendes geschrieben:

markieren Delphi-Quelltext     1: 2: 3: 4: 5:     procedure TForm1.OpenCDDrive(const ADriveChar: Char; Open: Boolean);     { Private declarations }   public     { Public declarations }   end;

(markiertes entfernen)
Und hier:

Christian S. hat folgendes geschrieben:

Beschäftige Dich mit den Grundlagen, anstatt Dir im Forum Deine Programme zusammenzukopieren! Lies ein paar Tutorials! Grundlagen findest Du z.B hier: www.dsdt.info/grundlagen/ Oder auch hier: crashkurs.christian-stelzmann.de

[Error] uLaufwerk.pas(77): Type of expression must be BOOLEAN

am2pm hat folgendes geschrieben:

lass das mal meine sorge sein was ich mache ich nur um hilfe gebeten

Das grenzt ja schon an Frechheit, dann solltest Du von Glück sprechen wenn Dich hier noch einer mit deinen Sorgen nicht allein lässt.

am2pm hat folgendes geschrieben:

lass das mal meine sorge sein was ich mache

Mein Posting klang vielleicht etwas unfreundlich (sorry!), war aber gut gemeint.

Du wirst nicht lernen, eigenständig zu programmieren, wenn Du Dich nicht mit den Grundlagen beschäftigst. Natürlich ist es einfacher, sich der verführerischen dunklen Seite zuzuwenden und sich die Progamme zusammenzukopieren, aber wahre Erleuchtung kann Dir nur die helle Seite bringen, die so aussieht, dass Du den schweren Weg der Grundlagen gehst

am2pm hat folgendes geschrieben:

lass das mal meine sorge sein was ich mache ich nur um hilfe gebeten

Das heißt für mich "ich habe vor, malware zu programmieren." und bedeutet das schließen dieses Threads. Aber hey, deine Entscheidung, ob du Hilfe willst, oder nicht

JayEff hat folgendes geschrieben:

Das heißt für mich "ich habe vor, malware zu programmieren." und bedeutet das schließen dieses Threads. Aber hey, deine Entscheidung, ob du Hilfe willst, oder nicht

Ein Schadprogramm, dass mein Laufwerk öffnet? Naja, ich weiß net...

Gruß

Laut Richtlinien wird auch die Produktion von Scherzprogrammen auch nicht unterstützt. Ist ja auch ne art Malware Aber das is ja nich das Thema. Solang der Fragesteller nicht klar macht, wozu er das ganze braucht, ist es Sache der Mods, ob sie das weiterlaufen lassen

Saubäär hat folgendes geschrieben:

Ein Schadprogramm, dass mein Laufwerk öffnet? Naja, ich weiß net... Gruß

Worst case: man startet das Programm auf seinem 24/7-laufendem Rechner (nur mal gucken, ist bestimmt nichts schlimmes dran...) & fährt in den wohlverdienten, 3 wöchigen Urlaub. TTimer-gesteuert fährt dieses Proggi dann alle X Sekunden/Minuten das Laufwerk auf und zu.

Meinst Du nicht, dass die anfällige Plastik-Mechanik des Laufwerks dann irgendwann zu Pulver zerfällt?
Also könnte es ein Schadprogramm werden!

Nun, Vormittags2Nachmittags, wofür braucht man (Du) sowas?

Leute, ist gut jetzt Wo kam dieses "Schadprogramm"-Gerücht her? Sofern keiner nachweisen kann, dass im Iran eine Atombombe explodiert, wenn in Grönland ein DVD-Laufwerk aufgeht, sollte diese Diskussion hier zu Ende sein

Vielleicht etwas unpolitischer, mein Freund?

Ja, ja, die bösen Grönländer die die Atombomben der Iraner mit dem Laser eines geöffneten DVD-Laufwerks hoch gehen lassen...

Back to topic:

am2pm hat folgendes geschrieben:

markieren Delphi-Quelltext     1: 2: 3: 4: 5: 6: 7: 8: begin         if OpenCDDrive('E',True) then           mciSendString('set cdlw door open wait', Nil, 0, 0)         else         mciSendString('set cdlw door closed wait', Nil, 0, 0);         mciSendString('close cdlw', Nil, 0, 0);       end;     end; [Error] uLaufwerk.pas(77): Type of expression must be BOOLEAN

Wo kommt denn der Code jetzt her? Zusammenhanglos, ohne tieferen Sinn, ein Mix aus Deinem zuletzt vollständig geposteten Quellcode.
Ich glaube es wird mal wieder Zeit für den kompletten Quelltext.