Changeset 2


Ignore:
Timestamp:
Sep 20, 2008, 2:46:53 PM (16 years ago)
Author:
maron
Message:

Verze 3.2 oprava chyb vyhledávání, importování serverů

Files:
1 added
2 deleted
13 edited

Legend:

Unmodified
Added
Removed
  • About.dfm

    r1 r2  
    231231    Anchors = [akLeft, akTop, akRight, akBottom]
    232232    Lines.Strings = (
     233      ' verze 3.2'
     234      ' ---------------'
     235      '  + Oprava vyhled'#225'v'#225'n'#237' na HoF datab'#225'zi'
     236      '  + Oprava na'#269#237't'#225'n'#237' realm'#367' z servery.wowresource.eu'
     237      ''
    233238      ' verze 3.1'
    234239      ' ---------------'
  • About.~dfm

    r1 r2  
    44  BorderStyle = bsDialog
    55  Caption = 'O programu'
    6   ClientHeight = 330
     6  ClientHeight = 354
    77  ClientWidth = 405
    88  Color = clBtnFace
     
    227227    Top = 88
    228228    Width = 389
    229     Height = 237
     229    Height = 261
    230230    Align = alCustom
    231231    Anchors = [akLeft, akTop, akRight, akBottom]
    232232    Lines.Strings = (
     233      ' verze 3.2'
     234      ' ---------------'
     235      '  + Oprava vyhled'#225'v'#225'n'#237' na HoF datab'#225'zi'
     236      ''
    233237      ' verze 3.1'
    234238      ' ---------------'
     
    248252      '  + Mo'#382'nost obnoven'#237' defaultn'#237'ho nastaven'#237
    249253      '  + V detajlech o serveru interaktivn'#237' odkazy'
     254      '  + Zobrazov'#225'n'#237' odezvy serveru'
    250255     
    251256        '  + Mo'#382'nost zobrazov'#225'n'#237' detajl'#367' v hlavn'#237'm formul'#225#345'i p'#345'i ozna'#269'en'#237 +
    252257        ' serveru'
    253258      '  + Import server'#367' z WoWResource.eu, WoWStatus.net'
     259      '  + P'#345'id'#225'n'#237' n'#225'pov'#283'dy'
    254260      ''
    255261      ' verze 3.0'
  • HoFclient.cfg

    r1 r2  
    3434-LE"c:\program files\borland\delphi7\Projects\Bpl"
    3535-LN"c:\program files\borland\delphi7\Projects\Bpl"
     36-U"C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\CoolTrayIcon;C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\VCLSkin.v4.04.For.D7"
     37-O"C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\CoolTrayIcon;C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\VCLSkin.v4.04.For.D7"
     38-I"C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\CoolTrayIcon;C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\VCLSkin.v4.04.For.D7"
     39-R"C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\CoolTrayIcon;C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\VCLSkin.v4.04.For.D7"
    3640-w-UNSAFE_TYPE
    3741-w-UNSAFE_CODE
  • HoFclient.dof

    r1 r2  
    9595PackageDLLOutputDir=
    9696PackageDCPOutputDir=
    97 SearchPath=
     97SearchPath=C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\CoolTrayIcon;C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\VCLSkin.v4.04.For.D7
    9898Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;IntrawebDB_50_70;Intraweb_50_70;Rave50CLX;Rave50VCL;dclOfficeXP;CoolTrayIcon_D6plus;InfoPanel;WallpaperChangerPackage;WinSkinD7R;magras70
    9999Conditionals=
     
    138138Count=1
    139139Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
     140[HistoryLists\hlSearchPath]
     141Count=2
     142Item0=C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\CoolTrayIcon;C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\VCLSkin.v4.04.For.D7
     143Item1=C:\Documents and Settings\Roman\Dokumenty\Delphi7-Projecty\client_SVN\_Components\CoolTrayIcon
  • HoFclient.dpr

    r1 r2  
     1
    12program HoFclient;
    23
  • HoFclient.~dpr

    r1 r2  
    1010  News in 'News.pas' {Form6},
    1111  Details in 'Details.pas' {Form7},
    12   ImportZWebu in 'ImportZWebu.pas' {Form8};
     12  ImportZWebu in 'ImportZWebu.pas' {Form8},
     13  Loading in 'Loading.pas' {Form9};
    1314
    1415{$R *.res}
     
    2425  Application.CreateForm(TForm7, Form7);
    2526  Application.CreateForm(TForm8, Form8);
     27  Application.CreateForm(TForm9, Form9);
    2628  Application.Run;
    2729end.
  • Main.pas

    r1 r2  
    218218
    219219const
    220   ApplicationVersion = '3.1';
    221   ApplicationRevision = 4;
     220  ApplicationVersion = '3.2';
     221  ApplicationRevision = 5;
    222222  R = '\Software\maronsoft\Heroes of Fantasy client pack\';
    223223  UpdateInfoFile = 'http://wow.zdechov.net/client/aktualizace.txt';
     
    13491349  Form8.ListView1.Clear;
    13501350  Form8.WriteServers('http://servery.wowresource.eu/index.php');
    1351   if EndLoadingBool = False then
    1352     Form8.WriteServers('http://servery.wowresource.eu/index.php?p=2');
     1351 // if EndLoadingBool = False then Form8.WriteServers('http://servery.wowresource.eu/index.php?p=2');
    13531352  Form9.Close;
    13541353
     
    13751374begin
    13761375  //http://wow.zdechov.net/db/index.php?id=questy&find=Hledat&q=test
    1377   OpenSearchURL('http://wow.zdechov.net/db/index.php?id=questy&find=Hledat&q=');
     1376  OpenSearchURL('http://wow.zdechov.net/databaze/?search=');
    13781377end;
    13791378
  • Main.~pas

    r1 r2  
    218218
    219219const
    220   ApplicationVersion = '3.1';
    221   ApplicationRevision = 4;
     220  ApplicationVersion = '3.2';
     221  ApplicationRevision = 5;
    222222  R = '\Software\maronsoft\Heroes of Fantasy client pack\';
    223223  UpdateInfoFile = 'http://wow.zdechov.net/client/aktualizace.txt';
     
    11111111begin
    11121112//  ShowWeb;
    1113   ShellExecute(Handle, 'open', PChar(ExtractFileDir(Application.ExeName)+'\NÁPOVĚDA.HLP'), nil, nil, SW_SHOWNORMAL);
     1113  if FileExists(ExtractFileDir(Application.ExeName)+'\NÁPOVĚDA.HLP') then begin
     1114    ShellExecute(Handle, 'open', PChar(ExtractFileDir(Application.ExeName)+'\NÁPOVĚDA.HLP'), nil, nil, SW_SHOWNORMAL);
     1115  end else begin
     1116    ShowMessage('Nápověda nalezena!');
     1117    StatusBar1.SimpleText := 'Nápověda nalezena!';
     1118  end;
    11141119end;
    11151120
     
    13701375begin
    13711376  //http://wow.zdechov.net/db/index.php?id=questy&find=Hledat&q=test
    1372   OpenSearchURL('http://wow.zdechov.net/db/index.php?id=questy&find=Hledat&q=');
     1377  OpenSearchURL('http://wow.zdechov.net/databaze/?search=');
    13731378end;
    13741379
  • _instalace/HeroesOfFantasyClientPack.nsi

    r1 r2  
    99;General
    1010
    11   !define VERSION "3.1"
     11  !define VERSION "3.2"
    1212  !define TITLE "HeroesOfFantasyClient"
    1313  !define FULL_TITLE "Heroes of Fantasy client"
Note: See TracChangeset for help on using the changeset viewer.