DeviceTree schreiben

[Vbxler]

Hallo!

Ich möchte bei meinem Beaglebone die Pins über Devicetree schreiben, habe aber folgendes Problem:

Wenn ich die Konsole eingebe funktioniert dies:

Code: Alles auswählen

root@beaglebone:*~# echo GPIO-Test > /sys/device/bone_capemgr.*/slots

Ich möchte dies Anweisung jetzt aus meiner Anwendung beim Start ausführen:

Code: Alles auswählen

iRetval := fpSystem('echo GPIO-Test > /sys/device/bone_capemgr.*/slots');

Das funktioniert aber nicht. Der Rückgabewert ist 512.

Weis jemand, wie ich das unter Pascal machen kann?

Danke für Eure Hilfe

Vbxler

[Christian]

http://wiki.freepascal.org/Raspberry_Pi ... l_hardware

[mschnell]

Ich möchte dies Anweisung jetzt aus meiner Anwendung beim Start ausführen...

Warum das denn ?

"echo ... > ..." schreibt einfach eine Zeile in eine Datei. Also Datei öffnen, ein Anzahl Bytes schreiben (bis inclusive newline), Datei schließen.

Das kannst Du mit Lazarus auch ohne ein externes Kommando (z.B. mit TFileStream.WriteAnsiString). machen.

-Michael