1,899 Topics
 | |
 | Hello all, i just started making a simple text-based console game for a computing class project. I have all my code working, but cannot find any code to- 1. Enable/Disable the console updating: When drawing the character, as well as multiple other objects on the console, sometimes you are able … |
| | Hi everybody, Is pascal still used in big apps ? Is it true that skype is written in pascal ? What is it most used for ? Thanks. |
| | [CODE]Program arrprog; Uses crt; const max=20; add='Add Student File'; edit='Edit Student File'; del='Delete Student File'; vi='View All Student File'; Type Tdata = record id:string; nm:string; jr:string; sm:string; End; Var data:array [1..max] of Tdata; i,ls:integer; Pil:char; Procedure menu; Begin Writeln('Student Data'); Writeln('----------------'); Writeln; Writeln('1. ',add); Writeln('2. ',edit); Writeln('3. ',del); Writeln('4. ',vi); … |
| | I'm programming a Yahtzee type game, but I have a problem checking for the different scoring types. So far I have everything but Full House, Small Straight and Large straight. It works like this: There are 5 variables (the dice) that are randomized to something between 1 and 6 every … |
| | I am making a small game, just to sharpen up my Delphi knowledge before school starts again, and also to show of to my friends. So in this game I have five integers and I need to check if at least three of them equal each other. How would I …  |
| | Dear enlightened ones. First of all. I am using Delphi 9. My code compiles and run with no error at all, still I am confused about the structure window in the Delphi window. It tells me that I have redeclared some identifiers. The thing is that I have a few … |
 | Hi, For a homework assignement, I'v been asked to write a small school administration system. Currently, the user is able to enter a new student and their age which is then stored in a text file. This all works fine but now I need to load the contents of the … |
| | Hi guys, new to this region of the forums. I recently converted from Windows 7 to Ubuntu 11.04 - and an having a nightmare of a time getting free pascal to work. Lazarus is really not looking like a good option at the moment - I would be much happier …  |
| | Hi, I'm looking to write a program that sets and gets responses using SNMPv1. I will be using Borland Delphi v7 or 8. I have been using PERL prior to looking at Delphi but I have had problems setting two OID's and sending them in the same packet rather then … |
| | |
| | Hey all, I'm a c++ programmer and I'm REALLY new to pascal. I want to translate some of my programs into pascal just for the experience. The thing is, this Lazarus compiler is soooo confusing! All the windows are split apart.. How can I join them? Next is how can … |
 | Am looking for a way to search a listview for selected captain items and then for it to remove all the items that were found. demo idea to loop full list to find search string that can be changed via edit and then to delete all items that are the … |
| | Hi i need to read the last 14 Entries made into a typed file and then list the entries in a StringGrid so i can copy them to label captions later. I am a little unsure how to write the Code to loop for the last 14 Entries. the current … |
| | Well is there any built-in function to do this ?, or 3rd party library EXAMPLE code [CODE]source := Sock.Get('http://www.google.com/'); if source('Google Search Engine', a) > 0 then begin NeededPattern := GetPattern(source, '<font>','</font>'); result := neededPattern; // will display ABC of the <font>ABC</font> end;[/CODE] Then it will get the middle of … |
| | I need to create a KeyStroke encryption, i studied about it and the theory is this: [LIST] [*]Check the keystate before keyloggers do it [*]Cancel the action of the key [*]get the active window [*]Simulate a virtual key in this window [/LIST] I can make the last three items, but … |
| | Dear knowledgeable ones. Some time ago I made a few of my routines kind of universal, and I wonder if there is any way in Delphi (My version is Delphi9) that can be used to reuse this code in example below. As you see, the two procedures are almost identical, … |
| | There are many places on internet for great help regarding many things. Proper implementation of really fast routines for sorting data however is not common. I am not claiming these routines to be the fastest around, but their ease of implementation and use may make them welcome. As a thank … |
| | Hi I need help on converting the sample c++ code. Can someone please help. Any help would be greatly appreciated. :D struct sample { int type; long arg1, arg2; }; struct sample sampletable[2][3] = {{{ 1, 0, 0 }, { 2, 0, 0 }, { 1, 0, 0 }}, {{ … |
| | In my Delphi9, I have the ability to "Shrink" complete procedures and functions so that only the first line is visible. There is a small + or - at the beginning of first line of a routine, and when pressed, the code is 'minimized' or 'maximized'. I find this to … |
 | Greetings, I need to have a way to veiw/print reports designed in MS Access in my Delphi application. I have a MS Access 2007 db for the backend of my Delphi2010 application. I have reports I had defined and saved in my Access db. I would like to place a … |
| | Does anyone know of a good site or doc that describes the ways to use a TStringGrid? I'm trying to figure out how to right-justify some of the items that are going to be placed into a TStringGrid, and none of the docs I've found so far seem to have … |
| | Hey guys, im trying to use an IF statement in the SETUP portion of the script for my inno setup installer, i want it to test for the boolean condition of a radio button defined in a 'procedure' in the CODE section, is this possible, how would i do it? … |
| | I am trying to write a few very dynamic procedures and functions and wonder about transferring parameters to a procedure as an Array. This is actually easy enough done.... just that I would like to pass something like [CODE] VAR a,b,c : INTEGER; Name, Text1,Text2 : STRING; todaysDate : TDate; … |
| | Hi i am very new to delphi and have only been working with it for a few months, i need to calculate the difference between 2 TDateTime Variables regardless of the number of days passed. Currently im using this: [CODE] var StartTime, EndTime, TimeDiff: TDateTime; begin StartTime := (Now); EndTime … |
| | Dear enlighted ones. I happen to try to finsh a kind of a function library that my Main program can utilize. As of now, Everything work great... but. I would like to implement some kind of error handling. The way I do this also work, but the error is generated … |
| | Hi Guys and girls, I'm using a TMonthCalander to display Dates, I'm using the BoldDays method to bold the important days. I have everything working fine when the user changes the month via the TMonthCalander controls. But I can not bold the days when they click a button. I've tried … |
 | This example is demonstrates a solution for direct arranging By FlamingClaw |
| | hi I want my delphi DB that I made to export to excel file how it is possible?and the most important thing is delphi reports that I made I want them to export as excel files ,plz help me !!:( |
| | given a sequence of n elements.increase it by putting after every element the same.for example when you have 1,2,3 the you must increase it by getting 1,1,2,2,3,3.how are i do that using a single array? |
| | [I] [/I]Hello. I am trying to write a very simple Delphi4 32-bit console app which toggles the RTS pin of the COM1 RS232 serial port. What is the simplest way to do this? I tried writing asm code (see below) but not surprisingly I got a run-time exception: [QUOTE]Exception EPrivilege … |
| | Hi everybody, I have a project to do for the college, which has to insert, read, delete and modify records in a binary file (a address book or something else). I don't know yet how I'll do to alter the records. Let's suppose the I have the program below: program …  |
| | I have tried searching internet a little bit and found some useful information about the command [CODE]SetLength[/CODE] I just wonder about a few things as I would like an array to "constantly" be redefined in size. When using it in one part of my program, it will be defined in … |
| | Hi, i'm python beginner. how to make that only use def, for, list, while .. [CODE] def comb(n,r): if r == 0: return 1 elif r == n: return 1 else: return comb(n-1,r-1) + comb(n-1,r) [/CODE] this code is very slow.... ah , I have to use recursion .! please …  |
| | Hi everyone! I'm trying to make a DDE Server app with Delphi. I put the components DDEServerConv and DDEServerItem, I made the connection between both and setted into "Text" property of DDEServerItem the line "Its Work!". Opened my excel and put =AppEx|DdeServerConv1!DdeServerItem1, and works fine, the excel shows "Its Work!" … |
| | Hey guys im new to this programming thing and im starting of with pascal.I have a small problem here is the program i want to input a number and that number will determine how man times the for loop runs the problem is the program is compliling but is stoping … |
| | How can I print the contents of one cell so that it extends into the next cell to the right. The cell on the right is blank. In an HTML table, what I'm trying to do would be equivalent to spanning two cells. How can this be done in a … |
| | Im a beginner.. What i want to do is converting user textbox input into Float value. Okay to the point ----- [QUOTE]I have textbox with 3 inputlimit I want if user input '200' itll give result to 2.00 (floatvalue), and if user input '12.3' the result will be 0.123 (floatvalue) … |
| | hi i seem to have run into a problem when adding records to a Typed file that already exists. I have used ReWrite method to create the file in the first place. [CODE] // Open the file for writing To AssignFile(F, ExtractFilePath(Application.ExeName) + 'bin\drivers' + (frm_vars.Driver1.Caption) + '\card.digi'); Rewrite(F); // … |
| | hello how i can use setbkcolor in pascal ?(with sample please.... |
| | I have to make a Yahtzee game (in Delphi) for a project. I now have to write the pseudocode for the 'sixes' algorithm. I am using image lists and images for the dice faces, and am totally stuck on how to start the code. I am writing the proper code … |
| | Hello everyone, I have to create a Palindrome Programme in Pascal using Pointers and Queues. A Palindrome is a word which when spelt backwards or forward if the same ex RACECAR or RADAR. I am having a problem actually creating the Palindrome Part of the Code. Thus Far, this is … |
| | The question is as follows: How long – number of steps -- does it take a drunken ant to fall off the edge of a square table if it starts in the middle? Perform a simulation to find out. Imagine an ant in the middle of a table with, say, … |
| | i need to write program that calculates when airplane is going to lend. i started to write this but i have got some problems pls help but when i tested minutes and seconds are not true program airplane; var a,s,d,f,g,h,j,k,l,z,x,c:Real; writeln('When will airplane airborn:'); readln(a,s,d); writeln('How much time is airplane … |
| | Hello there! I'm working at a new game and i have a little problem.. [ICODE]program MousTestProgram; uses Crt, Dos, Graph; var graphicsdriver,graphicsmode,errcode:integer; procedure ResetMouse; var regs : registers; begin FillChar (regs, SizeOf(regs), 0); regs.ax := $0000; Intr ($33, regs); if regs.ax <> $FFFF then begin writeln ('hardware/driver not installed'); halt; … |
| | Hello, I am using Delphi2010 and TOracleDataSet to access tables in Oracle. My question is how do I insert rows to multiple tables? I was told to use the AppendRecord method. Here is an example: [B]Example of value statements (this has been shortened obviously):[/B] Suffix := trim(edSuffx.text); Salutn := trim(edDear.text); … |
| | hello.. How do I'm get the status printer from the EPSON STATUS MONITOR 3 ?, I've tried to detect the status direct from the driver, not from windows, but I just get the status from the windows, not from DRIVER, the difference : if from the windows after the printing … |
| | Hay everyone. Im busy creating a program, but first you have to log in with a little form I made. I thought about using a registry entry, but I dont know how to use Tregistry. It should also be possible to use on a network pc with only client level … |
| | am trying to rebuild my chat content by storing it into a stringlist first and then re-pushing it out but problem am having is with my font settings i can not work out how to add my font styles to the string has anyone got any code to show how … |
| | Is it possible to write an operating system with Pascal Language (Free Pascal)? If yes, how to get started? Kindly somebody help me! |
| | Can sumone please give me a helping hand here am trying to do a simple sql search were it will look all items in SQL database and pull up the names that match but am having a abit of trouble with it it brings all my accounts up regardless of … |
The End.