Hallo liebe Community,

So dies ist nun mein erster Eintrag in Delphi Praxis. Ich bin Student der Elektro- und Informationstechnik. (Das heißt mein Schwerpunkt liegt eigentlich auf der Elektrotechnik und ich bin kein Profi in der Delphi-Programmierung)
Nun bin ich dabei meine Bachelorarbeit zu schreiben, in der ich die unterschiedlichen Schnittstellen der Messgeräte meiner Firma programmieren soll.
Ich habe mich jetzt erstmal durch die TCP und RS232 Programmierung mit Delphi-Praxis gekämpft.
(Danke hierfür an alle Kommentare, die ich zu diesen Themen lesen durfte!)
Jetzt bin ich dabei eine GPIB Programmierung zu starten, allerdings finde ich kein Anhaltspunkt.
Ich kenne mich leider mit der Schnittstelle der GPIB nicht aus und wollte wissen ob jemand von euch davon Ahnung hat. ( Da es in der Forums-Suche leider recht Mau aussieht).

Ich bräuchte eigentlich nur einen Write, einen Read und einen Open/ Close Befehl für die GPIB, damit ich mein Programm schreiben könnte.

Hat jemand einen tollen Tutorial, oder gleich mal eine Befehlsliste für IEEE 488?
Ich freue auf Antwort
PS: Ich hoffe, dass ich das Forum jetzt nicht zu gespammt haben.

Mfg Markus

Hallo,

welche Hardware setzt du ein?
Wer ist der Hersteller deiner IEEE-Schnittstellenkarte (NI, Meilhaus etc.)

Der Hersteller hat sicher Inforamtionen für dich.

Hallo RauchOskar,
danke für die schnelle Antwort/Frage.
Momentan weiß ich noch nicht genau welche Hardware da zum tragen kommt.(Wie gesagt bin in dem Thema ganz neu)
Ich schätze, dass es ein Usb to GPIB Konverter wird. Über diesen wird dann wohl an mein Messgerät ein Befehl geschickt. Genauere Angaben hab ich noch nicht.
Eigentlich wollte ich nur wissen ob es ähnlich wie bei der RS 232 Verbindung auch einen Writebefehl wie Write(PAnsiChar(AnsiString(Command))^, DataLen) gibt oder nicht?
Oder ist das immer Hardwareabhängig?

mfg Markus

hallo,
ich verwende immer mit Delphi Keithley USB488B als Schnittstelle für GPIB.
Die Unterstützen Delphi, funkt sogar mit Win 10.

die Befehle sind einfach:

send(Adress613A,'READ1OW?', status2);
enter(meldung, 255, lang, Adress613A, status2);

Gruss
Peter

Demo:
GPIB-488
https://github.com/pinkavaj/seebrez/archive/master.zip

GPIB-488 Programming Reference Manual