Forum: Object-Pascal / Delphi-Language
Delphi
by Spectre,
9. Mär 2013
ah...also der zehnte hotspot hat dann index 10 und es wird RUNTER gezählt bis 0 mit -1 anstatt hoch?
Forum: Object-Pascal / Delphi-Language
Delphi
by Spectre,
9. Mär 2013
danke Bummi...
var
i:Integer;
begin
for I := 0 to Hsiafrika.HotSpots.Count - 1 do
hsiafrika.HotSpots.HoverColor:= clwhite;
problem gelöst & wieder was dazu gelernt..
Forum: Object-Pascal / Delphi-Language
Delphi
by Spectre,
8. Mär 2013
danke! bin gerade auf der arbeit aber ich teste das heute abend aus wenn ich @ home!
Forum: Object-Pascal / Delphi-Language
Delphi
by Spectre,
8. Mär 2013
hab ich grad probiert, allerdings meckert er bei den hotspots bei low/high dann bzw er bez. sie als undefiniert
ich bin mir nicht sicher ob das Arrays sind. Die hotspots sind bereiche die ich auf dem hotspotimage(ner komponente) anklickbar gemacht habe und denen ich verschiedenen eigenschaften zuweisen kann.
edit: ansprechen tue ich die hotspots via: hotspotimage.hotspots.hovercolor:=...
Forum: Object-Pascal / Delphi-Language
Delphi
by Spectre,
8. Mär 2013
jop...the same..
procedure Tworldmapsource.FormCreate(Sender: TObject);
var i : integer;
begin
for i:=low(1) to high(5) do
THotSpot(FindComponent('Hotspots')).HoverColor := clwhite;
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by Spectre,
8. Mär 2013
procedure Tworldmapsource.FormCreate(Sender: TObject);
var i : integer;
begin
for i := 1 to 48 do
THotSpot(FindComponent('Hotspots')).HoverColor := clwhite;
hsiafrika.Loaded;
end;
complilieren kann ich den code so zwar, aber ich bekomme eine zugriffsverletzung wenn ich versuche zu starten :lol:
Forum: Object-Pascal / Delphi-Language
Delphi
by Spectre,
8. Mär 2013
hey..danke für den code! älteres topic aber ich muss es grad mal ausbuddeln :D
ich habe allerdings das problem das meine objekte keine zahlen AM ENDE haben, sondern so aussehen:
Hotspots, Hotspots, Hotspots, Hotspots
ich habe schwierigkeiten das anzupassen, hat jemand nen tip wie ich den code ändern muss :S ?