Autovervollständigung geht nicht

[Willie1]

Hallo Leute,
ich bin's schon wieder.

In meinem (sehr alten) Projekt Fussball funktioniert die Autovervollständigung nicht. Wenn ich es "von Hand" mache, lässt es sich kompilieren und läuft. Ich habe hier im Forum gesucht. Es gibt einen langen Thred zu diesem Thema. Es soll an with liegen, das ich hier sehr intensiv nutze. Meine Type Deklarationen sind sehr umfangreich. Könnt ihr euch das mal im Anhang ansehen. Alle with zu entfernen, wäre extrem mühsam. Wie gesagt, das Programm läuft seit vielen Jahren stabil. Jetzt will ich es verbessern. Danke.

Willie.

[jaenicke]

Die Codevervollständigung ist leider ein schwieriges Thema, wenn man unsaubere Quelltexte mit Kreuzbeziehungen oder with hat und eine Delphiversion mit dem neuen LSP hat.

In deiner 10.1 Starter Edition hast du aber noch die alte Codevervollständigung ohne LSP. Da sollte die Vervollständigung zumindest aufgehen. Dass sie mit with nicht immer gute Vorschläge machen kann, liegt in der Natur der Sache. Aber abgesehen davon sollte es funktionieren.

Geht denn die Auswahlliste grundsätzlich auf? Sprich was genau passiert?

Davon abgesehen bringt with aber noch weitere Probleme, weshalb man es ohnehin beseitigen sollte:

• Debuggen funktioniert an den Stellen nicht.
• Beim Wechsel zu einer neueren Delphiversion kann es plötzlich Fehler beim Kompilieren geben.
• Oder noch schlimmer: Es kompiliert nach dem Wechsel, tut aber das Falsche, ohne dass man so leicht die Ursache erkennen kann.
• Der Code ist schlechter lesbar, weil man nicht direkt sieht, wozu Identifier innerhalb des with gehhören.

[Willie1]

Zitat von jaenicke:

Geht denn die Auswahlliste grundsätzlich auf? Sprich was genau passiert?

Wenn ich den Punkt setze ist kurz der Sanduhr-Kringel zu sehen und dann passiert nichts.

Ich habe viele with Objekt1, Objekt2 do begin end und verschachtelte with .

In Delphi Büchern wurde with empfohlen, um Quelltext zu sparen. Aber jetzt werde ich sie sukzessive entfernen.

Ich denke, dass meine Typ Deklarationen im Vergleich zu einem professionellen Programm sicher nicht aufwändig sind.

Willie.

[himitsu]

Dafür, dass WITH mehr Probleme bereitet, als es Quellcode/Speicher einspart, was selbst eine 1-buchstabige lokale Variable besser lösen würde ...

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  R: TRect;
begin
  ...
  with R do begin
    Width := Right - Right;
    Height := Bottom - Top;
  end;
end;

Was denkt du, könnte dieser Code denn machen?

Jeweils in Delphi 7 und in Delphi 10

[omnibrain]

Zitat von himitsu:

Dafür, dass WITH mehr Probleme bereitet, als es Quellcode/Speicher einspart, was selbst eine 1-buchstabige lokale Variable besser lösen würde ...

"with" ist für jemanden der erst spät und von anderen Sprachen zu Delphi kam echt das schlimmste Sprachfeature überhaupt...

[himitsu]

inline variables

OK, nicht der perfekte WITH-Ersatz und erst in Delphi 12.2 repariert,

Delphi-Quellcode:

irgendwas.x := 123;

with irgendwas do
  x := 123;

var i := irgendwas;
i.x := 123:

aber für FOR das Perfekteste, weil hier niermand mehr auf die saublöde Idee kommen kann, nach/außerhalb der Schleife nochmal auf i zugreifen zu wollen.
for var i := 1 to 10 do

[Frickler]

Zitat von himitsu:

aber für FOR das Perfekteste, weil hier niermand mehr auf die saublöde Idee kommen kann, nach/außerhalb der Schleife nochmal auf i zugreifen zu wollen.
for var i := 1 to 10 do

So ist es. Deswegen ist für mich völlig unverständlich, warum man das nicht auch für with gemacht hat.with var x := myImage1.Canvas, y := myImage2.Canvas.Brush do x.CopyRect(...); mit x und y unbekannt außerhalb des Konstruktes.

[himitsu]

Delphi-Quellcode:

...
begin
  var x := myImage1.Canvas;
  var y := myImage2.Canvas.Brush;
  x.CopyRect(...);
  ... // x
end;
... // kein x

[Frickler]

Delphi-Quellcode:

begin
  var i: integer;
  for i:=1 to 10 do ...
end;

[himitsu]

Da ist i aber dennoch außerhalb des VAR zugreifbar.

Delphi-Quellcode:

begin
  var i: integer;
  for i := 1 to 10 do begin

  end;

  hier
end;

Delphi-Quellcode:

for var i := 1 to 10 do begin

end;

hier nicht