Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.056 Beiträge
 
Delphi 12 Athens
 
#13

AW: Mehrere TImages mit einer Procedure erstellen

  Alt 10. Okt 2016, 18:30
Man kann statt der TObjektList /TObjektList<TBild> auch ein TObjectDictionary<string,TBild> verwenden, denn da kann man dann auch noch schöner auf ein bestimmtes Bild zugreifen.

Also statt über den Index, welchen man vorher noch suchen müsste, direkt über den Namen.
Delphi-Quellcode:
//MeineObjectList.Add(Test);
MeineObjectList.Add(Key, Test); // oder MeineObjectList.Add(Test.ImageName, Test);

DasBild := MeineObjectList['DerBildName'];
Oder statt dem Namen direkt die Koordinaten
Delphi-Quellcode:
var MeineObjectList: TObjectDictionary<TPoint,TBild>;

MeineObjectList.Add(Point(FeldY, FeldY), Test);

DasBild := MeineObjectList[Point(HoleY, HoleY)];
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu (10. Okt 2016 um 18:37 Uhr)
  Mit Zitat antworten Zitat