我有一个包含一些数字的字符串列表.我使用我写的冒泡排序对它们进行了排序.输出是:
18
20
3
44
53
Run Code Online (Sandbox Code Playgroud)
我不明白为什么上面输出而不是我的预期:
3
18
20
44
53
Run Code Online (Sandbox Code Playgroud)
我错过了什么?
我是Threads的新手,我有一个List包含一个字符串.我的目标是让多个线程对这个List工作,这个代码只针对一个线程,因为我现在正在学习,但是当我按下开始按钮时我得到了AV.
type
TDemoThread = class(TThread)
private
procedure Abort;
protected
procedure Execute; override;
public
List: TStringList;
end;
procedure TfrmMain.StartButton1Click(Sender: TObject);
var
i: integer;
List: Tstrings;
begin
for i := 0 to memo1.Lines.Count - 1 do
begin
List := TStringList.Create;
List.Add(memo1.Lines.Strings[i]);
end;
Thread := TDemoThread.Create(True);
Thread.FreeOnTerminate := True;
Thread.Start;
end;
procedure TDemoThread.Execute;
var
lHTTP: TIdHTTP;
i: integer;
X: Tstrings;
begin
inherited;
if Terminated then
Exit;
lHTTP := TIdHTTP.Create(nil);
X := TStringList.Create;
lHTTP.ReadTimeout := 30000;
lHTTP.HandleRedirects := True;
for i := 0 to …Run Code Online (Sandbox Code Playgroud)