Umrechnen Bin-Dez / Dez-Bin ohne shr oder shl

[Poldy]

habe da nochmal ne nachfrage, nachdem ich eine andere hasuarbeit fertig habe und mich nun wieder mit delphi beschäftige mal wieder auf probleme gestossen...
hoffe ihr könnt mir bei meinen blöden fragen ein wenig helfen

mein quellcode sieht wie folgt aus...

function IntToBin (Sender: TObject);

var a: int;
var b: string;

begin

a:= strToInt (Edit1.text);
b:= '';
while (a>0) do
begin
b:= IntToString (a mod2) +b
a:= a div 2;
end
Edit2.text = b;
end

der quellcode ansich und auch die logig leuchtet mir soweit ein.. was ich wiederrum nicht verstehe ist warum er meine var a und mein Edit2 nicht kennt...