ASCII-Code Viewer

[KingofWerlte]

Helas erstmal! :hi:
So hab mal was aus lauter langeweile geschreiben weil ich krank war (mehr als sonst :mrgreen: )
Was ist es?
Eigentlich ein Programm das die Dezimalzahl eines Zeichens nach der ASCII- Tabelle anzeigt.
Sieht es gut aus?
sagen wirs so.....nöö eigentlich net :-D
Lasst euch von diesen beschreibungen nicht abschrecken :tongue: wer es sich mal ansehn will soll es ruhig machen
Getestet auf Windows 98SE
Größe: 393kb
Viel spaß damit :hello:

[The-X]

Is nich böse gemeint, aber das gibt's schon seit Win 3.x (wenn auch ein wenig umfangreicher) und nennt sich CharMap.exe (zwar nicht immer mitinstalliert... egal ;) trotzdem gut :thuimb:

Meine Frage wäre dann noch, ob du für jeden Button einzeln ein Onclick-Event benutzt?

kompakter geht's so:

Delphi-Quellcode:

Procedure TForm1.TheButtonClick(Sender:TObject);
  Var S:String;
Begin
  If Not(Sender is TButton) Then exit;
  s:=(Sender AS TButton).Caption;
  Showmessage('Die Taste hat den Wert '+StrToInt(Ord(S[1])));
end;

[ no warranty 4 Code, cauze produced by BrAiN & not @ Home :mrgreen: ]

[KingofWerlte]

Oh..naja was solls :-D war eh mehr so zeitvertreib :mrgreen:
also das mit der anzeige hab ich so gemacht:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage('Die Dezimalzahl dafür ist: 65 ');
end;

Wie gesagt nach 3 Tagen Bettlegrigkeit ohne an den PC zu können wollt ich mal wieder ein wenig tippen :coder:

[Bernhard Geyer]

Schau mal unterGExperts. Dort gibt es ein Plugin für die Delphi-IDE, welche u.a. auch eine Ascii-Chart in der IDE anbietet.