LCD-Display-Objekt

[Basic-Master]

Hi,
ich hab n LCD-Display-Modul in Delphi geschrieben, das das Ausgeben von Texten oder Zeichen aufm Display erleichtern soll. Ihr müsst einfach nur die LCD.pas ins Lib-Verzeichnis von Delphi kopieren und in euern Projekten lcd in den Uses einbinden. Guckts euch einfach mal an :wink:

Als Vorlage galt mir das Beispiel von www.jalcds.de



[Edit]Das Modul unterstützt keine gLCDs![/Edit]



[edit=Admin]'Edit' auf Wunsch von Basicmaster eingefügt. Mfg, Daniel[/edit]

[Metalsoft]

moin :)

sag mal kannst du dazu ein beispielprogramm erstellen ? bei mir erscheint nämlich nix auf dem display ... jalcd funktioniert allerdings und andere programme ...

var
l:tlcd ;
begin
l := tlcd.Create(378);
l.displaytext(1,1,'test');
end;

ich hatte es einfach mal so probiert hehe

danke für antworten

edit: Problem durch zufall gefunden =)
so gehts : l := tlcd.Create($378);

[StefanDP]

Prima! Es funzt wunderbar (auch unter Windows XP...)
Aber jetzt ne Frage: Wie kann ich Umlaute darstellen? z.b. 'ö'?
Statt "ö" kommt immer ein "Summe-Zeichen"

stefan

[Basic-Master]

Zitat:

Zitat von StefanDP

Prima! Es funzt wunderbar (auch unter Windows XP...)
Aber jetzt ne Frage: Wie kann ich Umlaute darstellen? z.b. 'ö'?
Statt "ö" kommt immer ein "Summe-Zeichen"

stefan

hmm.. umlaute sind dem display nicht bekannt, deshalb muesstest du entweder oe, ue, ae schreiben oder du erstellst dir deine zeichen per defchar... wie du diese funktion anwenden kannst, steht im quellcode von der funktion :)

[MrKnogge]

wenn umlaute nicht bekannt sind, so solltest du eine Fehlermeldung bringen, oder besser die umlaute automatisch umwandeln.

[StefanDP]

Ich hab mir jetzt mal den Zeichensatz vom Display runtergeladen!
Da muss ich sowieso alle zeichen 128..255 umwandeln lassen, da die von Hersteller zu Hersteller verschieden sind!

Hab aber ein weiteres Problem:
Ich hab ein Display mit 2 HD44780 Controllern, sprich, das Programm kann nur den ersten (erste 2 Zeilen) ansprechen!

Wär schön, wenn jemand mal schauen könnte, wie man den 2ten Controller anspricht! :-D

stefan

[iaby]

schau mal, ob es mit meinem open-source proggie StatusLCD funktioniert:
http://www.delphipraxis.net/internal...ct.php?t=25439

einfach im source die anzahl der zeilen und spalten eintragen und kompilieren.
sollte eigenltich gehen!

gruss,
iaby

[superman21]

HI

Wie kann ich alle zeile gleichzeitig was rein schreiben bzw. erst die erste Zeile dann in der 2 Zeile so, dass die erste Zeile noch da ist??

CU

[Basic-Master]

meinst du sowas?

Delphi-Quellcode:

var eLCD: TLCD;
begin
eLCD := TLCD.Create($378);
eLCD.displaytext(1, 1, 'bla');
eLCD.displaytext(2, 1, 'blubb');
eLCD.displaytext(3, 1, 'asd');
eLCD.displaytext(4, 1, 'oO');

[mrsiemens]

Wer Interessa hat, hier 2 Module für HD44780 und T6963C Displays.

Die Ansteuerung für T6963C sollte recht flexibel und mit unterschiedlich konfektionierten Displays funzen und es wird bei jeder Datenübertragung versucht so wenig wie möglich Schreibzugriffe auszuführen um eine möglichst hohe Aktualisierungsrate zu erreichen.

Ich gebe allerdings keine Garantien
http://www.esports4you.de/clanohnepl...isp_T6963C.rar
http://www.esports4you.de/clanohnepl...sp_HD44780.rar

Die "Treiber" der Displays sind in einer DLL verpackt.
Testprogramm für die DLL:
http://www.esports4you.de/clanohnepl...stprogramm.ace

Das ganze war mal für ein univerelles LCD-Programm ( http://maikrutsche.de.vu/ )gedacht, ist allerdings aus Zeitgründen nie fertig geworden...