also irgendwie funktioniert das bei mir immer noch nicht
er erkennt nach wie vor meine variable integer nicht und auch das andere haut noch nicht so wirklich hin
[delphi]
type TFormBla = class(TForm)
private
function TFormBla.IntToBin (Sender: TObject);
implementation
var a: Integer;
var b: string ;
begin
a:= strToInt (Edit1.text);
b:='';
while (a>0) do
begin
b:= IntToString (a mod 2) +b
a:= a div 2;
end
Edit2.text = b;
end;
wie kann ich hier eigentlich meinen quellcode reinpacken so das man auch die fehler sieht die er mir anzeigt?