02-13-2019, 04:13 PM
(Son Düzenleme: 02-13-2019, 04:14 PM, Düzenleyen: sadikacar60@gmail.com.)
arkadaşlar internetde gördüm anladığım kadarıyla kütüphaneyi yükledim örneği çalıştırdıgımda h2wiringpi eklentisinde hata veriyor
bu dosyayı lazarus projesine nasıl dahil edeceğiz bir yerlere yükledik ama nereye
bu konuda yardımcı olurmusunuz
saygılarımla
https://github.com/emartisoft/LazarusRaspberryPi
Kod:
uses
Classes, SysUtils, FileUtil, Forms, Controls,
Graphics, Dialogs, StdCtrls,
ExtCtrls, h2wiringpi;
bu dosyayı lazarus projesine nasıl dahil edeceğiz bir yerlere yükledik ama nereye
bu konuda yardımcı olurmusunuz
saygılarımla
Kod:
procedure TForm1.ToggleBox1Change(Sender: TObject);
begin
if not wiringPiSetupDone then wiringPiSetup;
pinMode(7, OUTPUT);
if (ToggleBox1.Checked) then
begin
digitalWrite(7, HIGH);
Shape1.Brush.Color := clLime;
Label2.Caption := 'LED durumu ON';
end
else
begin
digitalWrite(7, LOW);
Shape1.Brush.Color := clGray;
Label2.Caption := 'LED durumu OFF';
end;
end;
https://github.com/emartisoft/LazarusRaspberryPi