Użytkownik:Sebasoul: Różnice pomiędzy wersjami
Z Motława
Linia 5: | Linia 5: | ||
== costam == | == costam == | ||
− | <source lang= | + | <source lang=pascal> |
+ | function GetDllVersion(aFN:String;aTyp: Integer=0): String; | ||
+ | var | ||
+ | aVerInfo: TJclFileVersionInfo; | ||
+ | begin | ||
+ | aVerInfo := TJclFileVersionInfo.Create(aFN); | ||
+ | try | ||
+ | if (aTyp = -1) then | ||
+ | begin | ||
+ | Result := aVerInfo.BinFileVersion; | ||
+ | end | ||
+ | else | ||
+ | begin | ||
+ | Result := ConcatStr(Result, 'FileVersion: '+aVerInfo.BinFileVersion, sLineBreak); | ||
+ | Result := ConcatStr(Result, 'ProductVersion: '+aVerInfo.BinProductVersion, sLineBreak); | ||
+ | end; | ||
+ | finally | ||
+ | aVerInfo.Free; | ||
+ | end; | ||
+ | end; | ||
+ | </source> | ||
+ | |||
+ | <source lang=php> | ||
<?php | <?php | ||
$v = "string"; // sample initialization | $v = "string"; // sample initialization |
Wersja z 14:40, 20 mar 2009
Plik:Moderator.gif SebASoul - Sebastian Arkadiusz Dusza
Więcej się dowiesz tu... Moja strona domowa
costam
function GetDllVersion(aFN:String;aTyp: Integer=0): String; var aVerInfo: TJclFileVersionInfo; begin aVerInfo := TJclFileVersionInfo.Create(aFN); try if (aTyp = -1) then begin Result := aVerInfo.BinFileVersion; end else begin Result := ConcatStr(Result, 'FileVersion: '+aVerInfo.BinFileVersion, sLineBreak); Result := ConcatStr(Result, 'ProductVersion: '+aVerInfo.BinProductVersion, sLineBreak); end; finally aVerInfo.Free; end; end;
<?php $v = "string"; // sample initialization ?> html text <? echo $v; // end of php code ?>
A co chcesz tu mieć ? |
test
Field | Type | Null | Key | Default | Extra |
---|---|---|---|---|---|
idn | int(11) | NO | PRI | NULL | auto_increment |
GUID | varchar(38) | NO | UNI | ||
GUID_NG | varchar(38) | NO | MUL | ||
fieldname | varchar(38) | NO | |||
rule_order | int(11) | NO | 0 | ||
admin | int(11) | NO | 0 | ||
validation_rule_type | varchar(20) | YES | NULL | ||
validation_rule | varchar(200) | YES | NULL | ||
condition_ruleset_guid | varchar(38) | NO | MUL | ||
message_if_not_valid | text | YES | NULL |
zarzad
|
| ||
---|---|---|---|
|
| ||
|
|
|
|
|
|
|