11-07-2012, 10:28 AM
ghost-dz كتب :وعليكم السلام
PHP كود :function ListViewDuplicates(const LV: TListView; const Check: string): Boolean;
var
i: Integer;
begin
Result := False;
for i := LV.Items.Count - 1 downto 0 do
begin
if LV.Items[i].Caption = Check then
begin
Result := False;
Break;
end
else
Result := True;
end;
end;
end;
لا داعي لتحديد result بعد break الافضل:
كود :
function ListViewDuplicates(const LV: TListView; const Check: string): Boolean;
var
i: Integer;
begin
Result := True;
for i := LV.Items.Count - 1 downto 0 do
begin
if LV.Items[i].Caption = Check then
begin
Result := False;
Break;
end
end;
end;السلام عليكم
و لرب نازلة يضيق لها الفتى ذرعا و عند الله منها المخرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج

