Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Fehler : Array Type required (https://www.delphipraxis.net/165364-fehler-array-type-required.html)

markus5766h 26. Dez 2011 18:35

Delphi-Version: 5

Fehler : Array Type required
 
Bei folgendem Code
Code:
interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls, Buttons, Printers;

Const
  Un : array[0..7] of Real = (3.3, 5.0, 9.0, 12.0, 15.0, 18.0, 16.0, 25.0);
  Il : array[0..3] of Real = (0.1, 0.5, 1.0, 1.0);
  Uw : array[0..7] of Real = (9.0, 9.0, 12.0, 15.0, 15.0, 18.0, 18.0, 24.0);
  Iw : array[0..3] of Real = (0.15, 0.65, 1.1, 1.1);
  R1 : array[0..3] of Real = (12, 2.4, 1.2, 24.9);
  P1 : array[0..3] of Real = (0.25, 1, 2, 0.25);
  R2 : array[0..7] of Real = (240, 240, 240, 220, 240, 240, 169, 249);

 . . . . .

  private
    { Private declarations }
  nU, nI : Integer;
  public
    { Public declarations }
  end;

var
  frmNT: TfrmNT;

implementation

{$R *.dfm}
uses uNavigation;

procedure TfrmNT.rgUClick(Sender: TObject);
begin
  nU := rgU.ItemIndex;
  nI := rgI.ItemIndex;
. . . .

  Edit1.Text := FloatToStrF(R1[nI], ffNumber, 8, 2);

. . . .
end;
erhalte ich die Fehlermeldung :
Array Type required - in der Zeile Edit1.Text := ...
sehe ich jetzt den Wald vor lauter Bäumen nicht mehr ?

... hab' Delphi neu gestartet, jetzt zickt's nicht mehr rum !?!
Kennt jemand das Phänomen ?
- und wenn ja, gibt's eine Erklärung ?


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:10 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz