AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Delphi Wie kann ich mit Delphi Daten via USB versenden?
Thema durchsuchen
Ansicht
Themen-Optionen

Wie kann ich mit Delphi Daten via USB versenden?

Ein Thema von BBoy · begonnen am 14. Nov 2012 · letzter Beitrag vom 16. Nov 2012
 
BBoy

Registriert seit: 17. Jan 2007
418 Beiträge
 
Delphi 10 Seattle Professional
 
#6

AW: Mikrocontroller Arduino in Delphi Programmieren?

  Alt 15. Nov 2012, 11:08
Ich weiß nicht ob wir uns hier richtig verstehen.
Der Arduino UNO ist ein Board mit dem ATmega328 Chip drauf und verschiedenen Anschlüssen. Das ganze kann man normalerweise in Bascom(Basic) oder der mitgelieferten Software Programmieren. Ich glaube das ist C+, hier mal ein Beispiel:
Delphi-Quellcode:
This example code is in the public domain.
 
 */
#include <SoftwareSerial.h>

SoftwareSerial mySerial(10, 11); // RX, TX

void setup()
{
  // Open serial communications and wait for port to open:
  Serial.begin(57600);
  while (!Serial) {
    ; // wait for serial port to connect. Needed for Leonardo only
  }



  Serial.println("Goodnight moon!");

  // set the data rate for the SoftwareSerial port
  mySerial.begin(4800);
  mySerial.println("Hello, world?");
}

void loop() // run over and over
{
  if (mySerial.available())
    Serial.write(mySerial.read());
  if (Serial.available())
    mySerial.write(Serial.read());
}
Dieser Code wird dann compiliert und an den Chip gesendet.

Da ich in Delphi recht fit bin, wäre es für mich wesentlich einfacher das Board in Delphi zu programmieren oder damit zu kommunizieren. Letztendlich ist es der Compiler der es in Maschinensprache übersetzt.
Ich könnte mir in Delphi Programme schreiben mit denen man z.B. so etwas: http://www.youtube.com/watch?v=6mXM-oGggrM komfortabel Programmieren könnte oder um Messwerte auszulesen usw usw.

Über die Serielle Schnittstelle wäre das alles kein Problem, dafür gibt es möglichkeiten. Das sieht dann so aus:
Delphi-Quellcode:
procedure TForm1.chk_led1Click(Sender: TObject);
begin

    if chk_led1.Checked=true then
    comport1.WriteStr('1')
    else
    comport1.WriteStr('A')

end;
Und ich suche eine Möglichkeit das selbe aber über USB zu machen.

Geändert von BBoy (15. Nov 2012 um 11:14 Uhr)
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:22 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz