2,103 Topics
![]() | |
Hi all, I don't use Delphi often so this is probably a stupid question again, but why does Delphi (7) re-index arrays when they're passed to a function, as a simplified example... [CODE]program example; {$APPTYPE CONSOLE} uses SysUtils; var numbers: array[1..5] of Integer = (10, 20, 30, 40, 50); procedure … | |
hi i use OverbyteIcsWSocket + DCPcrypt2 i have try to make TCP server with md5 Authentication + 3des crypt example: user name = somtimg pasword = pass and des key = 1020304050607080901011121314 i have got this mesage from client ( Server random key length is 19 and must be 14) … | |
I have an old game written in delphi and the game keeps crashing, the game is an mmorpg so there are constantly people online. To the problem, when we first start the game up, everyone can get on fine and play. The game stores variables into text files for each … | |
I thought i had complex declarations nailed, as in i could tell you what a pointer to an array of functions that returned int and took doubles as arguments looked like i find this little horror: [CODE] /Return the IP address of a domain name DECLARE_STDCALL_P(struct hostent *) gethostbyname(const char*); … | |
I have installed Urdu (An Asian right-to-left language) on my computer (OS Windows XP) by >Control Panel>Regional and Language Options>Languages>Details>Add. I can change language from language bar on my task bar. In RichEdit I just want to change the reading order to right-to-left and alignment to right. But the language … | |
Hey all. Ill put this simply. {assigning 52 jpeg's to 52 different TImages} [U]What i have:[/U] for x:= 1 to 52 do case x of 1: img1.picture.loadfromfile(1.jpg); 2: img2.picture.loadfromfile(2.jpg); 3: img3.picture.loadfromfile(3.jpg); 4: img4.picture.loadfromfile(4.jpg); i think you get the picture. [U]What i want:[/U] some way of programmatically selecting a certain image … | |
Hello to guys/girls on the forum. Question I have is following. How to speed this loop? [code] begin var i:integer; begin for i:=1 to 9999999 do begin //do something Memo1.Lines.Add ((floattostr(a1.value))+' + '+(floattostr(a2.value))+' + '+(floattostr(a3.value)); //do something Memo1.Lines.Add ((floattostr(a1.value))+' + '+(floattostr(a2.value))+' + '+(floattostr(a3.value)); //do something Memo1.Lines.Add ((floattostr(a1.value))+' + '+(floattostr(a2.value))+' + … | |
Dear ALL, Could you tell me how can I write a program that writes to a text file, the 32 people that are in our hotSeat.txt file. Cheers, turbomen (p.s.: 'the question orginally ask me to write a program that writes to a text file, the 32 people that are … | |
Hi, A have a DLL with a header written C: [code] __declspec(dllimport) int ReadData(char* port, int baudrate, unsigned char block, unsigned char nrblock, unsigned char buffer[64], unsigned char* message, BYTE password[6] ); [/code] I want to use the DLL in my Delphi project, but I can't figure it out how … | |
HI to ALL Bro , Urgently need some advice from bro and sis here. I am totally fresh in delphi. I have an existing dll which wrote and done by ex-coll . All the function is working well with my vb6 or .net program since last few year. Recenlt i … | |
Hi, I'm encountering a frustrating problem in Delphi. I've written several very long programs to demonstrate certain things related to neural networks. As such, the program GUI has many things on it that are updated per iteration of the solver: from labels, to memos, to editstrings, etc. The two main … | |
This is my programm which is to search in the data file. I cannot search the data with key words/character but only the full words. How can I correct my programm to become searching in key words/character? The DATA: 20081231 Betty 03/09/1978 The programm begin write('Member ID > '); readln(tid); … | |
Hello, I'm using Inno Setup for the first time and just a beginner in Pascal. My code: [CODE] XMLHTTP := CreateOleObject('MSXML2.ServerXMLHTTP'); XMLHTTP.Open('GET', myUrl, False); XMLHTTP.Send(); ... MyFileStream := TFileStream.Create(Path + MyFilename, fmCreate or fmOpenWrite); [/CODE] But,I don't know how to use MyFileStream to write XMLHTTP.ResponseBody or XMLHTTP.ResponseStream. Could you please … | |
Windows 7's new Aero Shake feature isn't working on my Delphi SDI application. Does anyone have any idea why? And what needs to be changed to make it work? Thankyou... | |
Dear Sir, Could you please give me some of the ideas of making the hotSeat game in pascal? The following is the simple mode of my coding:- [code] Program yeungkt1; {$APPTYPE CONSOLE} { Who wants to be a millionaire. Author: Chris Yeung Version 1 } uses SysUtils, OurCrt; Type hotSeat_record=record … | |
- I've used DevExpress Components to develop my App. There's problem when user attach their image to database: it's so big. Of course, it influences my database speed. - Please instruct me some solution to solve them? | |
Dear Sir, Please help me on Delphi. Could you tell me how can I do the following question? Calculate and display the sum of the even numbers from 2 to 20 inclusive. Cheers, | |
find replace hi i have 2 txt files in 1 i have stored numbers numbers.txt ex. 10 20 30 others i have stored word.txt 10,hello 20,welcme 30,text ...... i need to auto replace numbers with words .. plise help. | |
Hello, I'm trying to download the binarys of the [b]FPC ver. 2.1.2 Win32[/b], because i need to develop a program that i only can compile it in this version of FPC, then if you have the binary of this version of a link to it i will be very happy. … | |
I want to show a simple example about writing record to a file,and for checking,read back from that file. Created By FlamingClaw | |
This algorithm will add the searched element's place in an array This works only when there is so element what we're searching for. By FlamingClaw | |
This algorithm will decide that is there a serched element in the array.If it finds one then the loop halts.If the loop halts cause we're stepping over the last element of the array then there is not searched element. By FlamingClaw | |
Counts that how many propertied elements are in the array example:negative numbers By FlamingClaw | |
The Rule: s:=0; Loop i:=1 To N s:=s+T[i]; End of Loop; Out:s; By FlamingClaw | |
Prime or not?This little program will show prime numbers with green color from 0 to 100.By FlamingClaw; | |
I want to show you some rules about bit operating like Not,And,Or,Xor,Shl,Shr... By FlamingClaw | |
I've seen,there are guys that did not know,where to use a unit... See it just reference By FlamingClaw | |
This little program a solution for putting a string into an array. The method is that the string is divided for chars.... By FlamingClaw | |
This little calculator can +,-,/,*.Very simple,by FlamingClaw | |
We change the order of elements of a vektor Created by FlamingClaw | |
Often there is a case when we want to fill an array with record,and this program will demonstrate it... | |
| |
Many people says 'Don't use the GoTo statement,because your code will be unreadable....'.I say,can be use | |
Pascal's triangle is a geometric arrangement of the binomial coefficients in a triangle. The rows of Pascal's triangle are conventionally enumerated starting with row zero, and the numbers in odd rows are usually staggered relative to the numbers in even rows. A simple construction of the triangle proceeds in the … | |
Blink and you will see them appear in a Console window. This is a translation to C# of a Modula-2 implementation by N.Wirth, the inventor of Pascal. The tested integers are obtained by incrementing alternatively by 2 and 4, thereby avoiding multiples of 2 and 3 in the first place. … | |
| |
This program generates lines of pascal's triangle, numbers after 23 generate weird output. | |
A simple guessing game for amatuer programmers like myself. | |
Based on [url]http://astronomy.swin.edu.au/~pbourke/geometry/insidepoly/[/url] Converted to Delphi by Lord Soth | |
--- Basic Datatypes --- --- Form Management --- --- Data Access --- --- Component model --- | |
You can use any of the commented constants to perform the explained function. You might need to adjust the process privilege on NT based OSes. | |
Assumes the presence of Memo1 on Form1. | |
| |
In case there are mote than one NIC (Network Interface Card) the coe gives the MAC of the first adapter. You can change the 0 on the line qoted below to take the MAC of other NICs if present. "Result := GetAdapterInfo(AdapterList.lana[0]) " | |
This code disables font smoothing for a TLabel component. Can easily be converted for other VCL controls. Loren Soth | |
This program searches the given txt file.And tells you how many there are. Just a reminder don't forget to put the searced txt file in C: or change it accordingly for more info or questions [email]Silver.Lost.Raven@gmail.com[/email] have fun!! |
The End.