AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Komponentenentwicklung LED über TShape ?

Ein Thema von Chris211183 · begonnen am 23. Sep 2013 · letzter Beitrag vom 16. Jun 2015
Antwort Antwort
Seite 1 von 5  1 23     Letzte » 
Chris211183

Registriert seit: 19. Sep 2013
Ort: Braunschweig
204 Beiträge
 
Delphi 6 Professional
 
#1

Komponentenentwicklung LED über TShape ?

  Alt 23. Sep 2013, 10:05
Hallo,

ich bin neu hier und grüße euch ersteinmal alle!

Ich bin ebenfalls neu mit Delphi involviert, habe bis jetzt nur C++ Erfahrung.
Ich möchte eine LED-Komponente entwickeln, wie stelle ich sowas am Besten an ?

Vielen Dank,

Chris

P.S. die Led soll nicht nur rund sein, sondern auch als Pfeil dargestellt werden können.
Christian

Geändert von Chris211183 (23. Sep 2013 um 11:13 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#2

AW: Komponentenentwicklung LED über TShape ?

  Alt 23. Sep 2013, 10:42
Statt von TShape anzuleiten solltest Du von TGraphicControl ableiten. Ob Du aus einer Imagelist zeichnen oder selbst auf dem Canvas zeichnen willst bleibt Dir überlassen.
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat
Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.024 Beiträge
 
Delphi 10.3 Rio
 
#3

AW: Komponentenentwicklung LED über TShape ?

  Alt 23. Sep 2013, 10:51
Willkommen in der DP...

Ich würde sagen... Kommt darauf an, ob Du Deine LED-Reihe beliebig skalieren können willst!

Mavarik
  Mit Zitat antworten Zitat
Chris211183

Registriert seit: 19. Sep 2013
Ort: Braunschweig
204 Beiträge
 
Delphi 6 Professional
 
#4

AW: Komponentenentwicklung LED über TShape ?

  Alt 23. Sep 2013, 11:09
Danke für die schnellen Antworten;

bin ein bissl überfordert grad, also es soll am Ende eine Komponente werden, welche als LED fungiert,
es soll runde und Dreieckige LED´s geben, welche aktiv grün und inactiv rot leuchen
Christian

Geändert von Chris211183 (23. Sep 2013 um 11:14 Uhr)
  Mit Zitat antworten Zitat
pHL

Registriert seit: 27. Mai 2011
83 Beiträge
 
Delphi XE2 Professional
 
#5

AW: Komponentenentwicklung LED über TShape ?

  Alt 23. Sep 2013, 11:16
Hallo,

Hier gibt es eine kurze Anleitung wie man generell eine Komponente erstellt: http://docwiki.embarcadero.com/RADSt...ente_erstellen

PS: Bei den Jedis gibt es eine LED (TJvLED) -> vielleicht willst du dir ja den Source von denen anschauen () http://wiki.delphi-jedi.org/wiki/JVC...:TJvLED.Status

LG
  Mit Zitat antworten Zitat
Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.024 Beiträge
 
Delphi 10.3 Rio
 
#6

AW: Komponentenentwicklung LED über TShape ?

  Alt 23. Sep 2013, 11:20
Danke für die schnellen Antworten;

bin ein bissl überfordert grad, also es soll am Ende eine Komponente werden, welche als LED fungiert,
es soll runde und Dreieckige LED´s geben, welche aktiv grün und inactiv rot leuchen
OK ich bin von einer LED-Reihe (Textzeile/Laufschrift) ausgegangen...

Was Du beschreibst ist ja nur ein "farbiger Punkt"... Dann kannste auch ein TShape nehmen...

Mavarik
  Mit Zitat antworten Zitat
Chris211183

Registriert seit: 19. Sep 2013
Ort: Braunschweig
204 Beiträge
 
Delphi 6 Professional
 
#7

AW: Komponentenentwicklung LED über TShape ?

  Alt 23. Sep 2013, 11:24
Christian
  Mit Zitat antworten Zitat
Chris211183

Registriert seit: 19. Sep 2013
Ort: Braunschweig
204 Beiträge
 
Delphi 6 Professional
 
#8

AW: Komponentenentwicklung LED über TShape ?

  Alt 23. Sep 2013, 11:26
wie kann ich dem jetzt aber spezielle Werte zuweisen, zum Bsp., dass er die Farbe wechselt, wenn er angesteuert wir...

wie macht man soetwas ?
Christian
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.259 Beiträge
 
Delphi 10.4 Sydney
 
#9

AW: Komponentenentwicklung LED über TShape ?

  Alt 23. Sep 2013, 11:31
Für solche Dinge empfiehlt sich eine Property samt Setter.
Delphi-Quellcode:
type
  TLed = class(TVorfahr)
  private
    FDings: TDatentyp;
    procedure SetDings(const Value: TDatentyp);
  ...
  published
    property Dings: TDatentyp read FDings write SetDings;
    ...
  end;

procedure TLed.SetDings(const Value: TDatentyp);
begin
  if Value <> FDings then
    begin
      FDings := Value;
      invalidate;
    end;
end;
Sobald der Property Dings ein Wert zugewiesen wird, wird der Setter durchlaufen. Dieser schaut nach, ob auch tatsächlich eine Änderung eingetreten ist, setzt dann ggf. den neuen Wert und löst ein Neuzeichnen aus. Das muss man nicht unbedingt so machen, aber als Beispiel sollte das allemal taugen.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.024 Beiträge
 
Delphi 10.3 Rio
 
#10

AW: Komponentenentwicklung LED über TShape ?

  Alt 23. Sep 2013, 11:32
Ich denke mit Ansteuern meinte er Mausover? Oder?
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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 +2. Es ist jetzt 14:09 Uhr.
Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf