Új hozzászólás Aktív témák
-
Prego
senior tag
Asszem némi felvilágosításra szoroluk paraméterátadás terén
Van egy tömböm, golobális változóként: Kepek: array of TImage;
Amikor új képet húzok be a ScrollBoxba, akkor először lementi a képet a megfelelő mappába, majd, kiüriti a tömböt (letörli az összes addigi képet), és újra kipakolja őket.
Ha a következőképpen hívom meg a törlést:
procedure TForm2.EmptyArray (T: array of TImage);
var i : Integer;
begin
for i := Low(T) to High(T) do
begin
T[i].Free;
T[i] := nil;
end;
End;
...
EmptyArray(Kepek);Akkor ugyan megjeleníti az új képeket, viszont úgy, hogy a már létező képek fölé rakja (itt ott kilóg az előző képek széle).
Ha viszont úgy hívom meg hogy:
procedure TForm2.EmptyArray;
var i : Integer;
begin
for i := Low(Kepek) to High(Kepek) do
begin
Kepek[i].Free;
Kepek[i] := nil;
end;
End;
...
EmptyArray;Akkor minden szépen végbemegy.
A baj az hogy nem csak egy képes tömböm van, és az első megoldás valamivel csinosabb lenne ...
Aki másnak vermet ás az a Stack Pointer
Új hozzászólás Aktív témák
- Xbox Series X|S
- PlayStation 5
- GoodSpeed: SAMSUNG Galaxy Buds FE (SM-R400NZAAEUE) a 9 éves SONY SBH20 utódja (nálam)
- OLED TV topic
- Motorola Moto G24 Power - hol van az erő?
- Vicces képek
- Politika
- Háztartási gépek
- Kormányok / autós szimulátorok topicja
- Azonnali informatikai kérdések órája
- További aktív témák...