Morten Brendefu

I am a mainly Java and VB programmer. However, I am writing a program that generates computer code in various languages. One of these is Pascal. What I am asking is simple. To detemine the size of an array in Java and VB I would enter: [code] anArray.length[/code] What is …

Heya guys, basically here is some code for a simple example program: [CODE] unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls; type TForm1 = class(TForm) img1: TImage; procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; …

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 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 …

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 …

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 …

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 …

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 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 …

Dear knowledgeable ones A new problem have arisen. I have now an SQL database file with about 100 tables in it. I would like to automatically go through all of these tables and check if the column "Owner" exist. If this field does not exist, then it should be created …

Dear knowledgeable ones. I started on a project to be able to use a smart card and a smart card reader in order to limit access to a program. I had some sample code written in Visual Basic, and wanted to translate this to Delphi instead, something I think I …

I did an experiment regarding sorting of 256.000 random "names" using TListBox component. A friend of mine say that TListBox is faster than my code at sorting, so I wanted to test this out of curiosity. Method of testing. When I have created 256 thousand random textstrings, each 6 characters, …

I am trying to draw a few items on a canvas using Canvas.TextOut mainly. My problem is that when I grab the form holding the canvas and then move the form outside of the screen and back again, all text and drawings have vanished, as if they have been erased. …

I am designing a lot of TCheckBox at runtime, and uses mathematical formulas for placing these in columns and rows afterwards on a form. I assign an on click event that is exactly the same on all of them, and everything work, except... Color. My OnClick event is made like …

A "normal" Delphi snippet: [CODE]Procedure help_me1(Sender: TObject); BEGIN {100 lines of code} END; Procedure help_me2(Sender: TObject); BEGIN {100 lines of copy and paste code} END;[/CODE] [COLOR="Green"]How can I make this so that I end up with ONE procedure with 100 lines of code?[/COLOR] [CODE]Procedure much_reuseable_code(choice:BYTE); BEGIN {100 lines of code} …