小编ain*_*ain的帖子

如何使用Delphi从命令行编译Win32程序

正如标题所说,我正在尝试在没有IDE的帮助下编译Win32程序,这样我就可以学习.我正在使用Borland Studio 2006,我的第一个想法是从IDE中获取一些Forms应用程序生成的文件并编译项目文件...这给了我关于期望单位和查找对象的错误.我知道这是来自dfm文件,其中包含表单的所有设置,但我不知道IDE如何处理该文件,任何人都可以帮助我更好地理解系统吗?:)

ide delphi command-line build

7
推荐指数
1
解决办法
472
查看次数

delphi dbgrid布尔值,接受f fa fal fals false,如何接受更多值?

我正在使用mssql和Delphi 2009.当表单包含连接到布尔字段的dbgrid时,值显示为True,或False.Delphi dbgrid具有翻译能力

f
fa
fal
fals
false
t
tr
tru
true
Run Code Online (Sandbox Code Playgroud)

成为truefalse.我想添加值,以便它可以接受其他字符串,并将它们匹配truefalse.这些值可以添加到哪里?

sql-server delphi delphi-2009

7
推荐指数
1
解决办法
912
查看次数

仅在单击树视图节点时执行事件

我,(更多时间),当我点击树视图的项目时尝试执行操作,请参阅:

procedure TForm1.TreeView1Click(Sender: TObject);
begin

  if treeview1.Selected.AbsoluteIndex=1 then
  begin
    showmessage('selecionado');
  end; 

end;
Run Code Online (Sandbox Code Playgroud)

如果用户单击树视图的索引1,此代码将显示一条消息,问题如下:如果用户选择索引1,将显示该消息,但在此之后,用户单击列表视图的空白区域消息仍然执行,因为该项仍然被选中.如何仅在用户单击相应项目时才能运行事件?

delphi treeview

7
推荐指数
1
解决办法
8993
查看次数

具有授予权限的firebird用户无法访问表

我通过jaybird创建了一个Firebird用户(PIPPO),跟随gsec"display":

GSEC> di
     user name                    uid   gid admin     full name
------------------------------------------------------------------------------------------------
SYSDBA                              0     0           Sql Server Administrator
PIPPO                               0     0           GesAll 1.0 User
GSEC>

我在Firebird DB中创建了一个角色(GESALLDB_USER)并授予了一些权限:

SQL> show grant;

/* Grant permissions for this database */
GRANT DELETE, INSERT, SELECT, UPDATE, REFERENCES ON ANELLI TO ROLE GESALLDB_USER

GRANT DELETE, INSERT, SELECT, UPDATE, REFERENCES ON COPPIE TO ROLE GESALLDB_USER

GRANT DELETE, INSERT, SELECT, UPDATE, REFERENCES ON COVE TO ROLE GESALLDB_USER
GRANT DELETE, INSERT, SELECT, UPDATE, REFERENCES ON DATI_CONFIGURAZIONE TO ROLE GESALLDB_USER …

database privileges firebird role jaybird

7
推荐指数
1
解决办法
1万
查看次数

Delphi"for ... to"语句从结束值到起始值运行

我正在Embarcadero Delphi 2010中编写一个简单的应用程序.一个包含两个周期的简单代码:

procedure TForm1.Button1Click(Sender: TObject);
var
a:array [0..255] of integer;
i:integer;
k,q:integer;
begin
k:=0;
for I := 0 to 255 do
 begin
    a[i]:=i;
 end;

for I := 0 to 255 do
 begin
    q:= a[i];
    k:=k+q;
 end;
Label1.Caption:=inttostr(k);
end;
Run Code Online (Sandbox Code Playgroud)

根据监视列表,在第二个循环变量"i"从值256开始并且转到0(256,255,254,...,0),但是数组的元素是正确的(0,1,2,3,... ).变量"i"仅在本地声明,没有全局变量.为什么会这样?这是正常的行为吗?

delphi for-loop

7
推荐指数
2
解决办法
1535
查看次数

Golang sql 命名参数查询

我正在尝试在 golang 中使用命名参数查询,如下所示:

stmt, err := db.Prepare("insert into users(name, email) values(@name, @email)")
if err != nil {
    //error handling
}

res, err := stmt.Exec(sql.Named("name", name), sql.Named("email", email))

if err != nil {
        //error: sql: expected 0 arguments, got 2 
}
Run Code Online (Sandbox Code Playgroud)

我收到以下错误:“sql:预期 0 个参数,得到 2 个”。

编写此查询的正确方法是什么?

mysql go

7
推荐指数
1
解决办法
9024
查看次数

遍历数据库/ sql sql.rows多次?

我需要遍历返回sql.Rows多次。是我唯一的两个选择:

  1. 将返回的结果缓存在本地数据结构中;
  2. 重做数据库查询?

换句话说,没有办法返回sql.Rows(即与相对Rows.Next)。

go

7
推荐指数
1
解决办法
645
查看次数

在Delphi XE中占用大量内存的对象的TStringList

我正在研究一个模拟程序.

程序所做的第一件事就是读取一个巨大的文件(28 mb,大约79'000行),解析每一行(大约150个字段),为对象创建一个类,并将其添加到TStringList.

它还会读入另一个文件,该文件在运行期间会添加更多对象.最后,它最终成为大约85,000个物体.

我正在使用Delphi 2007,程序使用了大量内存,但运行正常.我升级到Delphi XE,并将程序迁移过来,现在它使用了更多的内存,并且它在运行的一半时间内耗尽了内存.

所以在Delphi 2007中,它会在读取初始文件后最终使用1.4演出,这显然是一个巨大的数量,但在XE中,它最终使用了近1.8演出,这真的很大,导致耗尽并获得错误

所以我的问题是

  1. 它为什么要使用这么多内存?
  2. 为什么它在XE中使用的内存比2007年多?
  3. 我该怎么办?我无法改变文件的大小,我确实需要为每一行创建一个对象并将其存储在某个地方

谢谢

delphi memory-management tstringlist

6
推荐指数
2
解决办法
4284
查看次数

如何操作TFileStream

你好,我最近换TextFileTFileStream.我从不使用它,所以我的问题很小.

  • 在将其分配给变量后,如何在文件中添加一些内容?
  • 我怎样才能阅读该文件的某些表格?

我需要定义的行格式文件,所以我做的是这样的:

var linia_klienta:array[0..30] of string;
AssignFile(tempPlik,'klienci.txt');
Reset(tempPlik);
i:=0;
While Not Eof(tempPlik) do
  begin
    Readln(tempPlik,linia_klient[i]);
    inc(i);
  end;
CloseFile(tempPlik);
Run Code Online (Sandbox Code Playgroud)

然后当我需要第二行时

edit1.text = linia_klienta[1];
Run Code Online (Sandbox Code Playgroud)

delphi pascal

6
推荐指数
2
解决办法
1万
查看次数

如何在Google Chrome中更改书签文件夹图标?

我已经搜索过,似乎无法找到一种方法来更改Google Chrome书签栏中的标准蓝色/灰色书签图标(不是页面图标).使用Mac.有人知道吗?

google-chrome

6
推荐指数
0
解决办法
2299
查看次数