delphi-2010

问题 I am trying to use the Rand() function within MySQL to select a random record but I am getting a syntax error in the Rand() LIMIT line qryCards.SQL.Add('SELECT * FROM tblCards WHERE Card_Rarity = "Epic"'); qryCards.Open; iCount := qryCards.RecordCount; qryCards.Close; qryCards.SQL.Clear; qryCards.SQL.Add('SELECT * FROM tblCards ORDER BY rand(' + IntToStr(iCount) + ') LIMIT 1'); qryCards.Open; ShowMessage(qryCards.FieldByName('Card_Name').AsString); 回答1: First off, you are not using RAND()

问题 I'd like to set RadioButton properties in runtime in procedure InitRadioGroup(). It fails because RadioGroup.ControlCount is 0, although there are 3 RadioButtons in RadioGroup. What is wrong in D2010 RadioGroup? Same code works fine in Delphi 2007. procedure InitRadioGroup(RadioGroup: TRadioGroup); var i: integer; RadioButton: TRadioButton; begin for i := 0 to RadioGroup.ControlCount - 1 do begin RadioButton := (RadioGroup.Controls[i] as TRadioButton); RadioButton.ParentColor := False;

问题 I have an EXE running with normal privileges, but there are cases (for example using VSS / volume shadow copy) where I need admin privileges (if I'm not mistaken) The idea is to put the code that needs extra privileges in a separate EXE and launch it as needed. It's something that I'll rarely need, but I still need to have it as a last resort option (this is to say that I'll rarely need to call it, maybe once/twice a day on average) My question is: How can I call an admin-elevated process

问题 I have a Form which has data aware controls bound to datasets in a datamodule. I need to create additional instances of both the form and datamodule in the same application. I deleted the global variable that was automatically created when the data module was first added to the project. To my delight, controls in the designer could still be bound to datasets in the data module without this global variable. I'm assuming the IDE is parsing the dfm of the datamodule so the designer can still

问题 I'm working with Delphi2010 Enterprise Update 4. When I'm opening my project in the IDE and displaying the mainform code, there are 2 unit names underline in red . xxx http://img268.imageshack.us/img268/6475/unitnameunresolved.png. I have verified that the path to the unit source is in the Library path and in the Browsing path . Surprisingly, when I'm doing a right-clicking on the unit and selecting Open file at cursor , it works (ie. delphi opens the right unit). Any idea about that ? 回答1:

问题 Closed. This question is off-topic. It is not currently accepting answers. Want to improve this question? Update the question so it's on-topic for Stack Overflow. Closed 3 years ago . can you recommend an open source Delphi crypto library that works with Delphi 2006, Delphi 2009 & Delphi 2010 Algorithms need : DES, MD5, SHA-1 回答1: Here is a short list of the libraries I have used both pre and post D2009: TPLockbox (I use an unofficial updated version. Although there is a recent official(?)

问题 I have a delphi code that basically upload files to remote secure server using Indy 10.4.704 : IdHTTP := TIdHTTP.Create(nil); try TheCompressor := TIdCompressorZLib.Create(nil); TheSSL := TIdSSLIOHandlerSocketOpenSSL.Create(nil); with IdHTTP do begin HTTPOptions := [hoForceEncodeParams]; AllowCookies := True; HandleRedirects := True; ProtocolVersion := pv1_1; IOHandler := TheSSL; Compressor := TheCompressor; end; // with // Get upload resume offset try IdHttp.Head('https://www.domain.com/my

问题 I want the Firebird backup tool gbak to write its output to a Delphi stream (with no intermediate file). There is a command line parameter to write to stdout rather than a file. I then use the Execute method in JEDI's JclSysUtils to launch gbak and process that output. It looks like this: procedure DoBackup; var LBackupAbortFlag: Boolean; LBackupStream: TStringStream; begin LBackupAbortFlag := False; LBackupStream := TStringStream.Create; try Execute('"C:\path to\gbak.exe" -b -t -v -user

问题 The Delphi documentation for MSBuild says /property:name=value sets or overrides project-level properties, where name is the property name and value is the property value. Use a semicolon or a comma to separate multiple properties, or specify each property separately. /p is also acceptable. For example: /property:WarningLevel=2;OutputDir=bin\Debug I can't find a list of available properties, here's what I know so far: WarningLevel OutputDir (dcc32 -e equivalent) Config I'd like to get a

问题 The Delphi documentation for MSBuild says /property:name=value sets or overrides project-level properties, where name is the property name and value is the property value. Use a semicolon or a comma to separate multiple properties, or specify each property separately. /p is also acceptable. For example: /property:WarningLevel=2;OutputDir=bin\Debug I can't find a list of available properties, here's what I know so far: WarningLevel OutputDir (dcc32 -e equivalent) Config I'd like to get a