Ejecutar comando y capturar su salida

[Casimiro Noteví]

Empezado por dandyuno

Ella 䔠  Hei Ke Yang Shen ⁡ Usted  fricción Xi 䌠 canal de  Titu ⁥ Wenfandishe മ 䔠 ꍮ pigwash Yang Ke apuñaló ⁥ Aiwei ⁥  Hei Ella Yang Jiao > 䍁 㔱 ㈭ 䑂 റഊ 䐠 retención fue Wan Wei Ke  䌠 Chicuifangxian Queqiaowanchao 䑜 Daotongtumeng Tingshaoduosuo  Zha enemigo lenta ൳ഊ 㜰 ㄯ ⼱ 〲 㜱 † 㠰 ㈺ "† 㰠 䥄 㹒 ††††† മ 㜰 ㄯ ⼱ 〲 㜱† 㠰 ㈺ "† 㰠 䥄 㹒 ††††† ⸮਍ 㜰 ㄯ ⼱ 〲 㜱 † 〱㌺" ††††† ㄠ ⸲〴 ‰ Zhadongmeiwei ⹬ Wei ൵ "⼷ ㄱ ㈯ ㄰ ‷ 〠 㨸 㘲 † ††††† i 㜮 ㌲ Suiwei Se Yanwulipu ਍ 㜰 ㄯ ⼱ 〲 㜱 † 㠰 ㈺ "†††††† ⸲㌶ '' 'Zhatongmeiwei ⹬ comodidad ൳ ㄱ ㄯ ⼰ 〲 㜱 † ㈱㌺ ‷ ‷ Zha ††††††† ㌲ enemigo lenta ⹳ Luan ൲ ㄱ ㄯ ⼰ 〲 㜱 † ㈱ 㔺 '‱ Zha †††††† ⸵ 㤶 enemigo lenta ⹳ Luan pigwash 4

A saber qué webs visitas

[dandyuno]

Muy buenas Casimiro, la web de donde saque el codigo es esta, y fue un copy paste para ver su funcionamiento. Utilizo Embarcadero 2010

[Casimiro Noteví]

Seguramente tengas que modificar el código y cambiar los char por ansichar, los string por ansistring, etc. por el tema del unicode.

[dandyuno]

OK Casimiro, ahora si que funciona, tan solo tiene un pequeño detalle, cuando mando por ej ShowMessage('dir'); la primera vez sale en blanco, pero la segunda sale perfecto por lo demas lo que buscaba, muchas gracias por tu ayuda