znalazłem arta na temat wgrywania do draw grid bitmap ale nie działa mi
mamy draw grida 5 na 5
we wszystkich polach ma byc wyświetlony rysunek aa.bmp
w polach po przekatnej bb.bmp
rozmiar komórki to 32 na 32
proszę o pomoc
- Rejestracja:prawie 21 lat
- Ostatnio:ponad 20 lat
- Postów:64
0
procedure TForm1.FormCreate(Sender: TObject);
var
I,II:integer;
begin
cell:=Tbitmap.Create;
cell.Width:=32;
cell.Height:=32;
for I:=1 to dg.rowcount-1 do
for II:=1 to dg.colcount-1 do
begin
cell.LoadFromFile(extractfiledir(application.ExeName)+''+inttostr(map[II,I])+'.bmp');
dg.Canvas.stretchdraw(dg.CellRect(I,II),cell);
end;
end;
czemu to nie działa
- Rejestracja:ponad 22 lata
- Ostatnio:ponad 9 lat
0
<font color="green">cell.LoadFromFile(extractfiledir(application.ExeName)+''+inttostr(map[II,I])+'.bmp');</span>
Co to jest map[II, I] ?? .. a w ogóle to ExtractFileDir wyciąga scieżke bez znaku \ na końcu, więc radzę Ci wstawić po tej linii:
ShowMessage(extractfiledir(application.ExeName)+''+inttostr(map[II,I])+'.bmp'));
.. i sprawdzić, czy dobrze określasz ścieżkę do pliku...
Zarejestruj się i dołącz do największej społeczności programistów w Polsce.
Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.