786 snippets from 1631 members, and growing!
|
login
|
join
about
bytebin
members
tags
snippets
join
Snippets
Submit a Snippet
Search Snippets
New Snippets
Top Snippets
Top Tags
PHP
(142)
JavaScript
(125)
Java
(66)
VBSCRIPT
(58)
String
(44)
CSS
(31)
File
(29)
CSharp
(28)
HTML
(27)
mysql
(27)
C
(24)
VB.NET
(24)
python
(24)
CPlusPlus
(23)
groovy
(23)
New Snippets
Detect Adblock
Concatenar campos...
fopen
Unique random key
get number of cha...
Find a File
Find a Directory
List Directory
File uploading in...
Get Values from C...
Venture Capital Jobs
New Members
mcheung63
cicero
mycodeofshailendra
nostromo
KennethCC
me
jamesmcm
Can
Kelmi
ysg
Top Members
dannyboy
sundaramkumar
mattrmiller
Pio
i_kenneth
ASmith
ctiggerf
sehrgut
bertheymans
SCoon
Home
/
Snippets
/
Delphi - Displaying App. Name/Version in Titlebar
/
Comments
Delphi - Displaying App. Name/Version in Titlebar
Snippet Menu
Revisions
Comments
Related Snippets
Add to Favorites
Email Snippet
Download Snippet
Print Snippet
Blog Snippet
snippet
|
revisions
|
comments
|
related
|
Add to Favorites
|
email
download
|
print
|
blog it
New Comment
More than one '.'
Sat. Oct. 28th, 2006 3:48 PM
SCoon
Following code fragment will produce unexpected application names if file name contains more than one '.':
AppName := Copy(ExtractFileName(Application.ExeName),
1, Pos('.',ExtractFileName(Application.ExeName))-1)
Exename example: Chat.Client.exe
Reply
New Comment
AppName := Copy(ExtractFileName(Application.ExeName),
1, Pos('.',ExtractFileName(Application.ExeName))-1)
Exename example: Chat.Client.exe