was heißt begin begin ?

[xaromz]

Hallo,

Zitat von mimi:

kann mir das jemmand erklären was das mit begin begin bedeutet ?

Dass Du ein überflüssiges begin...end hast?

//Edit: mit vernünftiger Einrückung erkennt man sowas auch ganz schnell:

Delphi-Quellcode:

case message.msg of 
  WM_MOUSEMOVE: 
  begin
    if isMousesel = True then
    begin 
      index:=GetItemIndex; 
      if index > -1 then 
      begin
        begin 
          SetItemindex(index,True); 
        end
      end; // is_mouseMove 
      isMouseSel:=true; 
      Draw; 
    end; // wm_mouseMouve 
  end; // zu viel 
... 
end;

Gruß
xaromz