Pular para o conteúdo principal

Postagem em destaque

BlackTDN :: A Arte (e Desafio) de Dialogar com a IA: Mais Inteligência, Menos "Burrice"?

_Créditos das imagens: ChatGPT (DALL·E) ** A Arte (e Desafio) de Dialogar com a IA: Mais Inteligência, Menos "Burrice"? Recentemente, me deparei com um exemplo fascinante da capacidade das IAs generativas: um prompt detalhado que resultou na criação de um jogo 3D de labirinto com um soldado (você pode ver a versão em português do prompt/projeto aqui: [naldodj-3DMazeGameWithSoldier](https://raw.githubusercontent.com/naldodj/naldodj-3DMazeGameWithSoldier/refs/heads/main/README.md), baseado no original de [@nobody_qwert no X](https://x.com/nobody_qwert/status/1893584330095509843)). O resultado é impressionante, mas o que realmente me chamou a atenção foi a **complexidade e o detalhamento do prompt** necessário para chegar lá. Isso ilustra perfeitamente um ponto crucial: fazer a IA gerar *exatamente* o que queremos, seja código complexo ou texto coeso e específico, não é trivial. Exige clareza, precisão, antecipação de ambiguidades e, muitas vezes, várias iterações. É a chamad...

Protheus :: Advpl :: Utilizando scripts em PowerShell para manipular objetos COM :: Combo II : Excel

Em Protheus :: Advpl :: Utilizando scripts em PowerShell para manipular objetos COM :: Combo I : Excel vimos como criar, popular e exibir dados no Excel usando ADVPL e, através da WaitRun, Script em PowerShell.

Agora vamos bincar um pouco com a Paleta de Cores, aplicar auto-filtro e borda.

O código é praticamente o mesmo, sendo que:

Para aplicar o Filtro usei:

$objRange.EntireColumn.AutoFilter();

Para a Paleta de Cores: (Color Palette and the 56 Excel ColorIndex Colors)

$objWorksheet.Cells.Item('+cStrLine+',$nColNum).Font.ColorIndex = 11;
if ( -not( $objWorksheet.Cells.Item('+cStrLine+',$nColNum).row % 2 ) ){
    $objWorksheet.Cells.Item('+cStrLine+',$nColNum).Interior.ColorIndex    = 16;
}
else {
    $objWorksheet.Cells.Item('+cStrLine+',$nColNum).Interior.ColorIndex    = 15;
}

Para as Bordas:

$objRange.Borders.Color        = 0;
$objRange.Borders.Weight    = 2;

e, para “Negrito”:

$objWorksheet.Cells.Item('+cStrLine+',$nColNum).Font.Bold     = $True;

Obtendo o seguinte efeito:

image

“O céu é o Limite….”

Obtenha a nova versão clicando aqui.

[]s

иαldσ dj

Comentários

Postagens mais visitadas