From a0099c31b4477be34363d2d115fa3e676d4de140 Mon Sep 17 00:00:00 2001 From: mattias Date: Mon, 28 Jun 2004 17:03:37 +0000 Subject: [PATCH] clean up git-svn-id: trunk@5606 - --- components/codetools/definetemplates.pas | 6 +- components/synedit/languages/synedit.fi.po | 2 +- components/synedit/synedit.pp | 2 + languages/lazaruside.ca.po | 4 + languages/lazaruside.de.po | 4 + languages/lazaruside.es.po | 4 + languages/lazaruside.esutf.po | 4 + languages/lazaruside.fi.po | 124 +++++++++++---------- languages/lazaruside.fr.po | 4 + languages/lazaruside.he.po | 4 + languages/lazaruside.it.po | 4 + languages/lazaruside.itiso.po | 4 + languages/lazaruside.pl.po | 4 + languages/lazaruside.pliso.po | 4 + languages/lazaruside.plwin.po | 4 + languages/lazaruside.po | 4 + languages/lazaruside.ru.po | 4 + languages/lazaruside.ruwin.po | 4 + lcl/graphtype.pp | 11 ++ lcl/include/wincontrol.inc | 5 +- lcl/interfaces/gtk/gtkglobals.pp | 18 ++- lcl/interfaces/gtk/gtkobject.inc | 27 +++-- lcl/interfaces/gtk/gtkwinapi.inc | 4 + lcl/languages/lcl.fi.po | 6 +- localize.sh | 2 +- 25 files changed, 181 insertions(+), 82 deletions(-) diff --git a/components/codetools/definetemplates.pas b/components/codetools/definetemplates.pas index 7c71eee915..7ce36c14fe 100644 --- a/components/codetools/definetemplates.pas +++ b/components/codetools/definetemplates.pas @@ -3001,11 +3001,11 @@ var repeat AFilename:=FileInfo.Name; if (AFilename='.') or (AFilename='..') then continue; - writeln('Browse Filename=',AFilename,' IsDir=',(FileInfo.Attr and faDirectory)>0); + //writeln('Browse Filename=',AFilename,' IsDir=',(FileInfo.Attr and faDirectory)>0); i:=High(IgnoreDirs); while (i>=Low(IgnoreDirs)) and (AFilename<>IgnoreDirs[i]) do dec(i); - if CompareText(AFilename,'fcl')=0 then - writeln('Browse ',AFilename,' IsDir=',(FileInfo.Attr and faDirectory)>0,' Ignore=',i>=Low(IgnoreDirs)); + //if CompareText(AFilename,'fcl')=0 then + // writeln('Browse ',AFilename,' IsDir=',(FileInfo.Attr and faDirectory)>0,' Ignore=',i>=Low(IgnoreDirs)); if i>=Low(IgnoreDirs) then continue; AFilename:=ADirPath+AFilename; if (FileInfo.Attr and faDirectory)>0 then begin diff --git a/components/synedit/languages/synedit.fi.po b/components/synedit/languages/synedit.fi.po index 992f028173..cf80694109 100644 --- a/components/synedit/languages/synedit.fi.po +++ b/components/synedit/languages/synedit.fi.po @@ -128,7 +128,7 @@ msgstr "Sivu: %d" #: syneditstrconst:syns_filterpascal msgid "Pascal Files (*.pas,*.dpr,*.dpk,*.inc)|*.pas;*.dpr;*.dpk;*.inc" -msgstr "" +msgstr "Pascal tiedostot (*.pas,*.dpr,*.dpk,*.inc)|*.pas;*.dpr;*.dpk;*.inc" #: syneditstrconst:syns_filterperl msgid "Perl Files (*.pl,*.pm,*.cgi)|*.pl;*.pm;*.cgi" diff --git a/components/synedit/synedit.pp b/components/synedit/synedit.pp index ff4352f897..7fbb43d755 100644 --- a/components/synedit/synedit.pp +++ b/components/synedit/synedit.pp @@ -1312,6 +1312,8 @@ begin fFontDummy.Free; Lines.Free; {$ELSE} + fHookedCommandHandlers:=nil; + fPlugins:=nil; FreeAndNil(fScrollTimer); FreeAndNil(fTSearch); FreeAndNil(fMarkList); diff --git a/languages/lazaruside.ca.po b/languages/lazaruside.ca.po index b09ceae4c0..7c6d7a408f 100644 --- a/languages/lazaruside.ca.po +++ b/languages/lazaruside.ca.po @@ -2222,6 +2222,10 @@ msgstr "" msgid "Generate code for gprof" msgstr "Generar codi pel gprof" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "Generar informació de depuració pel DBX (Compilació més lenta)" diff --git a/languages/lazaruside.de.po b/languages/lazaruside.de.po index 5ad610713d..b340bbbd4b 100644 --- a/languages/lazaruside.de.po +++ b/languages/lazaruside.de.po @@ -2232,6 +2232,10 @@ msgstr "" msgid "Generate code for gprof" msgstr "" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "" diff --git a/languages/lazaruside.es.po b/languages/lazaruside.es.po index 6fcc496c0c..363abb22e7 100644 --- a/languages/lazaruside.es.po +++ b/languages/lazaruside.es.po @@ -2233,6 +2233,10 @@ msgstr "Opciones Generales" msgid "Generate code for gprof" msgstr "Generar código para gprof" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "Generar información de depuración para DBX (Lento Compilando)" diff --git a/languages/lazaruside.esutf.po b/languages/lazaruside.esutf.po index 0766abe56a..6ffe9e636a 100644 --- a/languages/lazaruside.esutf.po +++ b/languages/lazaruside.esutf.po @@ -2233,6 +2233,10 @@ msgstr "Opciones Generales" msgid "Generate code for gprof" msgstr "Generar código para gprof" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "Generar información de depuración para DBX (Lento Compilando)" diff --git a/languages/lazaruside.fi.po b/languages/lazaruside.fi.po index 47600686c1..e01138c294 100644 --- a/languages/lazaruside.fi.po +++ b/languages/lazaruside.fi.po @@ -148,11 +148,11 @@ msgstr "&Tiedosto" #: lazarusidestrconsts:uemfinddeclaration msgid "&Find Declaration" -msgstr "" +msgstr "&Etsi määrittely" #: lazarusidestrconsts:uemgotobookmark msgid "&Goto Bookmark" -msgstr "" +msgstr "&Siirry kirjaimerkkiin" #: lazarusidestrconsts:lismenuhelp msgid "&Help" @@ -160,7 +160,7 @@ msgstr "&Ohje" #: lazarusidestrconsts:uemopenfileatcursor msgid "&Open file at cursor" -msgstr "" +msgstr "&Avaa kohdistimen osoittama tiedosto" #: lazarusidestrconsts:lismenuproject msgid "&Project" @@ -184,7 +184,7 @@ msgstr "&Etsi" #: lazarusidestrconsts:uemsetbookmark msgid "&Set Bookmark" -msgstr "" +msgstr "&Merkitse kirjainmerkiksi" #: lazarusidestrconsts:dlgtexttofing msgid "&Text to Find" @@ -232,7 +232,7 @@ msgstr "" #: lazarusidestrconsts:lisafilealreadyexistsreplaceit msgid "A file %s%s%s already exists.%sReplace it?" -msgstr "" +msgstr "Tiedosto %s%s%s on jo olemassa.%skorvataanko se? " #: lazarusidestrconsts:lisa2papascalunitmusthavetheextensionpporpas msgid "A pascal unit must have the extension .pp or .pas" @@ -296,7 +296,7 @@ msgstr "" #: lazarusidestrconsts:lismenuaddtoproject msgid "Add editor file to Project" -msgstr "" +msgstr "Lisää editorin tiedosto projektiin" #: lazarusidestrconsts:lisa2paddfile msgid "Add File" @@ -736,7 +736,7 @@ msgstr "" #: lazarusidestrconsts:lisdiffdlgcaseinsensitive msgid "Case Insensitive" -msgstr "Sama kirjainkoko" +msgstr "Kirjaimen koolla ei väliä" #: lazarusidestrconsts:dlgcasesensitive msgid "Case Sensitive" @@ -992,7 +992,7 @@ msgstr "" #: lazarusidestrconsts:lismenucommentselection msgid "Comment selection" -msgstr "" +msgstr "Laita lohko kommentiksi (//)" #: lazarusidestrconsts:liscodetemplcomment msgid "Comment:" @@ -1112,7 +1112,7 @@ msgstr "" #: lazarusidestrconsts:lisprojinspconfirmremovingfile msgid "Confirm removing file" -msgstr "" +msgstr "Vahvista tiedoston poistaminen" #: lazarusidestrconsts:srkmconflic msgid "Conflict " @@ -1204,7 +1204,7 @@ msgstr "" #: lazarusidestrconsts:lisnewdlgcreateanewpascalunit msgid "Create a new pascal unit." -msgstr "" +msgstr "Tee uusi pascal käännösyksikkö (unit)" #: lazarusidestrconsts:lisnewdlgcreateanewcustomprogram msgid "Create a new program." @@ -1228,7 +1228,7 @@ msgstr "" #: lazarusidestrconsts:lisnewdlgcreateanewunitwithalclform msgid "Create a new unit with a LCL form." -msgstr "" +msgstr "Tee uusi unit ja lomake (LCL form)" #: lazarusidestrconsts:liscreateaprojectfirst msgid "Create a project first!" @@ -1272,7 +1272,7 @@ msgstr "" #: lazarusidestrconsts:lismenuinsertdatetime msgid "Current date and time" -msgstr "" +msgstr "Päivämäärä ja aika" #: lazarusidestrconsts:lisedtdefcurrentproject msgid "Current Project" @@ -1284,7 +1284,7 @@ msgstr "" #: lazarusidestrconsts:lismenuinsertusername msgid "Current username" -msgstr "" +msgstr "Käyttäjätunnus" #: lazarusidestrconsts:dlgcursorbeyondeol msgid "Cursor beyond EOL" @@ -1588,7 +1588,7 @@ msgstr "Eroavuudet" #: lazarusidestrconsts:dlgdirection msgid "Direction" -msgstr "" +msgstr "Suunta" #: lazarusidestrconsts:liscodetoolsdefsinsertbehinddirectory msgid "Directory" @@ -1760,7 +1760,7 @@ msgstr "" #: lazarusidestrconsts:dlgentirescope msgid "Entire Scope" -msgstr "" +msgstr "Ulottuvuuden alkukohta" #: lazarusidestrconsts:dlgrunoenvironment msgid "Environment" @@ -1964,7 +1964,7 @@ msgstr "" #: lazarusidestrconsts:dlgfileexts msgid "File extensions:" -msgstr "Tiedostopäätteet" +msgstr "Tiedostopäätteet:" #: lazarusidestrconsts:lispkgmangfileisalreadyinpackage msgid "File is already in package" @@ -2060,7 +2060,7 @@ msgstr "Etsi" #: lazarusidestrconsts:lismenufindinfiles msgid "Find &in files" -msgstr "" +msgstr "Etsi tiedostoista" #: lazarusidestrconsts:lismenufindnext msgid "Find &Next" @@ -2088,11 +2088,11 @@ msgstr "Etsi määrittely" #: lazarusidestrconsts:lismenufinddeclarationatcursor msgid "Find Declaration at cursor" -msgstr "" +msgstr "Etsi kohdistimen osoittaman kohdan määrittely" #: lazarusidestrconsts:srkmecfindinfiles msgid "Find in files" -msgstr "" +msgstr "Etsi tiedostoista" #: lazarusidestrconsts:srkmecfindnext msgid "Find next" @@ -2180,7 +2180,7 @@ msgstr "ranska" #: lazarusidestrconsts:dlgfromcursor msgid "From Cursor" -msgstr "" +msgstr "Kohdistimen osoittama kohta" #: lazarusidestrconsts:listmfunctionappendpathdelimiter msgid "Function: append path delimiter" @@ -2222,6 +2222,10 @@ msgstr "" msgid "Generate code for gprof" msgstr "" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "" @@ -2240,7 +2244,7 @@ msgstr "" #: lazarusidestrconsts:dlgglobal msgid "Global" -msgstr "" +msgstr "Kaikki" #: lazarusidestrconsts:lisedtdefglobalsourcepathaddition msgid "Global Source Path addition" @@ -2355,7 +2359,7 @@ msgid "Half Page Scroll" msgstr "" #: lazarusidestrconsts:lismenueditorhandleonclickevent -msgid "Handle OnCLick Event" +msgid "Handle OnClick Event" msgstr "" #: lazarusidestrconsts:srvk_hanja @@ -2480,11 +2484,11 @@ msgstr "Ohita" #: lazarusidestrconsts:lisdiffdlgignoreifspacecharswereadd msgid "Ignore amount of space chars" -msgstr "" +msgstr "Jätä huomiotta välilyöntien määrä merkkien välissä " #: lazarusidestrconsts:lisdiffdlgignoreiflineendcharsdiffe msgid "Ignore difference in line ends (e.g. #10 = #13#10)" -msgstr "Jätä huomiotta erilaiset rivinloppumerkinnät (esim. #10 = #13#10) " +msgstr "Jätä huomiotta erilaiset rivinloppumerkinnät (esim. #10 = #13#10)" #: lazarusidestrconsts:lisdiskdiffignorediskchanges msgid "Ignore disk changes" @@ -2492,7 +2496,7 @@ msgstr "" #: lazarusidestrconsts:lisdiffdlgignoreifemptylineswereadd msgid "Ignore if empty lines were added or removed" -msgstr "" +msgstr "Jätä huomiotta tyhjät rivit" #: lazarusidestrconsts:lissortselignorespace msgid "Ignore Space" @@ -2500,15 +2504,15 @@ msgstr "" #: lazarusidestrconsts:lisdiffdlgignorespaces msgid "Ignore spaces (newline chars not included)" -msgstr "" +msgstr "Jätä välilyönnit huomiotta (ei koske tyhjiä rivejä)" #: lazarusidestrconsts:lisdiffdlgignorespacesatendofline msgid "Ignore spaces at end of line" -msgstr "Ei huomioida välilyöntejä rivin lopussa" +msgstr "Jätä huomiotta välilyöntejä rivin lopussa" #: lazarusidestrconsts:lisdiffdlgignorespacesatstartofline msgid "Ignore spaces at start of line" -msgstr "" +msgstr "Jätä huomiotta välilyönnit rivin alussa" #: lazarusidestrconsts:srkmecimestr msgid "Ime Str" @@ -2756,7 +2760,7 @@ msgstr "" #: lazarusidestrconsts:lismenuinserttext msgid "Insert text" -msgstr "" +msgstr "Lisää seuraava teksti" #: lazarusidestrconsts:lispckeditinstall msgid "Install" @@ -3112,7 +3116,7 @@ msgstr "" #: lazarusidestrconsts:dlglevelnoneopt msgid "Level 0 (no extra Optimizations)" -msgstr "" +msgstr "Taso 0 (Ei optimointia)" #: lazarusidestrconsts:dlglevel1opt msgid "Level 1 (Quick Optimizations)" @@ -3120,11 +3124,11 @@ msgstr "Taso 1 (Nopea optimoiti)" #: lazarusidestrconsts:dlglevel2opt msgid "Level 2 (Level 1 + Slower Optimizations)" -msgstr "Taso 2 (taso 1 + hitaampi optimoiti)" +msgstr "Taso 2 (Taso 1 + hitaampi optimoiti)" #: lazarusidestrconsts:dlglevel3opt msgid "Level 3 (Level 2 + Uncertain)" -msgstr "Taso 3 (taso2 + Uncertain)" +msgstr "Taso 3 (Taso2 + Uncertain)" #: lazarusidestrconsts:lispkgfiletypelfm msgid "LFM - Lazarus form text" @@ -3168,7 +3172,7 @@ msgstr "" #: lazarusidestrconsts:lissortsellines msgid "Lines" -msgstr "" +msgstr "Rivit" #: lazarusidestrconsts:dlglinklibraries msgid "Link Libraries:" @@ -3572,7 +3576,7 @@ msgstr "" #: lazarusidestrconsts:lisuidno msgid "no" -msgstr "" +msgstr "ei" #: lazarusidestrconsts:dlgednoerr msgid "No errors in key mapping found." @@ -3636,7 +3640,7 @@ msgstr "" #: lazarusidestrconsts:lisuenotfound msgid "Not found" -msgstr "" +msgstr "Ei löytynyt" #: lazarusidestrconsts:uenotimplcap msgid "Not implemented yet" @@ -3716,11 +3720,11 @@ msgstr "Avaa tiedosto" #: lazarusidestrconsts:srkmecopenfileatcursor msgid "Open file at cursor" -msgstr "Avaa kursorin osoittama tiedosto" +msgstr "Avaa kohdistimen osoittama tiedosto" #: lazarusidestrconsts:lismenuopenfilenameatcursor msgid "Open filename at cursor" -msgstr "Avaa kursorin osoittama tiedosto" +msgstr "Avaa kohdistimen osoittama tiedosto" #: lazarusidestrconsts:dlgqopenlastprj msgid "Open last project at start" @@ -3808,7 +3812,7 @@ msgstr "" #: lazarusidestrconsts:dlgsrorigin msgid "Origin" -msgstr "" +msgstr "Lähtökohta" #: lazarusidestrconsts:dlgcoother msgid "Other" @@ -3844,7 +3848,7 @@ msgstr "" #: lazarusidestrconsts:lisoverwritefile msgid "Overwrite file?" -msgstr "" +msgstr "Korvataanko tiedosto?" #: lazarusidestrconsts:srkmecoverwritemode msgid "Overwrite Mode" @@ -4196,7 +4200,7 @@ msgstr "" #: lazarusidestrconsts:dlgpromptonreplace msgid "Prompt On Replace" -msgstr "" +msgstr "Kysy vielä muutoksen vahvistusta" #: lazarusidestrconsts:dlgpropertycompletion msgid "Property completion" @@ -4256,7 +4260,7 @@ msgstr "" #: lazarusidestrconsts:uepreadonly msgid "Readonly" -msgstr "" +msgstr "Vain luettavissa" #: lazarusidestrconsts:lispkgmangrebuildlazarus msgid "Rebuild Lazarus?" @@ -4304,7 +4308,7 @@ msgstr "" #: lazarusidestrconsts:dlgregularexpressions msgid "Regular Expressions" -msgstr "" +msgstr "Säännölliset lausekkeet" #: lazarusidestrconsts:lispckoptsrelease msgid "Release" @@ -4316,7 +4320,7 @@ msgstr "" #: lazarusidestrconsts:lisexttoolremove msgid "Remove" -msgstr "" +msgstr "Poista" #: lazarusidestrconsts:lisremoveallinvalidproperties msgid "Remove all invalid properties" @@ -4344,7 +4348,7 @@ msgstr "" #: lazarusidestrconsts:lisprojinspremovefilefromproject msgid "Remove file %s from project?" -msgstr "" +msgstr "Poistetaanko tiedosto %s projektista?" #: lazarusidestrconsts:lispckeditremovefilefrompackage msgid "Remove file %s%s%s%sfrom package %s%s%s?" @@ -4360,7 +4364,7 @@ msgstr "" #: lazarusidestrconsts:lismenuremovefromproject msgid "Remove from Project" -msgstr "" +msgstr "Poista projektista" #: lazarusidestrconsts:lispckeditremoveselecteditem msgid "Remove selected item" @@ -4576,11 +4580,11 @@ msgstr "" #: lazarusidestrconsts:lissavechangestoproject msgid "Save changes to project %s?" -msgstr "Tallennetaanko %s -projektiin tehdyt muutokset? " +msgstr "Tallennetaanko %s -projektiin tehdyt muutokset?" #: lazarusidestrconsts:lispckeditsavechanges msgid "Save Changes?" -msgstr "" +msgstr "Talletetaanko muutokset?" #: lazarusidestrconsts:lissavecurrenteditorfile msgid "save current editor file" @@ -4648,7 +4652,7 @@ msgstr "" #: lazarusidestrconsts:dlgscope msgid "Scope" -msgstr "" +msgstr "Ulottuvuus" #: lazarusidestrconsts:srvk_scroll msgid "Scroll" @@ -4684,11 +4688,11 @@ msgstr "" #: lazarusidestrconsts:lisfindfilesearchallfilesinproject msgid "search all files in project" -msgstr "" +msgstr "Hae projektin kaikista tiedostoista" #: lazarusidestrconsts:lisfindfilesearchallopenfiles msgid "search all open files" -msgstr "" +msgstr "Hae kaikista avoinna olevista tiedostoista" #: lazarusidestrconsts:lisfindfilesearchindirectories msgid "search in directories" @@ -4704,7 +4708,7 @@ msgstr "" #: lazarusidestrconsts:lisuesearchstringnotfound msgid "Search string '%s' not found!" -msgstr "" +msgstr "Etsittyä merkkijonoa '%s' ei löydetty!" #: lazarusidestrconsts:dlgsearchabort msgid "Search terminated by user." @@ -4844,7 +4848,7 @@ msgstr "" #: lazarusidestrconsts:dlgselectedtext msgid "Selected Text" -msgstr "" +msgstr "Valittu teksti" #: lazarusidestrconsts:dlgruberbandselectioncolor msgid "Selection" @@ -5096,11 +5100,11 @@ msgstr "" #: lazarusidestrconsts:lissortselsort msgid "Sort" -msgstr "" +msgstr "Lajittele" #: lazarusidestrconsts:lismenusortselection msgid "Sort selection" -msgstr "" +msgstr "Lajittele lohko" #: lazarusidestrconsts:lissourcedirectorydoesnotexists msgid "Source directory %s%s%s does not exists." @@ -5376,7 +5380,7 @@ msgstr "" #: lazarusidestrconsts:lisfindfiletexttofind msgid "Text to find:" -msgstr "" +msgstr "Etsittävä teksti:" #: lazarusidestrconsts:lisdiffdlgtext1 msgid "Text1" @@ -6132,7 +6136,7 @@ msgstr "" #: lazarusidestrconsts:lismenuuncommentselection msgid "Uncomment selection" -msgstr "" +msgstr "Poista lohkon kommentointi (//)" #: lazarusidestrconsts:liscodetoolsdefsundefine msgid "Undefine" @@ -6256,7 +6260,7 @@ msgstr "" #: lazarusidestrconsts:lismenuviewunits msgid "Units..." -msgstr "" +msgstr "Käännösyksiköt eli unitit ..." #: lazarusidestrconsts:srvk_unknown msgid "Unknown" @@ -6432,7 +6436,7 @@ msgstr "Näytä komponenttimuokkain" #: lazarusidestrconsts:dlgmainviewforms msgid "View project forms" -msgstr "Näytä projektin lomakkeet(forms) " +msgstr "Näytä projektin lomakkeet(forms)" #: lazarusidestrconsts:dlgmainviewunits msgid "View project units" @@ -6504,11 +6508,11 @@ msgstr "" #: lazarusidestrconsts:lisfindfilewhere msgid "Where" -msgstr "" +msgstr "Mistä" #: lazarusidestrconsts:dlgwholewordsonly msgid "Whole Words Only" -msgstr "" +msgstr "Etsi vain kokonaisia sanoja" #: lazarusidestrconsts:dlgwidthpos msgid "Width:" diff --git a/languages/lazaruside.fr.po b/languages/lazaruside.fr.po index 096e3b9d1f..ad39dc4910 100644 --- a/languages/lazaruside.fr.po +++ b/languages/lazaruside.fr.po @@ -2232,6 +2232,10 @@ msgstr "Options g msgid "Generate code for gprof" msgstr "Générer du code pour \"gprof\"" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "Générer des infos pour le débugueur DBX (compilation lente)" diff --git a/languages/lazaruside.he.po b/languages/lazaruside.he.po index 080bbdffb9..6a85464157 100644 --- a/languages/lazaruside.he.po +++ b/languages/lazaruside.he.po @@ -2233,6 +2233,10 @@ msgstr "" msgid "Generate code for gprof" msgstr "" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "" diff --git a/languages/lazaruside.it.po b/languages/lazaruside.it.po index 1a31224d1a..971bf317c1 100644 --- a/languages/lazaruside.it.po +++ b/languages/lazaruside.it.po @@ -2232,6 +2232,10 @@ msgstr "Opzioni generali" msgid "Generate code for gprof" msgstr "Genera codice per gprof" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "Genera informazioni di debugging per DBX (rallenta la compilazione)" diff --git a/languages/lazaruside.itiso.po b/languages/lazaruside.itiso.po index 10c9c9e51e..0acb8871be 100644 --- a/languages/lazaruside.itiso.po +++ b/languages/lazaruside.itiso.po @@ -2232,6 +2232,10 @@ msgstr "Opzioni generali" msgid "Generate code for gprof" msgstr "Genera codice per gprof" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "Genera informazioni di debugging per DBX (rallenta la compilazione)" diff --git a/languages/lazaruside.pl.po b/languages/lazaruside.pl.po index 30f0fc121c..f9bbb6e54f 100644 --- a/languages/lazaruside.pl.po +++ b/languages/lazaruside.pl.po @@ -2233,6 +2233,10 @@ msgstr "Opcje ogólne" msgid "Generate code for gprof" msgstr "Twórz kod dla gprof" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "Twórz informacjÄ™ odpluskwiacza dla DBX (zwalnia kompilacjÄ™)" diff --git a/languages/lazaruside.pliso.po b/languages/lazaruside.pliso.po index c676dc0e20..e745d9ad48 100644 --- a/languages/lazaruside.pliso.po +++ b/languages/lazaruside.pliso.po @@ -2233,6 +2233,10 @@ msgstr "Opcje og msgid "Generate code for gprof" msgstr "Twórz kod dla gprof" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "Twórz informacjê odpluskwiacza dla DBX (zwalnia kompilacjê)" diff --git a/languages/lazaruside.plwin.po b/languages/lazaruside.plwin.po index f78a4fe2d3..5d09aa6bef 100644 --- a/languages/lazaruside.plwin.po +++ b/languages/lazaruside.plwin.po @@ -2233,6 +2233,10 @@ msgstr "Opcje og msgid "Generate code for gprof" msgstr "Twórz kod dla gprof" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "Twórz informacjê odpluskwiacza dla DBX (zwalnia kompilacjê)" diff --git a/languages/lazaruside.po b/languages/lazaruside.po index 6c76bc12c0..44c724fa61 100644 --- a/languages/lazaruside.po +++ b/languages/lazaruside.po @@ -2566,6 +2566,10 @@ msgstr "" msgid "Use Heaptrc Unit" msgstr "" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlggprof msgid "Generate code for gprof" msgstr "" diff --git a/languages/lazaruside.ru.po b/languages/lazaruside.ru.po index ec9a9020b8..b1c9e0e790 100644 --- a/languages/lazaruside.ru.po +++ b/languages/lazaruside.ru.po @@ -2222,6 +2222,10 @@ msgstr " msgid "Generate code for gprof" msgstr "óÏÚÄÁÔØ ËÏÄ ÄÌÑ gprof" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "çÅÎÅÒÉÒÏ×ÁÔØ ÉÎÆÏÒÍÁÃÉÀ ÄÌÑ DBX (ÚÁÍÅÄÌÑÅÔ ÓÂÏÒËÕ)" diff --git a/languages/lazaruside.ruwin.po b/languages/lazaruside.ruwin.po index 8a997a9400..019d1d181c 100644 --- a/languages/lazaruside.ruwin.po +++ b/languages/lazaruside.ruwin.po @@ -2222,6 +2222,10 @@ msgstr " msgid "Generate code for gprof" msgstr "Ñîçäàòü êîä äëÿ gprof" +#: lazarusidestrconsts:dlgcovalgrind +msgid "Generate code for valgrind" +msgstr "" + #: lazarusidestrconsts:dlgcodbx msgid "Generate Debugging Info For DBX (Slows Compiling)" msgstr "Ãåíåðèðîâàòü èíôîðìàöèþ äëÿ DBX (çàìåäëÿåò ñáîðêó)" diff --git a/lcl/graphtype.pp b/lcl/graphtype.pp index 2452403aae..cd4a93c233 100644 --- a/lcl/graphtype.pp +++ b/lcl/graphtype.pp @@ -378,6 +378,10 @@ begin RawImage^.PaletteSize:=0; end; +{------------------------------------------------------------------------------- + Beware: Data is used in ReallocMem + +-------------------------------------------------------------------------------} procedure CreateRawImageData(Width, Height, BitsPerPixel: cardinal; LineEnd: TRawImageLineEnd; var Data: Pointer; var DataSize: cardinal); var @@ -465,6 +469,10 @@ begin end; end; +{------------------------------------------------------------------------------- + Beware: DestData is used in ReallocMem + +-------------------------------------------------------------------------------} procedure ExtractRawImageDataRect(SrcRawImageDesc: PRawImageDescription; const SrcRect: TRect; SrcData: Pointer; DestRawImageDesc: PRawImageDescription; @@ -767,6 +775,9 @@ end. { ============================================================================= $Log$ + Revision 1.32 2004/06/28 17:03:37 mattias + clean up + Revision 1.31 2004/05/11 11:42:26 mattias replaced writeln by debugln diff --git a/lcl/include/wincontrol.inc b/lcl/include/wincontrol.inc index 323c0cde08..4af65bf537 100644 --- a/lcl/include/wincontrol.inc +++ b/lcl/include/wincontrol.inc @@ -1675,7 +1675,7 @@ var (Enabled or AllowDisabled) and (Perform(CM_HITTEST, 0, - LParam(PointtoSmallPoint(ControlPos))) <> 0) + LParam(PointToSmallPoint(ControlPos))) <> 0) ) ); {$IFDEF VerboseMouseBugfix} @@ -3659,6 +3659,9 @@ end; { ============================================================================= $Log$ + Revision 1.239 2004/06/28 17:03:37 mattias + clean up + Revision 1.238 2004/06/20 21:21:49 micha fix GetVisible to return this control's visibility, instead introduce IsVisible to check for recursive visibility diff --git a/lcl/interfaces/gtk/gtkglobals.pp b/lcl/interfaces/gtk/gtkglobals.pp index 2691cb3dae..0ea75d02fb 100644 --- a/lcl/interfaces/gtk/gtkglobals.pp +++ b/lcl/interfaces/gtk/gtkglobals.pp @@ -419,13 +419,29 @@ const const CallBackDefaultReturn = {$IFDEF GTK2}false{$ELSE}true{$ENDIF}; + +// font +var + AvgFontCharsBuffer: array[#32..#126] of char; + AvgFontCharsBufLen: integer; + implementation -initialization +procedure InternalInit; +var + c: char; +begin + for c:=Low(AvgFontCharsBuffer) to High(AvgFontCharsBuffer) do + AvgFontCharsBuffer[c]:=c; + AvgFontCharsBufLen:=ord(High(AvgFontCharsBuffer))-ord(Low(AvgFontCharsBuffer))+1; ModalWindows:=nil; UseTransientForModalWindows:=true; UpdatingTransientWindows:=false; CurrentSentPaintMessageTarget:=nil; +end; + +initialization + InternalInit; end. diff --git a/lcl/interfaces/gtk/gtkobject.inc b/lcl/interfaces/gtk/gtkobject.inc index 839ba954d8..b98e269af6 100644 --- a/lcl/interfaces/gtk/gtkobject.inc +++ b/lcl/interfaces/gtk/gtkobject.inc @@ -8605,9 +8605,7 @@ var dummy: LongInt; UseFont : PGDKFont; UnRef : Boolean; - AVGBuffer: array[#32..#126] of char; - AvgLen: integer; - c: char; + AvgTxtLen: Integer; begin with TDeviceContext(DC) do begin if dcfTextMetricsValid in DCFlags then begin @@ -8631,16 +8629,18 @@ begin gdk_text_extents(UseFont, TestString, length(TestString), @lbearing, @rBearing, @dummy, @TextMetric.tmAscent, @TextMetric.tmDescent); - for c:=Low(AVGBuffer) to High(AVGBuffer) do - AVGBuffer[c]:=c; - AvgLen:=ord(High(AVGBuffer))-ord(Low(AVGBuffer))+1; - GetTextExtentPoint(HDC(DC), @AVGBuffer[Low(AVGBuffer)], - AvgLen, XT); - if not IsDoubleByteChar then - XT.cX := XT.cX div AvgLen - else + if IsDoubleByteChar then // Quick hack for double byte char fonts - XT.cX := XT.cX div (AvgLen div 2); + AvgTxtLen:=AvgFontCharsBufLen div 2 + else + AvgTxtLen:=AvgFontCharsBufLen; + GetTextExtentPoint(HDC(DC), + @AvgFontCharsBuffer[Low(AvgFontCharsBuffer)], + AvgTxtLen, XT); + if not IsDoubleByteChar then + XT.cX := XT.cX div AvgTxtLen + else + XT.cX := XT.cX div AvgTxtLen; TextMetric.tmHeight := XT.cY; TextMetric.tmAscent := TextMetric.tmHeight - TextMetric.tmDescent; TextMetric.tmAveCharWidth := XT.cX; @@ -9197,6 +9197,9 @@ end; { ============================================================================= $Log$ + Revision 1.511 2004/06/28 17:03:37 mattias + clean up + Revision 1.510 2004/06/28 08:54:20 mattias fixed ord ptr conversion hints diff --git a/lcl/interfaces/gtk/gtkwinapi.inc b/lcl/interfaces/gtk/gtkwinapi.inc index 51bd56eb75..ecaafdbe63 100644 --- a/lcl/interfaces/gtk/gtkwinapi.inc +++ b/lcl/interfaces/gtk/gtkwinapi.inc @@ -5368,6 +5368,7 @@ begin If UseFont = nil then DebugLn('WARNING: [TGtkWidgetSet.GetTextExtentPoint] Missing font') else begin + descent:=0; gdk_text_extents(UseFont, Str, Count, @lbearing, @rBearing, @width, @ascent, @descent); Size.cX := Width; @@ -8700,6 +8701,9 @@ end; { ============================================================================= $Log$ + Revision 1.354 2004/06/28 17:03:37 mattias + clean up + Revision 1.353 2004/06/28 15:45:48 mattias fixed a mem violation in gtk intf paint msg conversion diff --git a/lcl/languages/lcl.fi.po b/lcl/languages/lcl.fi.po index ab7019b85d..4d41390a94 100644 --- a/lcl/languages/lcl.fi.po +++ b/lcl/languages/lcl.fi.po @@ -40,7 +40,7 @@ msgstr "&Ohje" #: lclstrconsts:rsmbignore msgid "&Ignore" -msgstr "" +msgstr "Ohita" #: lclstrconsts:rsmbno msgid "&No" @@ -228,7 +228,7 @@ msgstr "" #: lclstrconsts:rsmtinformation msgid "Information" -msgstr "" +msgstr "Informaatio" #: lclstrconsts:sinvalidactioncreation msgid "Invalid action creation" @@ -308,7 +308,7 @@ msgstr "Avaa tiedosto" #: lclstrconsts:rsfdoverwritefile msgid "Overwrite file ?" -msgstr "" +msgstr "Tallennetaanko vanhan päälle ?" #: lclstrconsts:rsfdpathmustexist msgid "Path must exist" diff --git a/localize.sh b/localize.sh index f7530ed198..b872e30574 100644 --- a/localize.sh +++ b/localize.sh @@ -52,7 +52,7 @@ SynEdit_RST=`find components/units -name syneditstrconst.rst | xargs ls -1t | he rstconv -i $SynEdit_RST \ -o components/synedit/languages/synedit.po ./tools/updatepofiles components/synedit/languages/synedit.po -for lang in ca de fr it itiso pl pliso plwin ru ruwin ; do +for lang in ca de fi fr it itiso pl pliso plwin ru ruwin ; do msgfmt components/synedit/languages/synedit.$lang.po \ -o components/synedit/languages/synedit.$lang.mo done