1,899 Topics
 | |
| | At first, I want to present myself. Nice to meet you all. I am implementing an app with Delphi 2007 + Firebird 2.1. I use TMS Components because I like the aspect of MS apps and I'd found this pack as the better. I like also usability of MS apps …  |
| | Hi, I have an old legacy application developed by someone else many years ago that we use day to day in our business. My boss would like to update the logos and images used within the application to give it a re-vamp. I do not know what the program was … |
| | Hi All, I work on a software package that prints checks, among other things. I want to verify that a particular font is installed on the system before I allow the print, because if its not there it defaults to Wingdings, and checks don't quite look right with Wingdings :) … |
| | Was recently asked to convert some code, but I have a minimalistic ammount of knowledge of delphi and I wasn't able to convert this code. If you could help me out it would be great. [code=c++] void TypeStr(char *lpszString) { char cChar; while((cChar=*lpszString++)) // loops through chars { short vk=VkKeyScan(cChar); … |
| | Dear Sir, I have got confused to the real / integer. Would you mind helping to express it to me? I have got the answer of the following question: Write a menu system for the currency exchange program. My menu could look like this: Exchange rates How much money would … |
| | Dear Sir, It is a simple example using a string. [code] program dowhile; {$APPTYPE CONSOLE} uses SysUtils, OurCrt; var my_words : string; begin my_words := ''; writeln('Enter some words (type "stop" to finish):'); readln(my_words); while (my_words <> 'stop') do begin clrscr; Writeln('You typed:'); writeln(my_words); writeln; writeln('Enter some words (type "stop" … |
| | I had a hard drive crash and stupid me haven't made backups for at least a year. I had several projects for which I used Delphi 5 and have lost all the code. Is there any way of getting the code back by un compiling the exe file? |
| | Hi, I am modifying a software in delphi, The software is in Turkish, but it cannot show special Turkish characters properly. Can anyone help me solve this problem. |
| | Hello, I have a small question. I have done some projects in C++ and Delphi. In C++, when I work with classes, I always use pointers.I make functions and classes that takes pointer to a class as an argument. But in Delphi, like this example: (some class).Create(Owner: TComponent) function take … |
| | Dear Sir, I have got a serious problem to understanding of the answer. The question is: Create the first half of a game of rock, paper, scissors. Ask the user for R,P or S. Get the computer to generate 0,1 or 2. Now convert the computer's number to R, P …  |
| | I use TRegExpr v.0.952 and now i want use RegexBuddy, but i can't replace code. Can u help me? [CODE] var Temp: TStringList; Index: Integer; regex: TRegExpr; begin Temp:= TStringList.Create(); regex := TRegExpr.create(); regex.Expression := '(?m)(?g)^ftp:.+'; try for Index:= 0 to FList.Count - 1 do begin regex.exec(FList[index]); if (regex.Match[0] <> … |
| | Hi All User Please Translate C++ To Delphi Thank You Very Much <snip>  |
| | Dear Sir, Could you tell me how can I do this question? Write a program that will readin three numbers nd output a message indicating whether or not the numbers were entered in ascending numerical order. (Equal entries are regarded as being in order, e.g. 4 4 5 is OK). … |
| | hi, just a quick question can somebody please tell me how to restrict the output of the code below to 2 decimal places. [code]VolumeCalc.Caption := FloatToStr(StrToFloat(EngineSizeVal.Text) / 2 / StrToFloat(CylNumVal.Text));[/code] thx for the help. |
| | Dear Sir, Please find the attached document for your reference. Could you tell me what is wrong of my answer? [code] program Project1; {$APPTYPE CONSOLE} uses SysUtils; var balance, posNeg, positive, negative: integer; begin randomize; writeln('Get average balance'); balance:=random(10000); posNeg:=random(2); if posNeg=0 then begin balance:=balance*-1-30; end else begin writeln('Positive balance.'); … |
| | Hi, I am doing my Final project on audio applications using Delphi and I would like to get a pascal (Delphi) programme on reading, modifying (amplitude of a wave file) and saving the resulting wave file. My purpose is to generate sine waves at different Amplitudes at 24 or 32 … |
| | Hi i have another question this time about mathmatical calculations in delphi. i have 3 labels on the form. Label1 is formatted like this 200/50, i need to use both parts of this caption in the calculation, the calculation needs to be 200 * .50 the 2nd Number in the … |
| | hi, i havent been programming in delphi long so sorry if im being stupid with this question. my application basically has a trackbar which alters the value of a label caption. and 2 text boxes. that value of the 1st text box is the Caption of the label * the … |
| | I create an application with three threads(access oracle database by bde tquery) main program:random select,insert data;cycle:10S thread1:random select,insert,delete data;cycle:10s thread2:random select;cycle:60s thread3:random insert;cycle:20s five errors occur between 24 hours,longest interval:12hours;shortest interval:0.5hour, error as following: "Lost communication with SQL server.ORA-03113:..." "General SQL error. ORA-03114:..." ping database is ok during error; the … |
| | May I ask you a question on Delphi? The following is my question: Write a program that asks for two numbers from the user. Add these numbers together and store them. Then output to the screen the equation with the correct answer. Eg please enter a number 28 please enter … |
| | i wish to print something like this ******** r ******* er ter uter puter mputer omputer computer where * is a blank space for each line i used array of strings String []s1=new String [20] for 5 blank spaces i used s1+" " + " "..+(5)"" then 4 blank spaces … |
| | Heya, I would like to know how to pass a packed record in delphi into a C# dll procedure. Any ideas? |
| | I am writing a program for a college assignment to compute grades of students. the code compiles ok, but i keep getting a runtime error 2. can anyone help? [code] {Author: George Brandon Miller} {Program: Grade Report - Compute the grade point average for students} Program Grades; var { misc. … |
| | Hello! How to draw rectangle in Delphi (using [U]timer [/U]component). Thanx! |
| | Hi all, I want to send automatic mail from my Delphi application with attachment without invocation of any client tool like outlook. Actually My application runs as a windows service and every 5 minute generate some response files. I want those files to be mailed automatically. But how do I … |
| | Hi. I am new to the site and not too clever at Pascal (beginner). I need to be able to get an IP address, then compare it with one I want to use then if the address is the same run a program if not quit. This is to get … |
| | Hi Everyone! I have a wired problem with print preview in Delphi. When I am invoking a PreviewModal procedure on QuickReport object Preview page appears. But sometimes [B]printer setup[/B] and [B]Print[/B] icons are inactive. Colud someone explain me this situation? Best regards |
 | Well I have been making bots for a few sites for a while. But for this new site it uses frames and when ever I try to get anything from the frame I a 'Access Denied' error. Even when I try to use the Frames to get info from the … |
| | Hi all, I am wondering if it's possible to change the order of elements? Added few check boxes and then GroupBox. However, groupbox is under checkboxes which makes them not visible. How do I change that? There must be a better way than just recreating groupbox first and then checkboxes. |
| | Hello, I want to ask you if there is some way how to print visual components like TButton with TPrinter? I've seen only examples how to print images etc. (which contain TGraphic). Thanks |
The End.