标签: pascal

ListView和GestureListView有什么区别？例子会有所帮助.

readln读取直到行尾(输入按下),空格和所有内容,

我希望这样的东西,但对于ansi c(不是c ++,需要用于linux和windows)

我知道我可以创建一个函数来读取每个字符,直到输入按下但是如果有什么更酷的话它会很棒= D.

谢谢!

我有一个非常简单的问题.看看我用Pascal编写的代码:

Program Example;
Begin
Writeln('Question');
Readln;
End.

我想在页面中间显示"问题"这个词,怎么做？

:)

首先,我的代码

procedure TForm1.Button3Click(Sender: TObject);
var tempId,i:integer;
begin
tempId:=strtoint(edit5.Text);
plik:=TStringList.Create;
plik.LoadFromFile('.\klienci\'+linia_klient[id+1]+'.txt');
if (plik.Count=1) then
  begin
  label6.Caption:='then';
    if (tempId=StrToInt(plik[0])) then
      begin
      Label6.Caption:='Zwrócono';
      plik.Delete(0);
    end
  end
else
for i:=0 to plik.Count-2 do
  begin
    if (tempId=StrToInt(plik[i])) then
    begin
      Label6.Caption:='Zwrócono';
      plik.Delete(i);
    end;
  end;
plik.SaveToFile('.\klienci\'+linia_klient[id+1]+'.txt');
plik.Free;
end;

• 当for i:=0 to plik.Count-2 do我可以删除任何元素但不能删除.
• 当for i:=0 to plik.Count-1 do我可以删除任何元素而不是从头开始.因为否则List索引越界.

怎么样？如何安全搜索和删除TStringList中的元素？

在我的源代码中,我经常看到并使用如下构造:

with TSQLDataSet.Create(nil) do try
  //Dosomething, get a result from a query.    
finally
  Free;
end;

但我也经常看到这个结构:

with TSQLDataSet.Create(nil) do begin
  //Dosomething, get a result from a query.    
end;

如果我创建带有contruction的对象,我是否需要释放它们,或者在with-block结束时是自动的？

我的一些宽字符串包含用&#转义的字符.例如:宽字符串源看起来像:'   ' 转换后的结果必须是 ' '(3个空格).

功能应该是这样的

function UriUnescape(const aSrc: WideString): WideString;
begin
  //Your code goes here
end;

注意:1)我使用的是Delphi 7.

2)这个宽字符串是SOAP响应的一部分,而不是HTML.

3)一般来说,这种方法应该接受字母数字字符作为宽字符串的一部分:示例输入:='be @'结果:='be @'

我正在编写一个使用C-DLL的工具.C-DLL的功能期望a char*,其为UTF-8格式.我的问题:我可以通过PChar或必须使用UTF8Encode(string)吗？

我的理解是,自Delphi 2009以来,编译器只接受数据类型Integer.然而,也有大量的诸如物品实施例1和实施例2示出了混合的(!)的使用integer和Integer.AFAIK,Embarcadero网站专门使用Integer(好!)但是关于Pascal的维基百科文章专门使用integer.

不幸的是,我没有进入到另一个Pascal编译器,但德尔福7,可同时接收integer和Integer:

int1: Integer;
int2: intEGER;          // Allowed in Delphi 7
struct1: MyRecord;
struct2: mYrEcOrD;      // Also allowed => source of bugs!

有人可以告诉我Pascal是否正式区分大小写,以及这是否随最新的Delphi编译器而改变.

我正在Haskell中编写一个玩具Pascal编译器.我可以生成一个带类型注释的AST.我一直在忽略函数返回值赋值:

function foo : integer;
begin
    foo := 12
end;    

我如何处理这些,因为语法不区分它们和任何其他常规赋值语句？
是否应修改AST以特别突出显示返回值分配？

以及如何在类型检查阶段处理它们(环境包含函数签名和一堆上下文的符号表到目前为止已足够)？

使用此程序，我试图读取文件并将其随机打印到控制台。我想知道是否必须为此使用数组。例如，我可以将字符串分配到数组中，然后从数组中随机打印。但是，我不确定该如何处理。另一个问题是，当前程序无法从文件中读取第一行。我有一个text.txt包含

1. ABC
2. ABC
...
6. ABC

下面是我的代码。

type
  arr = record 
  end;

var
  x: text;
  s: string;
  SpacePos: word;
  myArray: array of arr;
  i: byte;

begin
  Assign(x, 'text.txt');
  reset(x);
  readln(x, s); 
  SetLength(myArray, 0);
  while not eof(x) do
  begin
    SetLength(myArray, Length(myArray) + 1);
    readln(x, s);
    WriteLn(s);
  end;
end.

请让我知道如何解决这个问题！