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