PslSourceList.Extract
The Get-Property checks, if a language from the source file will be extracted.
The Set-Property adds or removes a language to the list of extracted languages.
Syntax
Expression.Extract (LangID as Integer) as Boolean
Expression Required. Object of type PslSourceList
LangID A language id or one of these values :
pslLangAll (Value = 255): stands for all languages
pslLangAllExceptNeutral (Value = 1279): stands for all languages, except Neutral
Example 1
' Adds a source file to the current project
' and sets extract language to "all"
Dim prj As PslProject
Set prj = PSL.ActiveProject
If prj Is Nothing Then Exit Sub
Dim src As PslSourceList
Set src = prj.SourceLists.Add("c:\test.exe", "Test", pslLangEnglishUSA)
src.Extract(pslLangAll) = True
Example 2
' Displays all source files, that
' extract German resources
Dim prj As PslProject
Set prj = PSL.ActiveProject
If prj Is Nothing Then Exit Sub
Dim src As PslSourceList
For Each src In prj.SourceLists
If src.Extract(pslLangGerman) Then
PSL.Output src.Title
End If
Next src