AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein RGB Farbwerte an einen Mikrocontroller senden
Thema durchsuchen
Ansicht
Themen-Optionen

RGB Farbwerte an einen Mikrocontroller senden

Ein Thema von NiNj4sTy1e · begonnen am 7. Apr 2011 · letzter Beitrag vom 7. Apr 2011
Antwort Antwort
Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#1

AW: RGB Farbwerte an einen Mikrocontroller senden

  Alt 7. Apr 2011, 18:15
Delphi-Quellcode:
var
  command : AnsiString;
begin
  command := 'L'+Chr(Inttostr(r))+Chr(Inttostr(g))+Chr(Inttostr(b));
  ComPort1.WriteStr(command);
Datenübertragung muss natürlich auf 8-Bit eingestellt sein...
Wenn schon
Delphi-Quellcode:
var
  command : AnsiString;
begin
  command := 'L'+Chr(r)+Chr(g)+Chr(b);
  ComPort1.WriteStr(command);
  Mit Zitat antworten Zitat
NiNj4sTy1e

Registriert seit: 22. Dez 2008
10 Beiträge
 
Delphi 7 Personal
 
#2

AW: RGB Farbwerte an einen Mikrocontroller senden

  Alt 7. Apr 2011, 18:46
Vielen Dank erstmal, probiere es gleich mal aus, ja der Arduino Code ist nicht so toll, habe den Arduino erst seit Freitag und seit dem ziemlich viel Zeit damit verbracht zu verstehen, aber habe es leider bis jetzt nicht hinbekommen einen String anständig zu zerlegen.
Darum habe ich erstmal einen Code genommen der schon da war. Aber besser wäre natürlich wenn ich z.B. R255G255B255; oder so etwas schicke, aber
da fehlt halt noch das know how

Super das mir so schnell geholfen wird hier, habe so viel in allen möglichen Foren gelesen in den letzten Tagen, auch einiges gelernt, aber
geholfen hat es nicht wirklich.

mfg
  Mit Zitat antworten Zitat
hathor
(Gast)

n/a Beiträge
 
#3

AW: RGB Farbwerte an einen Mikrocontroller senden

  Alt 7. Apr 2011, 18:52
Ich verwende SYNASER für die serielle Schnittstelle:

SYNASER - Serial Port Synchronous Library for Delphi and Kylix

Features of SynaSer

This is list of basic features:

SynaSer is not components, but only classes and routines. Not needed any installation.
Working under Delphi, C++Builder, Kylix or FreePascal.
Supported platforms are Win32 and Linux.
Support for communicating on serial ports in blocking (synchronous) mode.
Supported is high speed of communication. (about few megabytes per second!).
Consume very low CPU time.
Supported is same communication mechanism as used in Synapse TCP/IP library.
Can lock serial port under Linux (like Windows do it).
Support for software and hardware handshake.
You may open any COM port, if exists in you system (i.e. COM156). You can use Windows or Linux
naming of devices on any supported platform!
Support for half-duplex RTS driven communication on all supported systems, include linux, WinNT
or Win9x! (good for RS485 convertors, etc.)
Option for detect device presence before each data transmission.
Support for easy use of AT commands for communicate with modems.
Angehängte Dateien
Dateityp: zip _synaser.zip (39,6 KB, 10x aufgerufen)
  Mit Zitat antworten Zitat
NiNj4sTy1e

Registriert seit: 22. Dez 2008
10 Beiträge
 
Delphi 7 Personal
 
#4

AW: RGB Farbwerte an einen Mikrocontroller senden

  Alt 7. Apr 2011, 19:02
Muss ich mir mal anschauen ist wahrscheinlich wieder alles anders hatte mich ja gerade erst mit Comport angefreundet.

Klappt super mit:

procedure TForm1.Button2Click(Sender: TObject);
var
command : AnsiString;
begin
command := 'L'+Chr(r)+Chr(g)+Chr(b);
ComPort1.WriteStr(command);
end;

Vielen Dank! Werde mich jetzt mal daran machen den Arduino Code neu zu gestalten

mfg

Geändert von NiNj4sTy1e ( 7. Apr 2011 um 23:12 Uhr)
  Mit Zitat antworten Zitat
Antwort Antwort


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 23:28 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