Delphi Pages Forums  

Go Back   Delphi Pages Forums > Search Forums

Lost Password?

Showing results 1 to 50 of 163
Search took 0.11 seconds.
Search: Posts Made By: VM_Hacker
Forum: General 05-05-2016, 12:18 PM
Replies: 12
Views: 3,009
Posted By VM_Hacker
Code is now working.

Code is now working.
Forum: General 05-04-2016, 11:06 AM
Replies: 12
Views: 3,009
Posted By VM_Hacker
Smile I will try it and I think this is what I actually...

I will try it and I think this is what I actually need. Thanks!
Forum: General 05-04-2016, 09:37 AM
Replies: 12
Views: 3,009
Posted By VM_Hacker
I created the DB file using phpLiteAdmin. but...

I created the DB file using phpLiteAdmin. but based on the example source the create script would look like this:

try
DB.Open('artists.db');

// Create table "artists"
...
Forum: General 05-04-2016, 08:53 AM
Replies: 12
Views: 3,009
Posted By VM_Hacker
Question Here is the code: DB :=...

Here is the code:


DB := TSQLite3Database.Create;
try
DB.Open('DB file location');
EventInfo := DB.Prepare('SELECT name FROM table_name');
try
// I don't...
Forum: General 05-03-2016, 03:01 PM
Replies: 12
Views: 3,009
Posted By VM_Hacker
Will post my code tomorrow. I think this library...

Will post my code tomorrow. I think this library can only create, insert etc. I want a function after I load a .db file then check if table is correct or not then if not will show some messages.
Forum: General 05-02-2016, 03:35 PM
Replies: 12
Views: 3,009
Posted By VM_Hacker
Thanks, but how to raise an exception if the...

Thanks, but how to raise an exception if the table is not exist? Is it possible with library I posted above?
Forum: General 05-02-2016, 09:56 AM
Replies: 12
Views: 3,009
Posted By VM_Hacker
Question Delphi 7 SQLLite3

Hi,

Anyone have tried this: https://github.com/indasoftware/SQLite3-Delphi-FPC

I'm trying to check if the opened db file has the correct table or not. Anyone have sample?

Thanks!
Forum: General 12-19-2015, 07:36 AM
Replies: 7
Views: 2,380
Posted By VM_Hacker
Thank you guys.

Thank you guys.
Forum: General 12-13-2015, 05:19 AM
Replies: 7
Views: 2,380
Posted By VM_Hacker
Question Subtraction

Hi,

How to Subtract with this number

Example:

0 - 1 Answer is -1 right?

I want do it this way 0 - 1 = should be 9
Forum: General 07-07-2015, 02:03 AM
Replies: 14
Views: 4,000
Posted By VM_Hacker
First, Sorry for my mistake at post #11 and for...

First, Sorry for my mistake at post #11 and for messing up with my post. Maybe my explanation or requirements is not that clear. forgive me about that.

Anyway back to my first post:

String =...
Forum: General 07-06-2015, 11:40 AM
Replies: 14
Views: 4,000
Posted By VM_Hacker
Bug found in both solution. :( If...

Bug found in both solution. :(

If InputString is something like: "111@2000&1222@2444&111"

In return string will display:

444&111
222@24
000&1
111@2
Forum: General 07-04-2015, 02:24 AM
Replies: 14
Views: 4,000
Posted By VM_Hacker
I test it and works like as expected. Is it...

I test it and works like as expected. Is it possible to put some error handler if the String is not in correct format?
Forum: General 07-04-2015, 02:00 AM
Replies: 14
Views: 4,000
Posted By VM_Hacker
I test it and works like as expected. Is it...

I test it and works like as expected. Is it possible to put some error handler if the String is not in correct format?
Forum: General 07-03-2015, 01:38 PM
Replies: 14
Views: 4,000
Posted By VM_Hacker
I'll test your code later and give feedback. ...

I'll test your code later and give feedback.

Thank you!
Forum: General 07-03-2015, 11:03 AM
Replies: 14
Views: 4,000
Posted By VM_Hacker
I test code like this, It works fine. problem...

I test code like this, It works fine. problem here if there's space like:


111@20 456@9&10987&100 654@1234@2000 614@12&28</pre>
var
i, dcounter: integer;
current_str: string;
...
Forum: General 07-03-2015, 06:08 AM
Replies: 14
Views: 4,000
Posted By VM_Hacker
Need to search first an @ if count the length...

Need to search first an @ if count the length before @? since the it's always 3 numbers before @ the only problem is after @ and & it could be @1000 or r2222 or @1000r2222
Forum: General 07-02-2015, 02:18 PM
Replies: 14
Views: 4,000
Posted By VM_Hacker
Question Split string with different lenght

Hi. How to split this type of strings?

Example:

String = "111@20456@9&10987&100654@1234@2000614@12&28"


Result should be:

111@20
Forum: General 05-18-2015, 02:17 PM
Replies: 5
Views: 2,173
Posted By VM_Hacker
Thanks. I added a seconds here's my modification ...

Thanks. I added a seconds here's my modification

var
FStartTime : TDateTime;
FEndTime : TDateTime;

iHours : Integer;
iMinutes : Integer;
...
Forum: General 05-17-2015, 03:12 PM
Replies: 5
Views: 2,173
Posted By VM_Hacker
procedure TForm1.FormCreate(Sender: TObject); ...

procedure TForm1.FormCreate(Sender: TObject);
var
FStartTime: TDateTime;
FEndTime: TDateTime;
Test: TDateTime;
begin
FStartTime := StrToDateTime('5/16/2015 06:00:00');
FEndTime :=...
Forum: General 05-17-2015, 01:45 PM
Replies: 5
Views: 2,173
Posted By VM_Hacker
Question Time Difference

How to calculate between two date/time to hours, minutes, seconds

Example:

FStartTime := StrToDateTime('5/16/2015 06:00:00 AM');
FEndTime := StrToDateTime('5/17/2015 07:00:00 AM');Expected...
Forum: General 05-12-2015, 03:49 AM
Replies: 2
Views: 1,719
Posted By VM_Hacker
Thanks. It works as expected. :)

Thanks. It works as expected. :)
Forum: General 05-07-2015, 05:38 AM
Replies: 2
Views: 1,719
Posted By VM_Hacker
Question Reading From a TextFile/CSV

How can I remove or delete the first line in a Text file?

procedure LoadResultFromCSV(StringGrid: TStringGrid; const filename: TFileName);
var
f: TextFile;
i, iTmp: integer;
strTemp:...
Forum: General 05-07-2015, 05:34 AM
Replies: 2
Views: 2,363
Posted By VM_Hacker
Thanks. I figured out by myself also. :)

Thanks. I figured out by myself also. :)
Forum: General 05-04-2015, 07:57 AM
Replies: 2
Views: 2,363
Posted By VM_Hacker
Question FireMonkey StringGrid Problem

I am trying to search a number in FireMonkey StringGrid Column 1 in any Row but with unknown problem.

// Search for sNumber
with StringGrid1 do
begin
for i := 0 to RowCount -...
Forum: General 03-07-2015, 10:39 AM
Replies: 1
Views: 1,261
Posted By VM_Hacker
Thumbs up Problem solved. Please close the thread.

Problem solved. Please close the thread.
Forum: General 03-07-2015, 09:02 AM
Replies: 1
Views: 1,261
Posted By VM_Hacker
Question ListView Update Row

Need help to update the affected row when item is found.

function FindListViewItem(lv: TListView; const S: string; column: integer): TListItem;
var
i: integer;
found: boolean;
begin
...
Forum: General 01-19-2015, 08:35 AM
Replies: 13
Views: 4,310
Posted By VM_Hacker
Unhappy Still stuck in "List index out of...

Still stuck in "List index out of bounds(1)"
Forum: General 01-16-2015, 10:43 AM
Replies: 13
Views: 4,310
Posted By VM_Hacker
Question Looks like I'm having problem in XE6 ...

Looks like I'm having problem in XE6

procedure TForm1.Button1Click(Sender: TObject);
var
aListItem: TListItem;
begin
aListItem := ListView1.Items.Add;
aListItem.Caption :=...
Forum: General 01-16-2015, 06:36 AM
Replies: 13
Views: 4,310
Posted By VM_Hacker
I'm using this code below to add an item to the...

I'm using this code below to add an item to the list

aListItem := ListView1.Items.Add;
aListItem.Caption := IntToStr(aListItem.Index + 1);
aListItem.SubItems.Add(Edit1.Text);
...
Forum: General 01-15-2015, 11:32 AM
Replies: 13
Views: 4,310
Posted By VM_Hacker
Question I noticed some error after I sort then add...

I noticed some error after I sort then add another item on ListView it says "List index out of bounds (7)"
Forum: General 01-15-2015, 09:31 AM
Replies: 13
Views: 4,310
Posted By VM_Hacker
Question Here is what I did var aListItem:...

Here is what I did


var
aListItem: TListItem;
i: Integer;
begin
for i := 0 to ListView1.Items.Count - 1 do
begin
aListItem := ListView1.Items.Item[i];
Forum: General 01-14-2015, 12:32 PM
Replies: 13
Views: 4,310
Posted By VM_Hacker
Question It must remain like this: A1 2 B1 A2...

It must remain like this:

A1 2 B1
A2 3 B2
A3 1 B3

A1 3 B3
A2 1 B1
A3 2 B2
Forum: General 01-14-2015, 12:04 PM
Replies: 13
Views: 4,310
Posted By VM_Hacker
Question ListView Sorting other columns

Hi,

I use this code below to sort the column, but I want to lock the first column and I don't want to be affected when sorting other second, third column. Is that possible?

procedure...
Forum: General 11-15-2014, 07:26 AM
Replies: 3
Views: 2,696
Posted By VM_Hacker
Question Great. Is there any software to find the Class...

Great. Is there any software to find the Class Name?
Forum: General 11-15-2014, 05:30 AM
Replies: 3
Views: 2,696
Posted By VM_Hacker
Question SendKey To Other Application

Is it possible to SendKeys or Control other application button? like example: hit the F4 button in other application 'VK_F4'
Forum: General 11-11-2014, 11:28 AM
Replies: 7
Views: 3,280
Posted By VM_Hacker
It didn't work for Firemonkey Android. I tried...

It didn't work for Firemonkey Android. I tried change to GetTickCount() and It does work. your code is working and I learn from it. Thank you! :)
Forum: General 11-11-2014, 09:39 AM
Replies: 7
Views: 3,280
Posted By VM_Hacker
Not compiling here. GetTickCount is the same with...

Not compiling here. GetTickCount is the same with TimeGetTime?
Forum: General 11-11-2014, 08:12 AM
Replies: 7
Views: 3,280
Posted By VM_Hacker
I've read some info just now about using Thread...

I've read some info just now about using Thread inside the timer seems not safe. What is the equivalent of TimeGetTime for Firemonkey?
Forum: General 11-11-2014, 07:15 AM
Replies: 7
Views: 3,280
Posted By VM_Hacker
Question Indy is Freezing

I created a thread with Indy but why still freeze?

procedure TSubmitCoordinatesThread.Execute;
var
lHTTP: TIdHTTP;
lParamList: TStringList;
Result: string;
begin
try
lHTTP :=...
Forum: General 11-10-2014, 11:20 AM
Replies: 11
Views: 3,890
Posted By VM_Hacker
Smile Great. It works now. Thanks! :)

Great. It works now. Thanks! :)
Forum: General 11-10-2014, 04:00 AM
Replies: 11
Views: 3,890
Posted By VM_Hacker
Question It keeps counting even if I'm not moving. ...

It keeps counting even if I'm not moving.

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Application.ProcessMessages;
ElapsedTime := Time - StartTime + TotalTime;
lblTIME.Text :=...
Forum: General 11-09-2014, 01:46 PM
Replies: 11
Views: 3,890
Posted By VM_Hacker
Question I use the TLocationSensor and I put that code in...

I use the TLocationSensor and I put that code in a Timer to auto-calculate the Distance.

For Example:

OldLatitude := 11;
OldLongitude := 124;
Going to

NewLatitude := 12;
NewLongitude :=...
Forum: General 11-09-2014, 12:10 PM
Replies: 11
Views: 3,890
Posted By VM_Hacker
Question The code below will compute the distance in...

The code below will compute the distance in kilometers from Old Location to New Location, the problem here is when your return to the same Old Location the result will go back to 0.00

How to solve...
Forum: General 11-08-2014, 10:33 AM
Replies: 11
Views: 3,890
Posted By VM_Hacker
I already got the correct result however I have...

I already got the correct result however I have another problem encountered.

I can calculate the old position -> new position -> result was okay but If I turn back to >>> new position -> old...
Forum: General 11-02-2014, 02:45 PM
Replies: 3
Views: 2,047
Posted By VM_Hacker
I tried that already but can't control the main...

I tried that already but can't control the main speaker volume.
Forum: General 11-02-2014, 11:28 AM
Replies: 3
Views: 2,047
Posted By VM_Hacker
Question Volume

Is it possible in delphi to auto-set the volume control to max and if mute, set to unmute?
Forum: General 10-30-2014, 09:46 AM
Replies: 1
Views: 1,143
Posted By VM_Hacker
Question System Tray Icon

I'm trying to modify the system tray icon of my app and the icon is loaded in Resource

hIcon := LoadIcon(HInstance, 'Icon1');

The problem here is the app main icon is changed to this "Icon1"...
Forum: General 10-28-2014, 11:02 AM
Replies: 11
Views: 3,890
Posted By VM_Hacker
Aha so must use the google api...

Aha so must use the google api "google.maps.DirectionsTravelMode.DRIVING" for the road to check the actual kilometers, unlike in air can be straight to the destination.
Forum: General 10-28-2014, 10:32 AM
Replies: 11
Views: 3,890
Posted By VM_Hacker
Question Distance Calculator

Hi,

I need to calculate from location to another location to check the distance in kilometers.

function DistanceBetweenLonLat(const Lat1, Lon1, Lat2, Lon2: Extended)
: Extended;
begin
...
Forum: General 10-28-2014, 04:06 AM
Replies: 5
Views: 2,450
Posted By VM_Hacker
Like this? but need to hover the mouse inside the...

Like this? but need to hover the mouse inside the form to update the activity.

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMessage := AppMessage;
end;

procedure...
Showing results 1 to 50 of 163

 
Forum Jump

All times are GMT. The time now is 12:53 PM.


Powered by vBulletin® Version 3.8.8
Copyright ©2000 - 2019, vBulletin Solutions, Inc.