09-01-2024, Saat: 14:28
Merhaba,
Delphi 11 Community Edition kullanıyorum daha önceki delphi versiyonlarında CTRL + D yapınca kodlar alttaki gibi oluyordu.
Delphi 11 Community ile CTRL + D kod dizilimi saçmalıyor bu nedene olabilir? ve nasıl çözerim?
Eski versiyon delphi:
Delphi 11 Community Edition versiyon:
Delphi 11 Community Edition kullanıyorum daha önceki delphi versiyonlarında CTRL + D yapınca kodlar alttaki gibi oluyordu.
Delphi 11 Community ile CTRL + D kod dizilimi saçmalıyor bu nedene olabilir? ve nasıl çözerim?
Eski versiyon delphi:
procedure TForm1.Button1Click(Sender: TObject); var I: Integer; FDQ: TFDQuery; begin TButton(Sender).Enabled := False; try ListViewHavuz.BeginUpdate; try for I := Pred(ListViewHavuz.ItemCount) downto 0 do begin if ListViewHavuz.Items[I].Data['Select'].AsInteger = 2 then begin end; end; finally FDQ.Free; ListViewHavuz.EndUpdate; end; end; finally TButton(Sender).Enabled := True; end; end;
Delphi 11 Community Edition versiyon:
procedure TForm1.Button1Click(Sender: TObject); var I: Integer; FDQ: TFDQuery; begin TButton(Sender).Enabled := False; try ListViewHavuz.BeginUpdate; try for I := Pred(ListViewHavuz.ItemCount) downto 0 do begin if ListViewHavuz.Items[I].Data['Select'].AsInteger = 2 then begin end; end; finally FDQ.Free; ListViewHavuz.EndUpdate; end; end; finally TButton(Sender).Enabled := True; end; end;