Problem mit dynamischen Arrays...

G-man · Verfasst: Mo 05.04.04 19:39

Moin,
ich schreibe gerade an einem Programm, das mit dynamischen Arrays umgeht und habe da be ich ungefähr folgenden code (liegt hier gerade nicht rum, versuchs mal aus dem Kopf):

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

var
Images: Array of TImage;


procedure MeineForm.ErstelleImage(number: integer);
begin
 SetLength(Images, number+1);
 Images[number]:= TImage.Create(nil);
 {...} //irgenwelche weitere belanglose Konfigurationen
end;

Nun will ich meinetwegen das Bild des Images ändern und mache das ca. so:

markieren

Delphi-Quelltext

1:
2:
3:
4:

procedure MeineForm.BildÄndern(number: integer);
begin
 Images[number].Picture:= 'C:\Irgendeinbild.bmp';
end;

Wenn ich nun zur Laufzeit das Bild ändern will, kriege ich eine Fehlermeldung.
Was kann ich tun/ habe ich falsch gemacht???
Schon mal vielen dank für etwaige Antworten.[/delphi]

_________________
...To err is human, but to really foul things up requires a computer.

Christian S. · Beiträge: 20451 Erhaltene Danke: 2264 Win 10 C# (VS 2019)

Verrätst Du uns auch, wie die Fehlermeldung lautet? :mrgreen:

_________________
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".

UC-Chewie · Beiträge: 531 WinXP D5 Ent

TImage ist kein String. Du weist diesem aber einen String zu.

_________________
Egal wie dumm man selbst ist, es gibt immer andere, die noch dümmer sind

G-man · Verfasst: Di 06.04.04 09:10

Fehlermeldungng: Im Project Project1.exe ist eine Exception der Klasse EAccesViolation aufgetreten. Meldung: 'Zugriffesverletzung bei Adresse ...'

_________________
...To err is human, but to really foul things up requires a computer.

G-man · Verfasst: Di 06.04.04 12:25

Ist also ein Runtime-Error, der immer dann auftritt, wenn ich die procedure benutzen will, also hat das nichts damit zutun ,dass ich dem Image.Picture einen String übergebe, weil der Compiler dann beim compilieren schon meckern würde.

_________________
...To err is human, but to really foul things up requires a computer.

Motzi · Verfasst: Di 06.04.04 13:05

Schonmal überprüft ob "number" im Gültigkeitsbereich liegt, also nicht größer als Length(Images) - 1 ist..?

_________________
gringo pussy cats - eef i see you i will pull your tail out by eets roots!

G-man · Verfasst: Di 06.04.04 13:14

Ja also theoretisch habe ich diese Fehlerquelle schon abgegrast. Daran sollte as eigentlich nicht liegen... Werd?s mir trotzdem nochmal anschauen...

_________________
...To err is human, but to really foul things up requires a computer.

rokdd · Beiträge: 329 Win XP D6

@UC-Chewie: du hast recht. aber image.picture ist ein string!!! also ist schon so richtig

vielleicht kannst du mal die stellen von wo die procedure aufgerufen werden posten und die procedure überhaupt. ich hoffe du hast den source parat..

robert

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme