Мне нужно получить через exe-ник, такие аргументы: логин/пароль@база
Есть ли готовые решения в самом билдере или нужен код?

Локшин Марк,

Можно подробнее ...

Локшин Марк,

Мне нужно подцепить exe-ник написанный на PowerBuilder, в меню программы написанной на Delphi, там я буду передавать параметры для соединения с базой

Вот нашел кое-что, принимает параметры

string ls_cmd, ls_arg[]
integer i, li_argcnt

// Get arguments and strip blanks from start and end of string
ls_cmd = Trim( commandParm () )

li_argcnt = 1
DO WHILE Len(ls_cmd ) > 0
// Find first blank
i =Pos( ls_cmd, " " )
// If no blanks (only one argument), set i to point to the hypothetical character after end of string
if i =0 then i =Len(ls_cmd) + 1
// Assign the arg to the arg array.No. of chars copied is one less than position of the space found with Pos
ls_arg[li_argcnt] =Left( ls_cmd, i - 1 )
// Increment the argument count for the next loop
li_argcnt = li_argcnt + 1
// Remove the argument from the string so the next argument becomes first
ls_cmd =Replace( ls_cmd, 1, i, "" )
LOOP

А есть встроенная функция которая бы парсила эту строку разделив ее на отдельные части?

... потом подставить их в SQLCA:
SQLCA.DBMS = "O73 ORACLE 7.3"
SQLCA.LogPass = "?"
SQLCA.ServerName = "?"
SQLCA.LogId = "?"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""

Какие могут быть еще варианты? Код, обекты ...? Если можно пример.

PaulJB 2 proSlava
Есть такая библиотека Funcky. В ней очень много полезных строковых ф-ций и не только ... . Тестировалась с 5 версии ПБ по 11.5 - все Ок. Если нет проблем с использованием внешних ДЛЛ - могу поделиться.

Скинь, пожалуйста

PaulJB,

7, есть и 11

В первой форме, я создал SQLCA объект прописал параметры

SQLCA.DBMS = "O73 ORACLE 7.3"
SQLCA.LogPass = gs_pass
SQLCA.ServerName = gs_db
SQLCA.LogId = gs_login
SQLCA.AutoCommit = False
SQLCA.DBParm = ""

Connect using SQLCA;

... при нажатии кнопки, открывается вторая форма, где для DataWindow в событии (open) пишу

dw_1.SetTransObject(SQLCA)
dw_1.retrieve()

Мне выдает ошибку что нужно вызвать SetTrans