»»»»Imagem de fundo««««
Como por uma imagem de fundo lado a lado no meu form???
Robotizar
Curtidas 0
Respostas
Marcelo Saviski
02/05/2003
[b:4018775c5c]var[/b:4018775c5c]
x,y : integer;
[b:4018775c5c]begin[/b:4018775c5c]
x := 0;
y := 0;
[b:4018775c5c]repeat[/b:4018775c5c]
[b:4018775c5c]begin[/b:4018775c5c]
[b:4018775c5c]repeat[/b:4018775c5c]
[b:4018775c5c]begin[/b:4018775c5c]
canvas.draw(x,y,image1.picture.graphic);
x := x + image1.width;
[b:4018775c5c]end[/b:4018775c5c];
[b:4018775c5c]until[/b:4018775c5c]
x > height;
y := y + image1.heigth;
[b:4018775c5c]end[/b:4018775c5c];
[b:4018775c5c]until[/b:4018775c5c]
y > height;
x,y : integer;
[b:4018775c5c]begin[/b:4018775c5c]
x := 0;
y := 0;
[b:4018775c5c]repeat[/b:4018775c5c]
[b:4018775c5c]begin[/b:4018775c5c]
[b:4018775c5c]repeat[/b:4018775c5c]
[b:4018775c5c]begin[/b:4018775c5c]
canvas.draw(x,y,image1.picture.graphic);
x := x + image1.width;
[b:4018775c5c]end[/b:4018775c5c];
[b:4018775c5c]until[/b:4018775c5c]
x > height;
y := y + image1.heigth;
[b:4018775c5c]end[/b:4018775c5c];
[b:4018775c5c]until[/b:4018775c5c]
y > height;
GOSTEI 0
Rodrigo Costa
02/05/2003
insira um objeto image (paleta Additional) no form
propriedades:
align= alClient;
Picture= a figura que desejar (*.jpg, *.bmp)
propriedades:
align= alClient;
Picture= a figura que desejar (*.jpg, *.bmp)
GOSTEI 0
Marcelo Saviski
02/05/2003
[color=red:f15425d4cf][b:f15425d4cf]Correção:[/b:f15425d4cf][/color:f15425d4cf]
x > height;[color=blue:f15425d4cf] [/color:f15425d4cf]
x > width; [color=blue:f15425d4cf][/color:f15425d4cf]
x > height;[color=blue:f15425d4cf] [/color:f15425d4cf]
x > width; [color=blue:f15425d4cf][/color:f15425d4cf]
GOSTEI 0