boa a tarde a tudos vc's
 eu estou unsando assim pra carregar

 

    If (Key = 0) Then
        Key = 1
    Else
        Key = Key + 1
    End If
        FG1.Rows = Key + 1
        FG1.TextMatrix(Key, 1) = TXTPIZZA.Text
        FG1.TextMatrix(Key, 2) = TXTQTY.Text
        FG1.TextMatrix(Key, 3) = TXTUP.Text
        FG1.TextMatrix(Key, 4) = Moeda(TXTTP.Text)
        LimparText
        Command2.Enabled = True
    End If
    End If
como deleto uma linha

Tenta aí:

 

FG1.RemoveItem FG1.Row

deu certo so uma coisa como eu deleto o que esta selecionado, é que e click encima dele ai deleta o ultimo

gost_jlp, + uma vez vc aceito obrigado

ficou assim

    On Error Resume Next
    fg1.RemoveItem fg1.Row
    Key = Key - 1

    Dim Tot As Currency ' olha aqui amigo o que te disse no forum, basta mudar
                                ' o tipo desta variável, jamais pode ser Integer.
    For i = 1 To Key
        Tot = Tot + fg1.TextMatrix(i, 4)
    Next i
        txtnp.Text = Moeda(Tot)

um programa pra pizzaria que eu fez so que uns do cliente quer que deleta quado o cleinte cancelar umas na pizza.

Ah, entendi... vc pode usar o ListView também quando tem estas Listas "dinâmicas" ( que não está vinculado a algum banco de dados). É que o flexgrid, como o nome diz é "flex", serve tanto para vinculação de dados de um tabela quanto para manipulação de listas assim. Mas que bom que conseguiu, precisando é só postar.

 

at+