Delphi programozás - Szoftverfejlesztés fórum

üzenetek

hozzászólások


Fire/SOUL/CD
(félisten)
Blog

Persze, ezért adtam a megoldást...
Törléskor nem ellenőrizted, hogy létezik-e az adott SUBMenu.. (mer' nem)
TI: lehet -1, azaz nincs adott submenu... Azt meg nem lehet törölni. ;)

procedure TMainWin.DelMenu;
var TI: integer;
begin
TI:= WinMenu.Items.Items[0].Items[3].Count-1;
WinMenu.Items.Items[0].Items[3].Delete(TI);
end;

Itt nem elleőrizted az adott submenu meglétét, feltételezted(azt nem kellene), hogy van...

[ Szerkesztve ]

üzenetek