小编Atl*_*las的帖子

我如何开始使用Sub-Version + Delphi?

我是这个SCM的新手,但是由于SVN越来越受欢迎,我将尝试一下.

我注意到的事情:

  1. SVN只是SCM的骨干,没有前端?
  2. 为什么有多个版本的Windows二进制文件?底格里斯河?SlikSVN?的VisualSVN?
  3. 我是否需要像Apache这样的Web服务器才能使用SVN?
  4. 有几十个前端,Tortoise,WinSVN等......推荐哪一个?

整件事情相当令人困惑,我不知道从哪里开始.我正在使用Delphi,并希望用它来存储我的源文件.

更新1:似乎我使用"file:///"协议让它工作,谢谢.现在,如何将其配置为具有客户端PC的服务器.

svn delphi

16
推荐指数
2
解决办法
7037
查看次数

在运行时复制组件

是否有一种简单的方法可以复制父组件下的所有子组件,包括它们的已发布属性?

例如:

  • TPanel
    • 的TLabel
    • TEDIT
    • TListView的
    • TSpecialClassX

当然这是最重要的因素,它应该复制我在TPanel上放弃的任何新组件,而不是在正常情况下修改代码.

我听说过RTTI,但实际上从未使用过它.有任何想法吗?

delphi rtti

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

如何在不让用户首先关注文本框的情况下阅读条形码?

我最近购买了Metrologic条形码扫描仪(USB端口),因为每个人都已经知道它可以作为开箱即用的键盘模拟器.

如何配置扫描仪和我的应用程序,以便我的应用程序可以直接处理条形码数据?也就是说,我不希望用户专注于"文本字段",然后在KeyPress事件触发时处理数据.

c# java windows delphi barcode

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

Delphi多线程消息循环

我的应用程序有几个线程:1)主线程2)2个子主线程(每个都有消息循环,如下所示),由TFQM使用3)n工作线程(简单循环,包含Sleep())

我的问题是,当我关闭我的应用程序时,工作线程设法正常退出,但当我发出WM_QUIT关闭它们时,2个子主线程中的一个挂起(从不退出).


procedure ThreadProcFQM(P: Integer); stdcall;
var
  Msg: TMsg;
 _FQM: TFQM;
begin
  _FQM := Ptr(P);
  try
    _FQM.fHandle := AllocateHwnd(_FQM.WndProc);

    while GetMessage(Msg, 0, 0, 0) do
    begin
      TranslateMessage(Msg);
      DispatchMessage(Msg);
    end;

  finally
    DeallocateHWnd(_FQM.fHandle);
    SetEvent(_FQM.hTerminated);
  end;
end;
Run Code Online (Sandbox Code Playgroud)
procedure TFQM.Stop;
begin
  PostMessage(fHandle, WM_QUIT, 0, 0);

  WaitForSingleObject(hTerminated, INFINITE);
  if hThread <> INVALID_HANDLE_VALUE then
  begin
    CloseHandle(hThread);
    hThread := INVALID_HANDLE_VALUE;
  end;
end;
Run Code Online (Sandbox Code Playgroud)

delphi winapi multithreading

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

Delphi + Indy:连接正常关闭

使用D7 + Indy 10最新版本.

我的代码使用TIdSMTP发送电子邮件.我一直在某些最终用户处"正常关闭连接",并且永远不会发送电子邮件.

代码如下:

try
~~~~
~~~~
_idSMTP := TIdSmtp.Create;
with _idSMTP do
begin
  Host := 'myhost';
  Connect;
  try
    Send(_EmailMsg);
    Result := True;
  except
    on E: Exception do
    begin
      MsgDlgErr(Self.Handle, E.Message)
    end
  end;
end;
finally
 _idSMTP.Disconnect;
 _idSMTP.Free;
end;
Run Code Online (Sandbox Code Playgroud)

有什么建议?

delphi indy

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

Delphi增量变化?从D7到D2009

是否有网站或文档详细说明了每个版本所做的更改?

说,D7 - > D2005 - > D2006 - > D2007 - > D2009

  • 语言功能?
  • 数据库功能?
  • RTTI?
  • IDE?

delphi

8
推荐指数
1
解决办法
797
查看次数

Delphi 2009和Firebird 2.1 =完全Unicode?

有没有人开始制作Unicode应用程序或将现有应用程序转换为Unicode?

你如何调整Firebird以解决最少的问题,尤其是CHARSET属性?

遇到任何问题吗?还有什么别的我应该知道的吗?

我只是在准备自己,以便在跳到Unicode列车之前获得更少的惊喜.

delphi unicode firebird delphi-2009

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

Windows服务:在指定时间工作(Delphi)

只需检查编写Windows服务时是否有任何最佳实践.

服务(单线程)需要按指定的时间间隔工作,现在我只能想到:

  1. 使用sleep(),然后检查循环中的时间?
  2. 使用TTimer?

有什么建议?

windows delphi winapi

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

Delphi TIdhttp发布JSON?

有人得到JSON与TIdHttp一起工作吗?

PHP总是返回NULL $_POST,我做错了什么?

Delphi来源:

http := TIdHttp.Create(nil);
http.HandleRedirects := True;
http.ReadTimeout := 5000;
http.Request.ContentType := 'application/json';
jsonToSend := TStringStream.Create('{"name":"Peter Pan"}');
jsonToSend.Position := 0;
Memo1.Lines.Text := http.Post('http://www.website.com/test.php', jsonToSend);
jsonToSend.free;
http.free;
Run Code Online (Sandbox Code Playgroud)

PHP来源:

<?php
$value = json_decode($_POST);
var_dump($value);
?>
Run Code Online (Sandbox Code Playgroud)

php delphi json indy

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

"错误op_response:0",带有预处理语句

我正在使用来自"github.com/nakagami/firebirdsql"的firebird数据库驱动程序和GO1.11 + FB2.5

但我无法准备SELECT工作,它在执行第二个QUERYROW()时抛出"错误op_response:0"错误.有任何想法吗?

有没有替代司机?或者我使用不正确的驱动程序?

func test1(tx *sql.Tx) {
    sqlStr := "SELECT number FROM order WHERE id=?"
    stmt, err := tx.Prepare(sqlStr)
    if err != nil {
        panic(err.Error())
    }
    var value string
    err = stmt.QueryRow(123).Scan(&value)
    if err != nil {
        panic(err.Error())
    }
    fmt.Println(value)

    err = stmt.QueryRow(200).Scan(&value)
    if err != nil {
        panic(err.Error())
    }
    fmt.Println(value)    
}
Run Code Online (Sandbox Code Playgroud)

结果:

INV20183121
panic: Error op_response:0

goroutine 1 [running]:
main.test1(0xc00009c000, 0xc0000a8200)
Run Code Online (Sandbox Code Playgroud)

sql firebird go

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

标签 统计

delphi ×9

firebird ×2

indy ×2

winapi ×2

windows ×2

barcode ×1

c# ×1

delphi-2009 ×1

go ×1

java ×1

json ×1

multithreading ×1

php ×1

rtti ×1

sql ×1

svn ×1

unicode ×1