Witam serdecznie wszystkich,
Mam problem z prosta aplikacją pisaną na Delphi (Rad studio 10.4)
Problem dotyczy deklaracji zmiennej globalnej w tym przypadku jest to tablica " Klienci:".
var
Form1: TForm1;
Klienci: array [0 .. 400, 0 .. 10] of String;
PlanDnia: array [0 .. 200, 0 .. 10] of String;
KasaDnia: array [0 .. 100, 0 .. 10] of String;
.
.
.
procedure TForm1.dodaj_klientaClick(Sender: TObject);
var
i: integer;
begin
for i := 0 to 400 do
begin
if Klienci[i,0] = '' then
begin
Klienci[i, 0] := inttostr(i+1);
Klienci[i, 1] := nazwa_klienta.Text;
Klienci[i, 3] := Informacje_dodatkowe.Text;
exit
end;
end;
end;
Jest to aplikacja w wersji multidevice(win+android), jak testowałem wersje na sam tylko Windows, to wszystko działało bez problemu. A przy wersji multidevice wywala błąd przy wywołaniu tablicy klienci:
[dcc32 Error] main.pas(74): E2149 Class does not have a default property
Ma ktoś może pomysł jak w aplikacji multiplatformowej zadeklarować skutecznie tablice globalną taką która będzie dostępna w każdej funkcji i procedurze programu.