
| PHP [19] Cкриптовый язык программирования общего назначения |
| MySQL [1] Cвободная система управления базами данных (СУБД) |
| JavaScript [3] Прототипно-ориентированный скриптовый язык программирования |
| jQuery [2] Библиотека JavaScript, фокусирующаяся на взаимодействии JavaScript и HTML |
| RegExp [0] Регулярные выражения |
| C/C++ [3] Компилируемый статически типизированный язык программирования общего назначения |
| wxWidgets [2] Библиотека инструментов для разработки кроссплатформенных приложений |
| VST [6] Steinberg's Virtual Studio Technology (VST) |
| HGE [2] Игровой движок HGE (Haaf's Game Engine) |
| PureBasic [9] Кроссплатформенный компилятор и IDE для быстрой разработки |
| Windows [2] Программистам под ОС MS Windows |
VST Host Component
Delphi Component for easy access to VST-Plugins. For example Tobybear’s MiniHost was build around this component. Also he has done a lot of development on this piece. So please visit his homepage.
ASIO Host Component
Delphi Component for easy access to ASIO-Soundcards. It is well tested over the years and thus work with any soundcard with ASIO drivers.
VST Plugin Wizard
Delphi Wizard for easiest development of VST Plugins. There are several demos included in the package ranging from filters over dynamics to synths and other utilities. The Electri-Q is probably one of the famous examples of what can be done with it.
Читать |
VST |
230 |
2011-05-05
| 0.0/0
| 1
|
Показать
Define subject.s = "<a href='http://site1.ru'>Site 1</a> Any text <a href='http://site2.ru/?a=f&b=5'>Site 2</a>"
Define pattern.s = "http://[^\']{2,}"
If CreateRegularExpression(0, pattern)
Dim Result$(0)
NbFound = ExtractRegularExpression(0, subject, Result$())
For k = 0 To NbFound-1
Debug Result$(k)
Next
Else
Debug RegularExpressionError()
EndIf
Define subject.s = "'Vasiliy Ivanovitch' y@mail.org.kol.ru (*ColdplayC*) 'l@mbr.uk.com' kol@kol.com serjio k <orba@kimori.org.ua>, serjio k <orba1@kimori.org.ua>"
Define pattern.s = "[\.\-_A-Za-z0-9]+?@[\.\-A-Za-z0-9]+?[\.A-Za-z0-9]{2,}"
If CreateRegularExpression(0, pattern)
Dim Result$(0)
NbFound = ExtractRegularExpression(0, subject, Result$())
For k = 0 To NbFound-1
Debug Result$(k)
Next
Else
Debug RegularExpressionError()
EndIf