Einzelnen Beitrag anzeigen

Levium

Registriert seit: 12. Okt 2008
1 Beiträge
 
#1

Text umwandeln zu Morsecode :)

  Alt 4. Nov 2008, 15:23
HeyHo
Also ich habe da so ein kleeeeines Problem ^-^..
Ich wollte ganz einfach in ein Textfeld einen Text eingeben und dann auf Knopfdruck den gleichen Text als Morsecode in ein Labelfeld zB haben ..
hab mir das ganz einfach vorgestellt ..
aber irwi komm ich einfach nicht weiter

..

Ich hatte einfach mit dem hier angefangen...

var s: string; i:integer;
begin
s:= edit1.Text;
for i:= 1 to length(s)do
if s[i]='0' then s[i]:='. . . . .'
dann wollte ich das natürlich irwi weiter machen mit else .. nur dann habe ich es halt irwi versucht aber es hat einfach nicht geklappt :< ..


Kann mir bitte jemand sagen, wie ich das nun hinkrieg ?!

Vielen Dank schon mal
  Mit Zitat antworten Zitat