Перед тем, как рисовать на битмапе (точнее, на его Canvas), нужно задать размеры битмапа:
procedure TForm1.FormCreate(Sender: TObject);
begin
qwe:=Tbitmap.create;
qwe.Width:=128;
qwe.Height:=128;
end;
А
DoubleBuffered:boolean - это свойство формы.
И еще, советую рисовать не на форме, а на TImage.
Через буфер, естественно.