Burn Killer

Fala galera da uma ajuda ai Eu tenho um form no qual eu tenho 20 receitas(em 20 opt buttons) e cada receita tem um determinado numero de tarefas (selecionados pelo check box) , quando eu estou nesse form eu vou selecionar uma receita e voltar pro form principal, no qual devera estar sendo exibido somente as tarefas selecionadas na receita, em ordem, a minha duvida é como fazer q o form mostre essa selecao em ordem e em sequencia um embaixo do outro, sendo q cada receita tem sua selecao de tarefas e elas podem ser alteradas. []'s

Isso, eles nun fikam no mesmo lugar, eles se reposicionam no form principal []'s

Então, eu tenho 2 forms, um q configura e um q roda a configuracao, na tela q roda a config, eu so vo colocar os items checados na tela de config, eu queria saber como eu posso exibir na ordem certa os checados na tela q roda. é isso

Fala gnt, Bom eu tenho uma indexação de 1 a 30 num checkbox e quero q com a ajuda de uma função eu saiba qual a ordem de sequencia? todos os 30 items do check box estao sendo salvos em registro , assim eu pergunto, como eu posso fazer essa verificação de ordem??com getallsettings()?? ajudem... []'s

bom já resolvi essa questão, porém para atualização no form principal apareceu um problema q eu nun tenho certeza de q tenha uma solução facil... O problema é o seguinte: Ao selecionar os eventos e seções desejadas eu vou voltar para o form principal para atualizar as configurações, e neste form principal eu vo colocar todos os check e opt q eu tenho, so q em estado hide, sendo assim so os eventos selecionados serão mostrados, e agora o problema, eu quero que a exibição apareça da seguinte forma: ex.:ao clicar o ev3 e ev4 no opt2 eu volto ao form principal por meio de um botão e ao voltar os check boxes correspondentes ao 3 e 4 vao para o topo do form , fikando apenas 2 na lista. Como fazer para q as seleções constituam sequenciamento escolhido no config,no form principal?? []'s

Bom se você quer estilo do xp pra menu e botões procura neste site www.vbweb.com.br e vai na parte de ocx, la você vai achar eles, se nun for isso é so falar []'s

uma correção. o mdichild = false some com akela barra azul do form, e na desabilita o botao fechar []'s

Fala galera, Depois de resolver aquele problema da relação com option e check boxes eu parti para atualização no form principal, mas ai apareceu um problema q eu nun tenho certeza de q tenha uma solução facil... O problema é o seguinte: Ao selecionar os eventos e seções desejadas eu vou voltar para o form principal para atualizar as configurações, e neste form principal eu vo colocar todos os check e opt q eu tenho, so q em estado hide, sendo assim so os eventos selecionados serão mostrados, e agora o problema, eu quero que a exibição apareça da seguinte forma: ex.:ao clicar o ev3 e ev4 no opt2 eu volto ao form principal por meio de um botão e ao voltar os check boxes correspondentes ao 3 e 4 vao para o topo do form , fikando apenas 2 na lista. Como fazer para q as seleções constituam uma lista no form principal?? []'s

Vá em maxbutton, na propriedade do form e mude para false para desabilitar botao de minimizar e o botão de fechamento do form, mude para false respectivamente: minbutton e mdichild. espero q tenha ajudado []'s

é q é assim, nessa tela de configuração eu tenho a opcao de mudar de receita, e quando eu mudo isso , as modificacoes são salvas, pra q da proxima vez q eu abrir este option button ele rode as mais recentes configuracoes... Se eu nun for usar esse laco de for, eu uso um case pra verificação de clique?Ai eu teria q fazer vinte casos repetindo o laco for?? Ve se isso te esclarece... []'s

então veio.. é assim eu to fazendo uma ihm pra uma entalhadeira de vidros, e eu tenho receitas q são apresentadas no form principal, ai na parte de configuracao, eu tenho 20 receitas salvas(q são os 20 option buttons) e tenho 96 items q podem ser adicionados ou retirados das receitas, assim quando eu clico em um option button eu rodo a receita salva mostrando nos check boxes(estou usando 30 para testes) as seleções de items para a entalhadeira, assim q eu fizer a modificacao nesses items, eles são salvos e modificados no form principal, isso em modo offline ou seja salvo as informacoes no registro do cpu, ai eu tenho essa mesma rotina aplicada ao clp q já é a parte online , q ao clicar as informacoes já são enviadas para o clp e não são salvas em registro.. é isso, já q eu nun to somando check e option como faco esse laco?? []'s

Fala galera, eu sou meio novato em corel, eu tenho o corel 11 e sei fazer umas imagens bem diferentes com corel photoshop, mas eu queria aprender a mexer com fotos e ai como sou novato eu pergunto alguém pode me dar algumas dicas de como fazer alteracoes, mexer com movimento da foto, tipo fixar uma parte e movimentar o fundo, por favor enviem algumas dicas para mim, e se possivel uma apostila para tratamento de foto []'s

opa cometi um outro erro quando eu uso o save settings no codigo q eu passei , o value é c e não "c" porque ai iria salvar uma variavel c agora uma outra duvida quando eu rodo esse codigo corrigido ele salva, porem quando eu retorno pro option ele apaga o ultimo registro zerando o value do check quando ele tava selecionado na ultima vez, assim por exemplo eu clico no opt4 e clico no check 7 ai eu clico no opt1 e depois retorno ao opt 4, mas quando eu retorno, a value do check 7 vai de 1 pra 0 como corrigir esse erro?

opa corrigindo Private Sub Option1_Click(i As Integer) For i = 1 To 20 For c = 1 To 30 Check1(c).Value = GetSetting(App.EXEName, "opt" & Trim(Str(i)), c, 0) Next c Next i End Sub Private Sub Check1_Click(c As Integer) For c = 1 To 30 For j = 1 To 20 If Option1(j).Value = True Then SaveSetting App.EXEName, "opt" & Trim(Str(j)), "c", Check1(c).Value End If Next j Next c End Sub

Mais uma coisa... quando você me mostrou akela subrotina me disse q o numero de check boxes era o mesmo do de option button, so q no meu caso eu tenho 20 opt e 30 check(q serão 96 mais pra frente), dai eu pergunto eu vo te q fazer algo assim ne? Private Sub Option1_Click(Index As Integer) For i = 1 To 20 For c = 1 To 30 Check1(c).Value = GetSetting(App.EXEName, "opt" & Trim(Str(c)), i, 0) Next c Next i End Sub Private Sub Check1_Click(c As Integer) For c = 1 To 30 For j = 1 To 20 If Option1(j).Value = True Then SaveSetting App.EXEName, "opt" & Trim(Str(j)), "c", Check1(c).Value End If Next i Next c End Sub certo?

Beleza entendi, vlw veio []'s

Certo Eu vo ter q ao clicar nestes checkboxes ter o form principal alterado deixando on apenas os checkboxes escolhidos, e com isso surge uma duvida... Com essa rotina eu tenho como alterar tipo colocando instrucoes pra cada checkbox? []'s

Um laço no check box? certo mais como eu poderia fazer isso de uma forma q relacione o indice do check me ajude.. []'s

Fala gnt, Voltando ao tópico de relação de option com check q eu tava fazendo, eu queria fazer uma rotina q executasse o save settings em 30 variaveis pra cada check box q eu tenho, como eu fiz os check box em index ele vai de 1 a 30 e o código ficou assim: Private Sub_Save() If Option1 = True Then SaveSetting App.EXEName, "opt1", "c", Me.Check1(c).Value Else End If If Option2 = True Then SaveSetting App.EXEName, "opt2", "c", Me.Check1(c).Value Else End If If Option3 = True Then SaveSetting App.EXEName, "opt3", "c", Me.Check1(c).Value End If If Option4 = True Then SaveSetting App.EXEName, "opt4", "c", Me.Check1(c).Value End If If Option5 = True Then SaveSetting App.EXEName, "opt5", "c", Me.Check1(c).Value End If If Option6 = True Then SaveSetting App.EXEName, "opt6", "c", Me.Check1(c).Value End If If Option7 = True Then SaveSetting App.EXEName, "opt7", "c", Me.Check1(c).Value End If If Option8 = True Then SaveSetting App.EXEName, "opt8", "c", Me.Check1(c).Value End If If Option9 = True Then SaveSetting App.EXEName, "opt9", "c", Me.Check1(c).Value End If If Option10 = True Then SaveSetting App.EXEName, "opt10", "c", Me.Check1(c).Value End If If Option11 = True Then SaveSetting App.EXEName, "opt11", "c", Me.Check1(c).Value End If If Option12 = True Then SaveSetting App.EXEName, "opt12", "c", Me.Check1(c).Value End If If Option13 = True Then SaveSetting App.EXEName, "opt13", "c", Me.Check1(c).Value End If If Option14 = True Then SaveSetting App.EXEName, "opt14", "c", Me.Check1(c).Value End If If Option15 = True Then SaveSetting App.EXEName, "opt15", "c", Me.Check1(c).Value End If If Option16 = True Then SaveSetting App.EXEName, "opt16", "c", Me.Check1(c).Value End If If Option17 = True Then SaveSetting App.EXEName, "opt17", "c", Me.Check1(c).Value End If If Option18 = True Then SaveSetting App.EXEName, "opt18", "c", Me.Check1(c).Value End If If Option19 = True Then SaveSetting App.EXEName, "opt19", "c", Me.Check1(c).Value End If If Option20 = True Then SaveSetting App.EXEName, "opt20", "c", Me.Check1(c).Value End If If Option21 = True Then SaveSetting App.EXEName, "opt21", "c", Me.Check1(c).Value End If If Option22 = True Then SaveSetting App.EXEName, "opt22", "c", Me.Check1(c).Value End If If Option23 = True Then SaveSetting App.EXEName, "opt23", "c", Me.Check1(c).Value End If If Option24 = True Then SaveSetting App.EXEName, "opt24", "c", Me.Check1(c).Value End If If Option25 = True Then SaveSetting App.EXEName, "opt25", "c", Me.Check1(c).Value End If If Option26 = True Then SaveSetting App.EXEName, "opt26", "c", Me.Check1(c).Value End If If Option27 = True Then SaveSetting App.EXEName, "opt27", "c", Me.Check1(c).Value End If If Option28 = True Then SaveSetting App.EXEName, "opt28", "c", Me.Check1(c).Value End If If Option29 = True Then SaveSetting App.EXEName, "opt29", "c", Me.Check1(c).Value End If If Option30 = True Then SaveSetting App.EXEName, "opt30", "c", Me.Check1(c).Value End If End Sub Private Sub Check1_Click(c As Integer) Select Case c Case Is = 1 If Check1(1).Value = 1 Then Form2.Text1.Visible = True Form2.Text2.Visible = True Form2.Text3.Visible = True Else Form2.Text1.Visible = False Form2.Text2.Visible = False Form2.Text3.Visible = False End If Call Save Case Is = 2 Call Save Case Is = 3 Call Save Case Is = 4 Call Save Case Is = 5 Call Save Case Is = 6 Call Save Case Is = 7 Call Save Case Is = 8 Call Save Case Is = 9 Call Save Case Is = 10 Call Save Case Is = 11 Call Save Case Is = 12 Call Save Case Is = 13 Call Save Case Is = 14 Call Save Case Is = 15 Call Save Case Is = 16 Call Save Case Is = 17 Call Save Case Is = 18 Call Save Case Is = 19 Call Save Case Is = 20 Call Save Case Is = 21 Call Save Case Is = 22 Call Save Case Is = 23 Call Save Case Is = 24 Call Save Case Is = 25 Call Save Case Is = 26 Call Save Case Is = 27 Call Save Case Is = 28 Call Save Case Is = 29 Call Save Case Is = 30 Call Save End Select End Sub bom eu queria saber em q eu to errando, pois quando eu rodo e clico no check box ele fala q a funcao ou sub não esta definida...me ajudem! []'s

humm entaum como eu faria pra rodar as 30variaveis salvas? uma por uma? Private Option1_Click() Check1(1).Value = GetSetting(App.EXEName, "opt2", "1", 0) . . . End sub porem se eu colocar assim ele so roda o primeiro, como eu posso fazer q elas rodem todas as 30 nun so click, colocá-los em uma function?? mas como ela so le o primeiro entaum como fazer para ela ler todos os 30?? HELPP []'s

e ai bom ta td otimo so tem um porem, quando eu mudo de option tipo de 1 pra 2 o form não está fazendo o getsettings() e atualizando os check boxes value, alguém sabe se tem erro? ai vai o codigo Private Sub Option1_Click() For i = 1 To 30 Check1(i).Value = GetSetting(App.EXEName, "opt1", "i", 0) Next i End Sub Private Sub Option2_Click() For j = 1 To 30 Check1(j).Value = GetSetting(App.EXEName, "opt2", "j", 0) Next j End Sub

Uma pergunta: quando eu separo em index os check boxes, como eu o utilizaria no option ou na propria function check click: tipo fikaria Sub Check1_Click() Index 1 faça Index2 faça . . . Indexn faça porque quando eu ponho a indexacao eu faco com q o check tenha uma rotina pra tudo, precisando separar as rotinas de cada checkbox é so vlww

e aii boom td bemm colocando em index facilitaria minha vida, masss tem um porem como eu posso manipular a selecao do check já q quando for clicado ele mudara as configuracoes do form principal, tendo em vista q cada check tem uma alteracao diferente para o form principal

Fala galera to montando um programa aki q quando eu clico nun option button ele roda pelo getsettings todas as opcoes de check box contindas na ultima utilizacao, porem eu to com um pequeno problema, quando eu mudo do option 1 pro dois o programa não faz a atualizacao no form, e eu to usando um for porque tenho 30 variaveis de memoria (de 1 a 30) , ai o codigo ficou assim: code: Private Sub Option1_Click() For i = 1 To 30 ac(i) = GetSetting(App.EXEName, "opt1", "ac(i)", 0) Select Case ac(i) Case ac(1) Check1.Value = ac(1) Case ac(2) Check2.Value = ac(2) Case ac(3) Check3.Value = ac(3) Case ac(4) Check4.Value = ac(4) Case ac(5) Check5.Value = ac(5) Case ac(6) Check6.Value = ac(6) Case ac(7) Check7.Value = ac(7) Case ac(8) Check8.Value = ac(8) Case ac(9) Check9.Value = ac(9) Case ac(10) Check10.Value = ac(10) Case ac(11) Check11.Value = ac(11) Case ac(12) Check12.Value = ac(12) Case ac(13) Check13.Value = ac(13) Case ac(14) Check14.Value = ac(14) Case ac(15) Check15.Value = ac(15) Case ac(16) Check16.Value = ac(16) Case ac(17) Check17.Value = ac(17) Case ac(18) Check18.Value = ac(18) Case ac(19) Check19.Value = ac(19) Case ac(19) Check19.Value = ac(19) Case ac(20) Check20.Value = ac(20) Case ac(21) Check21.Value = ac(21) Case ac(22) Check22.Value = ac(22) Case ac(23) Check23.Value = ac(23) Case ac(24) Check24.Value = ac(24) Case ac(25) Check25.Value = ac(25) Case ac(26) Check26.Value = ac(26) Case ac(27) Check27.Value = ac(27) Case ac(28) Check28.Value = ac(28) Case ac(29) Check29.Value = ac(29) Case ac(30) Check30.Value = ac(30) End Select Next End Sub o option2 é igual so q invés de ac é bc, vlww []'s

Fala galera.. A questao ta quase resolvida, eu so preciso saber o q usar pra q quando exemplo: o option1 for de true pra false, o savesettings pras configuracoes feitas sera rodado... O q eu preciso saber é o q usarr??? Vlww []'s